[Mono-devel-list] RE: [mono-vb] BC29999 error

Chesko, Ron ronc at palsnet.info
Wed Mar 2 13:35:26 EST 2005


Alrighty.

Other pages work (with the language line). My original problem page
gives a new error with line 67 highlighted.

Thanks,
Ron

Error message: /tmp/95963.vb(67,32) : error BC1501: No overload for
method `QueryString' takes `1' arguments 

File name: /var/www/html/sites/NWB/contactus.aspx

Source File: /tmp/95963.vb 

Line 1: '
------------------------------------------------------------------------
------
Line 2: '  <autogenerated>
Line 3: '      This code was generated by a tool.
Line 4: '      Mono Runtime Version: 1.1.4322.573
Line 5: ' 
Line 6: '      Changes to this file may cause incorrect behavior and
will be lost if 
Line 7: '      the code is regenerated.
Line 8: '  </autogenerated>
Line 9: '
------------------------------------------------------------------------
------
Line 10: 
Line 11: Option Explicit Off
Line 12: Option Strict On
Line 13: 
Line 14: Imports Microsoft.VisualBasic
Line 15: Imports System
Line 16: Imports System.Collections
Line 17: Imports System.Collections.Specialized
Line 18: Imports System.Configuration
Line 19: Imports System.Text
Line 20: Imports System.Text.RegularExpressions
Line 21: Imports System.Web
Line 22: Imports System.Web.Caching
Line 23: Imports System.Web.Security
Line 24: Imports System.Web.SessionState
Line 25: Imports System.Web.UI
Line 26: Imports System.Web.UI.WebControls
Line 27: Imports System.Web.UI.HtmlControls
Line 28: 
Line 29: Namespace ASP
Line 30:     Public Class contactus_aspx
Line 31:         Inherits System.Web.UI.Page
Line 32:         Implements
System.Web.SessionState.IRequiresSessionState
Line 33: 
Line 34:         Private Shared __intialized As Boolean = False
Line 35: 
Line 36:         Private Shared __autoHandlers As Integer
Line 37: 
Line 38:         Public Sub New()
Line 39:             If ((ASP.contactus_aspx.__intialized = False)) Then
Line 40:                 ASP.contactus_aspx.__intialized = True
Line 41:             End If
Line 42:         End Sub
Line 43: 
Line 44:         Protected Overrides Property AutoHandlers As Integer
Line 45:             Get
Line 46:                 Return ASP.contactus_aspx.__autoHandlers
Line 47:             End Get
Line 48:             Set (Value As Integer)
Line 49:                 ASP.contactus_aspx.__autoHandlers = Value
Line 50:             End Set
Line 51:         End Property
Line 52: 
Line 53:         Protected ReadOnly Property ApplicationInstance As
System.Web.HttpApplication
Line 54:             Get
Line 55:                 Return CType(Me.Context.ApplicationInstance,
System.Web.HttpApplication)
Line 56:             End Get
Line 57:         End Property
Line 58: 
Line 59:         Public Overrides ReadOnly Property
TemplateSourceDirectory As String
Line 60:             Get
Line 61:                 Return "/NWB"
Line 62:             End Get
Line 63:         End Property
Line 64: 
Line 65:         Private Sub __RenderTree(__output As
System.Web.UI.HtmlTextWriter, parameterContainer As
System.Web.UI.Control)
Line 66:             __output.Write("<h2 class=""Heading"">Contact
Us</h2>"&Microsoft.VisualBasic.ChrW(10))
Line 67:             if Request.QueryString( "thanks" ) = "yes" then
Line 68: 	'form has been sucessfully submitted
Line 69: 	'show a thank you message
Line 70: 	response.write ("<p><b>Thank You For Contacting
Us</b></p><p>If your input requires us to contact you and you have
provided us with your contact information we will be in touch with you
soon.</p>")
Line 71: else 
Line 72:
__output.Write(""&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.C
hrW(9)&Microsoft.VisualBasic.ChrW(9)&"<p>Please fill in the form below
and submit it with your comments or
suggestions.</p>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.C
hrW(9)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(10)&Micr
osoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<form
action=""http://palsnet.info/cgi-bin/formmail.pl""
METHOD=""POST"">"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.C
hrW(9)&Microsoft.VisualBasic.ChrW(9)&"<input type=""hidden""
name=""recipient""
value=""laheiden at cbplib.us"">"&Microsoft.VisualBasic.ChrW(10)&Microsoft.
VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<input
type=""hidden"" name=""subject"" value=""C.B. Phillips Contact Us Form
Input"">"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9)&M
icrosoft.VisualBasic.ChrW(9)&"<input type=""hidden""
value=""http://cbplib.us/contactus.asp?thanks=yes""
name=""redirect"">"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic
.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<table
width=""100%"">"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.Ch
rW(9)&Microsoft.VisualBasic.ChrW(9)&"<tr>"&Microsoft.VisualBasic.ChrW(10
)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&Microsoft.
VisualBasic.ChrW(9)&"<td
valign=""top"">Name:</td>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.Visu
alBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW
(9)&"<td valign=""top""><input TYPE=TEXT NAME=""name"" tabindex=""1""
maxsize=""75""></input></td>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.V
isualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"</tr>"&Microsoft.Visua
lBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW
(9)&"<tr>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9)&
Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<td
valign=""top"">Email:</td>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.Vis
ualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.Chr
W(9)&"<td valign=""top""><input TYPE=TEXT NAME=""email"" tabindex=""2""
maxsize=""75""></input></td>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.V
isualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"</tr>"&Microsoft.Visua
lBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW
(9)&"<tr>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9)&
Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<td
valign=""top"">Comments:</td>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.
VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.
ChrW(9)&"<td valign=""top""><textarea NAME=""COMMENTS"" ROWS=7
tabindex=""3""></textarea></td>"&Microsoft.VisualBasic.ChrW(10)&Microsof
t.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"</tr>"&Microsoft.Vi
sualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.C
hrW(9)&"</table>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.C
hrW(9)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(10)&Micr
osoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<p
align=""center""><input type=""submit"" name=""Submit""
value=""Submit"">&nbsp;&nbsp;<input type=""reset"" name=""Reset""
value=""Reset""></p>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBas
ic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"</form>"&Microsoft.VisualBasic
.ChrW(10))
Line 73:             End If 
Line 74:
__output.Write(""&Microsoft.VisualBasic.ChrW(10)&"<br><p
align=""center"">Location: 6 N. Jackson St., P.O. Box 156, Newark, IL
60541<br>Phone: 815-695-5851 / Fax: 815-695-5804<br><A
href=""hours.asp#hours"">Hours</a></p></td></tr>"&Microsoft.VisualBasic.
ChrW(10)&Microsoft.VisualBasic.ChrW(9)&"<tr>"&Microsoft.VisualBasic.ChrW
(10)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<td
align=""center"" bgcolor=""#696969""><A href=""aboutus.asp""
class=""bottomlink"">About Us</a>&nbsp;&nbsp;&nbsp;<A
href=""catalog.asp""
class=""bottomlink"">Catalog</a>&nbsp;&nbsp;&nbsp;<A href=""events.asp""
class=""bottomlink"">Programs &amp; Events</a>&nbsp;&nbsp;&nbsp;<A
href=""community.asp""
class=""bottomlink"">Community</a>&nbsp;&nbsp;&nbsp;<A
href=""resources.asp"" class=""bottomlink"">Resources</a><br><A
href=""contactus.asp"" class=""bottomlink"">Contact Us</a></td></tr>
</table>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(10)&
Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(10)&"</body>"&
Microsoft.VisualBasic.ChrW(10)&"</html>"&Microsoft.VisualBasic.ChrW(10))
Line 75:         End Sub
Line 76: 
Line 77:         Private Sub __BuildControlTree(__ctrl As
System.Web.UI.Control)
Line 78:             __ctrl.SetRenderMethodDelegate(AddressOf
Me.__RenderTree)
Line 79:         End Sub
Line 80: 
Line 81:         Protected Overrides Sub FrameworkInitialize()
Line 82:             Me.TraceModeValue = System.Web.TraceMode.SortByTime
Line 83:             Me.Request.ValidateInput()
Line 84:             Me.__BuildControlTree(Me)
Line 85:         End Sub
Line 86: 
Line 87:         Public Overrides Function GetTypeHashCode() As Integer
Line 88:             Return 1885199894
Line 89:         End Function
Line 90:     End Class
Line 91: End Namespace

 
 

> -----Original Message-----
> From: Rafael Teixeira [mailto:monoman at gmail.com] 
> Sent: Wednesday, March 02, 2005 12:20 PM
> To: Chesko, Ron
> Cc: mono-vb at lists.ximian.com; mono-devel-list
> Subject: Re: [mono-vb] BC29999 error
> 
> try rpm --nodeps just for xsp after installing all the 
> others, normally
> 
> HIH, :)
> 
> 
> On Wed, 2 Mar 2005 12:05:07 -0600, Chesko, Ron 
> <ronc at palsnet.info> wrote:
> > Hey Rafael,
> > 
> > This is the only page that I am having problems with in the current 
> > site I am testing (we have about 4 or 5 sites that we host that are 
> > using VB.NET). The other pages in this site seem to be fine 
> as far as 
> > I can tell. Nothing is precompiled. I just moved the pages over.
> > 
> > But, come to think of it. I did add the "<%@ LANGUAGE = VBScript %>"
> > line to the as I was testing. The other pages seem to load 
> fine with 
> > out it. Just added the language line to one of the pages 
> that worked 
> > and I did get an error (but the line highlighted in Source File 
> > listing is
> > blank:
> > 
> > 
> > Error message: (0,0) : error : THIS IS STILL ALPHA AND UNSUPPORTED 
> > SOFTWARE, USE AT YOUR OWN RISK. /tmp/94557.vb(52,0) : error BC30284:
> > `ASP.index_aspx.AutoHandlers' no suitable properties found 
> to override
> > (0,0) : error failed: 1 Error(s), 0 warnings
> > 
> > I tried upgrade to the 1.1.x series, but XSP (1.0.6) keeps 
> complaining 
> > that it needs to have the core and other packages at 1.0.5.
> > 
> > Unresolvable chain of dependencies:
> > xsp-1.0.6-1.novell.9.1                   requires mono(Mono.Posix) =
> > 1.0.5000.0
> > xsp-1.0.6-1.novell.9.1                   requires mono(System) =
> > 1.0.5000.0
> > xsp-1.0.6-1.novell.9.1                   requires 
> mono(System.Data) =
> > 1.0.5000.0
> > xsp-1.0.6-1.novell.9.1                   requires mono(System.Web) =
> > 1.0.5000.0
> > xsp-1.0.6-1.novell.9.1                   requires
> > mono(System.Web.Services) = 1.
> > 0.5000.0
> > xsp-1.0.6-1.novell.9.1                   requires mono(System.Xml) =
> > 1.0.5000.0
> > xsp-1.0.6-1.novell.9.1                   requires mono(mscorlib) =
> > 1.0.5000.0
> > 
> > Any ideas?
> > 
> > Thanks,
> > Ron
> > 
> > > -----Original Message-----
> > > From: Rafael Teixeira [mailto:monoman at gmail.com]
> > > Sent: Wednesday, March 02, 2005 11:47 AM
> > > To: Chesko, Ron
> > > Cc: mono-vb at lists.ximian.com; mono-devel-list
> > > Subject: Re: [mono-vb] BC29999 error
> > >
> > > Hi Ron,
> > >
> > > First, as it states in the wrongly repeated error message 
> our VB.NET 
> > > compiler is still in alpha stage, and without it you 
> won't able to 
> > > use VB.NET in your aspnet pages or user controls.
> > >
> > > I already patched the VBCodeCompiler class to call mbas in quiet 
> > > mode, but I recall doing so only in the 1.1.x development series, 
> > > and not backporting it to the 1.0.x stable series.
> > >
> > > We are currently recommending users to use the latest 1.1.x 
> > > packages, as many resolved issues are hard to backport to 
> the stable 
> > > series.
> > > Please do that if you can.
> > >
> > > Just a question: this is the only VB.NET page in your  
> test site? or 
> > > all the other were deployed pre-compiled?
> > >
> > > Because you should have experienced that problem for all your  
> > > VB.NET pages...
> > >
> > > HIH,
> > >
> > >
> > > On Wed, 2 Mar 2005 09:39:52 -0600, Chesko, Ron 
> <ronc at palsnet.info> 
> > > wrote:
> > > > Hey everyone,
> > > >
> > > > In the midst of moving our current web sites from IIS to
> > > Apache 2/mono.
> > > > My first crack at this didn't turn out 100%. All of the
> > > pages for my
> > > > first test site worked except for a comment form. I got the
> > > following
> > > > error. Line 78 is the offending line according to the
> > > output. Source
> > > > for the page is below the error.
> > > >
> > > > I'm running the following on Fedora Core 3 with the 
> latest updates 
> > > > (all installed from up2date or rpms):
> > > > mono-winforms-1.0.6-1.novell.9.1
> > > > mono-core-1.0.6-1.novell.9.1
> > > > mono-devel-1.0.6-1.novell.9.1
> > > > mono-web-1.0.6-1.novell.9.1
> > > > mono-extras-1.0.6-1.novell.9.1
> > > > mono-ikvm-1.0.6-1.novell.9.1
> > > > mono-basic-1.0.6-1.novell.9.1
> > > > mono-data-1.0.6-1.novell.9.1
> > > > mod_mono-1.0.6-1.novell.9.1
> > > > xsp-1.0.6-1.novell.9.1
> > > > httpd-2.0.52-3.1
> > > >
> > > > Any help is much appreciated. And if I'm posting this 
> in the wrong 
> > > > place, could someone please point me in the right direction?
> > > >
> > > > Thanks in advance,
> > > > Ron
> > > >
> > > > Description: Error compiling a resource required to 
> service this 
> > > > request. Review your source file and modify it to fix 
> this error.
> > > >
> > > > Error message: (0,0) : error : THIS IS STILL ALPHA AND 
> UNSUPPORTED 
> > > > SOFTWARE, USE AT YOUR OWN RISK. /tmp/48280.vb(78,47) :
> > > error BC29999:
> > > > Line: 78 Col: 47 (0,0) : error : 78 Token: 261 (0,0) : error
> > > > .MonoBASIC.yyParser.yyException: irrecoverable syntax 
> error (0,0) :
> > > > error failed: 1 Error(s), 0 warnings
> > > >
> > > > Source File:
> > > >
> > > > Line 1: '
> > > >
> > > 
> --------------------------------------------------------------------
> > > --
> > > > --
> > > > ------
> > > > Line 2: '  <autogenerated>
> > > > Line 3: '      This code was generated by a tool.
> > > > Line 4: '      Mono Runtime Version: 1.1.4322.573
> > > > Line 5: '
> > > > Line 6: '      Changes to this file may cause incorrect 
> behavior and
> > > > will be lost if
> > > > Line 7: '      the code is regenerated.
> > > > Line 8: '  </autogenerated>
> > > > Line 9: '
> > > >
> > > 
> --------------------------------------------------------------------
> > > --
> > > > --
> > > > ------
> > > > Line 10:
> > > > Line 11: Option Explicit Off
> > > > Line 12: Option Strict On
> > > > Line 13:
> > > > Line 14: Imports Microsoft.VisualBasic Line 15: Imports System 
> > > > Line
> > > > 16: Imports System.Collections Line 17: Imports 
> > > > System.Collections.Specialized Line 18: Imports
> > > System.Configuration
> > > > Line 19: Imports System.Text Line 20: Imports 
> > > > System.Text.RegularExpressions Line 21: Imports 
> System.Web Line 22:
> > > > Imports System.Web.Caching Line 23: Imports
> > > System.Web.Security Line
> > > > 24: Imports System.Web.SessionState Line 25: Imports 
> System.Web.UI 
> > > > Line 26: Imports System.Web.UI.WebControls Line 27: Imports 
> > > > System.Web.UI.HtmlControls Line 28:
> > > > Line 29: Namespace ASP
> > > > Line 30:     Public Class contactus_aspx
> > > > Line 31:         Inherits System.Web.UI.Page
> > > > Line 32:         Implements
> > > > System.Web.SessionState.IRequiresSessionState
> > > > Line 33:
> > > > Line 34:         Private Shared __intialized As Boolean = False
> > > > Line 35:
> > > > Line 36:         Private Shared __autoHandlers As Integer
> > > > Line 37:
> > > > Line 38:         Public Sub New()
> > > > Line 39:             If ((ASP.contactus_aspx.__intialized =
> > > False)) Then
> > > > Line 40:                 ASP.contactus_aspx.__intialized = True
> > > > Line 41:             End If
> > > > Line 42:         End Sub
> > > > Line 43:
> > > > Line 44:         Protected Overrides Property AutoHandlers
> > > As Integer
> > > > Line 45:             Get
> > > > Line 46:                 Return 
> ASP.contactus_aspx.__autoHandlers
> > > > Line 47:             End Get
> > > > Line 48:             Set (Value As Integer)
> > > > Line 49:                 
> ASP.contactus_aspx.__autoHandlers = Value
> > > > Line 50:             End Set
> > > > Line 51:         End Property
> > > > Line 52:
> > > > Line 53:         Protected ReadOnly Property 
> ApplicationInstance As
> > > > System.Web.HttpApplication
> > > > Line 54:             Get
> > > > Line 55:                 Return
> > > CType(Me.Context.ApplicationInstance,
> > > > System.Web.HttpApplication)
> > > > Line 56:             End Get
> > > > Line 57:         End Property
> > > > Line 58:
> > > > Line 59:         Public Overrides ReadOnly Property
> > > > TemplateSourceDirectory As String
> > > > Line 60:             Get
> > > > Line 61:                 Return "/NWB"
> > > > Line 62:             End Get
> > > > Line 63:         End Property
> > > > Line 64:
> > > > Line 65:         Private Sub __RenderTree(__output As
> > > > System.Web.UI.HtmlTextWriter, parameterContainer As
> > > > System.Web.UI.Control)
> > > > Line 66:             __output.Write("<h2 
> class=""Heading"">Contact
> > > > Us</h2>"&Microsoft.VisualBasic.Strings.ChrW(10))
> > > > Line 67:             if Request.QueryString( "thanks" ) 
> = "yes" then
> > > > Line 68:        'form has been sucessfully submitted
> > > > Line 69:        'show a thank you message
> > > > Line 70:        response.write ("<p><b>Thank You For Contacting
> > > > Us</b></p><p>If your input requires us to contact you 
> and you have 
> > > > provided us with your contact information we will be in
> > > touch with you
> > > > soon.</p>")
> > > > Line 71: else
> > > > Line 72:
> > > >
> > > 
> __output.Write(""&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.V
> > > is
> > > > ua
> > > >
> > > 
> lBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<p>Ple
> > > as
> > > > e fill in the form below and submit it with your comments or
> > > >
> > > 
> suggestions.</p>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.V
> > > is
> > > > ua
> > > >
> > > 
> lBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&Microso
> > > ft
> > > > .V
> > > >
> > > 
> isualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(9)&Mi
> > > cr
> > > > os oft.VisualBasic.Strings.ChrW(9)&"<form
> > > > action=""http://palsnet.info/cgi-bin/formmail.pl""
> > > >
> > > 
> METHOD=""POST"">"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.V
> > > is
> > > > ua
> > > > 
> lBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<inp
> > > > ut type=""hidden"" name=""recipient""
> > > >
> > > 
> value=""laheiden at cbplib.us"">"&Microsoft.VisualBasic.Strings.ChrW(10
> > > )&
> > > > Mi
> > > >
> > > 
> crosoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.Ch
> > > rW
> > > > (9 )&"<input type=""hidden"" name=""subject"" value=""C.B. 
> > > > Phillips Contact Us Form
> > > >
> > > 
> Input"">"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBas
> > > ic
> > > > .S trings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<input
> > > > type=""hidden"" 
> value=""http://cbplib.us/contactus.asp?thanks=yes""
> > > >
> > > 
> name=""redirect"">"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft
> > > .V
> > > > is
> > > >
> > > 
> ualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<tab
> > > le
> > > >
> > > 
> width=""100%"">"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.Vi
> > > su
> > > > al
> > > >
> > > 
> Basic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<tr>"&M
> > > ic
> > > > ro
> > > >
> > > 
> soft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW
> > > (9
> > > > )&
> > > >
> > > 
> Microsoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.
> > > Ch
> > > > rW
> > > > (9)&"<td
> > > >
> > > 
> valign=""top"">Name:</td>"&Microsoft.VisualBasic.Strings.ChrW(10)&Mi
> > > cr
> > > > os
> > > >
> > > 
> oft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9
> > > )&
> > > > Mi crosoft.VisualBasic.Strings.ChrW(9)&"<td 
> valign=""top""><input 
> > > > TYPE=TEXT NAME=""name"" tabindex=""1""
> > > >
> > > 
> maxsize=""75""></input></td>"&Microsoft.VisualBasic.Strings.ChrW(10)
> > > &M
> > > > ic
> > > >
> > > 
> rosoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.Chr
> > > W(
> > > > 9)
> > > >
> > > 
> &"</tr>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.
> > > > St
> > > >
> > > 
> rings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<tr>"&Microsoft
> > > .V
> > > > is
> > > >
> > > 
> ualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(9)&Micr
> > > os
> > > > of
> > > >
> > > 
> t.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&
> > > "<
> > > > td
> > > >
> > > 
> valign=""top"">Email:</td>"&Microsoft.VisualBasic.Strings.ChrW(10)&M
> > > ic
> > > > ro
> > > >
> > > 
> soft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(
> > > 9)
> > > > &M icrosoft.VisualBasic.Strings.ChrW(9)&"<td 
> valign=""top""><input 
> > > > TYPE=TEXT NAME=""email"" tabindex=""2""
> > > >
> > > 
> maxsize=""75""></input></td>"&Microsoft.VisualBasic.Strings.ChrW(10)
> > > &M
> > > > ic
> > > >
> > > 
> rosoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.Chr
> > > W(
> > > > 9)
> > > >
> > > 
> &"</tr>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.
> > > > St
> > > >
> > > 
> rings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<tr>"&Microsoft
> > > .V
> > > > is
> > > >
> > > 
> ualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(9)&Micr
> > > os
> > > > of
> > > >
> > > 
> t.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&
> > > "<
> > > > td
> > > >
> > > 
> valign=""top"">Comments:</td>"&Microsoft.VisualBasic.Strings.ChrW(10
> > > )&
> > > > Mi
> > > >
> > > 
> crosoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.Ch
> > > rW
> > > > (9 )&Microsoft.VisualBasic.Strings.ChrW(9)&"<td
> > > > valign=""top""><textarea NAME=""COMMENTS"" ROWS=7
> > > >
> > > 
> tabindex=""3""></textarea></td>"&Microsoft.VisualBasic.Strings.ChrW(
> > > 10
> > > > )&
> > > >
> > > 
> Microsoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.
> > > Ch
> > > > rW
> > > >
> > > 
> (9)&"</tr>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualB
> > > as
> > > > ic
> > > >
> > > 
> .Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"</table>"&Mi
> > > cr
> > > > os
> > > >
> > > 
> oft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(
> > > 9)
> > > > &M
> > > >
> > > 
> icrosoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.C
> > > hr
> > > > W(
> > > >
> > > 10)&Microsoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasi
> > > c.Strings.
> > > > ChrW(9)&"<p align=""center""><input type=""submit"" 
> name=""Submit""
> > > > value=""Submit"">&nbsp;&nbsp;<input type=""reset"" 
> name=""Reset""
> > > >
> > > 
> value=""Reset""></p>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microso
> > > ft
> > > > .V
> > > >
> > > 
> isualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"</
> > > fo
> > > > rm
> > > > >"&Microsoft.VisualBasic.Strings.ChrW(10))
> > > > Line 73:             End If
> > > > Line 74:
> > > > __output.Write(""&Microsoft.VisualBasic.Strings.ChrW(10)&"<br><p
> > > > align=""center"">Location: 6 N. Jackson St., P.O. Box 156,
> > > Newark, IL
> > > > 60541<br>Phone: 815-695-5851 / Fax: 815-695-5804<br><A
> > > >
> > > href=""hours.asp#hours"">Hours</a></p></td></tr>"&Microsoft.Vi
> > > sualBasic.
> > > >
> > > Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(9)&"<tr>"&
> > > Microsoft.
> > > >
> > > 
> VisualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(9)&M
> > > ic
> > > > ro soft.VisualBasic.Strings.ChrW(9)&"<td align=""center""
> > > > bgcolor=""#696969""><A href=""aboutus.asp""
> > > class=""bottomlink"">About
> > > > Us</a>&nbsp;&nbsp;&nbsp;<A href=""catalog.asp""
> > > > class=""bottomlink"">Catalog</a>&nbsp;&nbsp;&nbsp;<A
> > > href=""events.asp""
> > > > class=""bottomlink"">Programs &amp; 
> Events</a>&nbsp;&nbsp;&nbsp;<A 
> > > > href=""community.asp""
> > > > class=""bottomlink"">Community</a>&nbsp;&nbsp;&nbsp;<A
> > > > href=""resources.asp"" class=""bottomlink"">Resources</a><br><A
> > > > href=""contactus.asp"" class=""bottomlink"">Contact
> > > Us</a></td></tr>
> > > >
> > > 
> </table>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBas
> > > ic
> > > > .S
> > > >
> > > 
> trings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.Vis
> > > ua
> > > > lB
> > > >
> > > asic.Strings.ChrW(10)&"</body>"&Microsoft.VisualBasic.Strings.
> > > ChrW(10)&"
> > > > </html>"&Microsoft.VisualBasic.Strings.ChrW(10))
> > > > Line 75:         End Sub
> > > > Line 76:
> > > > Line 77:         Private Sub __BuildControlTree(__ctrl As
> > > > System.Web.UI.Control)
> > > > Line 78:             __ctrl.SetRenderMethodDelegate(AddressOf
> > > > Me.__RenderTree)
> > > > Line 79:         End Sub
> > > > Line 80:
> > > > Line 81:         Protected Overrides Sub FrameworkInitialize()
> > > > Line 82:             Me.TraceModeValue =
> > > System.Web.TraceMode.SortByTime
> > > > Line 83:             Me.Request.ValidateInput()
> > > > Line 84:             Me.__BuildControlTree(Me)
> > > > Line 85:         End Sub
> > > > Line 86:
> > > > Line 87:         Public Overrides Function
> > > GetTypeHashCode() As Integer
> > > > Line 88:             Return 1885199894
> > > > Line 89:         End Function
> > > > Line 90:     End Class
> > > > Line 91:     'Why is the indentation not working correctly
> > > here? --> see
> > > > in mcs/class/System/Micrisoft.VisualBasic/VBCodeGenerator.cs
> > > > Line 92:     'Indent=1
> > > > Line 93: End Namespace
> > > > Line 94: 'Indent=0
> > > >
> > > > Here is the source for the page:
> > > >
> > > > <%@ LANGUAGE = VBScript %>
> > > > <h2 class="Heading">Contact Us</h2> <% if Request.QueryString( 
> > > > "thanks" ) = "yes" then
> > > >         'form has been sucessfully submitted
> > > >         'show a thank you message
> > > >         response.write ("<p><b>Thank You For Contacting 
> > > > Us</b></p><p>If your inp ut requires us to contact you and you 
> > > > have provided us with your contact informa tion we will be in 
> > > > touch with you soon.</p>") else %>
> > > >                 <p>Please fill in the form below and submit it 
> > > > with your comment s or suggestions.</p>
> > > >
> > > >                 <form
> > > action="http://palsnet.info/cgi-bin/formmail.pl"
> > > > METHOD="P
> > > > OST">
> > > >                 <input type="hidden" name="recipient"
> > > > value="laheiden at cbplib.us"
> > > > >
> > > >                 <input type="hidden" name="subject" value="C.B.
> > > > Phillips Contact  Us Form Input">
> > > >                 <input type="hidden"
> > > > value="http://cbplib.us/contactus.asp?thank
> > > > s=yes"  name="redirect">
> > > >                 <table width="100%">
> > > >                 <tr>
> > > >                         <td valign="top">Name:</td>
> > > >                         <td valign="top"><input TYPE=TEXT
> > > NAME="name"
> > > > tabindex="
> > > > 1" maxsize="75"></input></td>
> > > >                 </tr>
> > > >                 <tr>
> > > >                         <td valign="top">Email:</td>
> > > >                         <td valign="top"><input TYPE=TEXT
> > > NAME="email"
> > > > tabindex=
> > > > "2" maxsize="75"></input></td>
> > > >                 </tr>
> > > >                 <tr>
> > > >                         <td valign="top">Comments:</td>
> > > >                         <td valign="top"><textarea 
> NAME="COMMENTS"
> > > > ROWS=7 tabind
> > > > ex="3"></textarea></td>
> > > >                 </tr>
> > > >                 </table>
> > > >
> > > >                 <p align="center"><input type="submit" 
> name="Submit"
> > > > value="Subm
> > > > it">&nbsp;&nbsp;<input type="reset" name="Reset" 
> value="Reset"></p>
> > > >                 </form>
> > > > <% End If %>
> > > > <!--#include file="includes/bottom.inc"-->
> > > >
> > > > Ron Chesko
> > > > Senior Associate Network Services
> > > > Prarie Area Library System
> > > > http://www.palsnet.info/
> > > >
> > > > _______________________________________________
> > > > Mono-vb mailing list
> > > > Mono-vb at lists.ximian.com
> > > > http://lists.ximian.com/mailman/listinfo/mono-vb
> > > >
> > >
> > >
> > > --
> > > Rafael "Monoman" Teixeira
> > > ---------------------------------------
> > > I'm trying to become a "Rosh Gadol" before my own eyes.
> > > See http://www.joelonsoftware.com/items/2004/12/06.html for 
> > > enlightment.
> > >
> > 
> 
> 
> --
> Rafael "Monoman" Teixeira
> ---------------------------------------
> I'm trying to become a "Rosh Gadol" before my own eyes. 
> See http://www.joelonsoftware.com/items/2004/12/06.html for 
> enlightment.
> 



More information about the Mono-devel-list mailing list