[mono-vb] BC29999 error
Chesko, Ron
ronc@palsnet.info
Wed, 2 Mar 2005 13:05:18 -0600
Okay, made the change and I get this now and the dll name changes each
time I reload.
Cannot find '58860.dll'.
Description: Error processing request.=20
Error Message: HTTP 404. Cannot find '58860.dll'.=20
BTW, thanks for all of the help so far.
Ron=20
> -----Original Message-----
> From: Rafael Teixeira [mailto:monoman@gmail.com]=20
> Sent: Wednesday, March 02, 2005 12:58 PM
> To: Chesko, Ron
> Cc: mono-vb@lists.ximian.com; mono-devel-list
> Subject: Re: [mono-vb] BC29999 error
>=20
> It is a known problem: Currently mbas isn't properly dealing=20
> with the "default property" for a class, so you need to be explicit.
>=20
> As a workaround it may (I can't test just now) work if you=20
> change the code to:
>=20
> > Line 67: if Request.QueryString.Item( "thanks"=20
> ) =3D "yes" then
>=20
> HIH,=20
>=20
> On Wed, 2 Mar 2005 12:35:26 -0600, Chesko, Ron=20
> <ronc@palsnet.info> wrote:
> > Alrighty.
> >=20
> > Other pages work (with the language line). My original problem page=20
> > gives a new error with line 67 highlighted.
> >=20
> > Thanks,
> > Ron
> >=20
> > Error message: /tmp/95963.vb(67,32) : error BC1501: No overload for=20
> > method `QueryString' takes `1' arguments
> >=20
> > File name: /var/www/html/sites/NWB/contactus.aspx
> >=20
> > Source File: /tmp/95963.vb
> >=20
> > Line 1: '
> >=20
> ----------------------------------------------------------------------
> > --
> > ------
> > 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: '
> >=20
> ----------------------------------------------------------------------
> > --
> > ------
> > Line 10:
> > Line 11: Option Explicit Off
> > Line 12: Option Strict On
> > Line 13:
> > Line 14: Imports Microsoft.VisualBasic Line 15: Imports System Line=20
> > 16: Imports System.Collections Line 17: Imports=20
> > System.Collections.Specialized Line 18: Imports=20
> System.Configuration=20
> > Line 19: Imports System.Text Line 20: Imports=20
> > System.Text.RegularExpressions Line 21: Imports System.Web Line 22:=20
> > Imports System.Web.Caching Line 23: Imports=20
> System.Web.Security Line=20
> > 24: Imports System.Web.SessionState Line 25: Imports System.Web.UI=20
> > Line 26: Imports System.Web.UI.WebControls Line 27: Imports=20
> > 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 =3D False
> > Line 35:
> > Line 36: Private Shared __autoHandlers As Integer
> > Line 37:
> > Line 38: Public Sub New()
> > Line 39: If ((ASP.contactus_aspx.__intialized =3D=20
> False)) Then
> > Line 40: ASP.contactus_aspx.__intialized =3D True
> > Line 41: End If
> > Line 42: End Sub
> > Line 43:
> > Line 44: Protected Overrides Property AutoHandlers=20
> 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 =3D 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=20
> 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=3D""Heading"">Contact
> > Us</h2>"&Microsoft.VisualBasic.ChrW(10))
> > Line 67: if Request.QueryString( "thanks" ) =3D "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=20
> > provided us with your contact information we will be in=20
> touch with you
> > soon.</p>")
> > Line 71: else
> > Line 72:
> >=20
> __output.Write(""&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic
> > .C hrW(9)&Microsoft.VisualBasic.ChrW(9)&"<p>Please fill in the form=20
> > below and submit it with your comments or=20
> >=20
> suggestions.</p>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic
> > .C=20
> >=20
> hrW(9)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(10)&Mi
> > cr osoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<form
> > action=3D""http://palsnet.info/cgi-bin/formmail.pl""
> >=20
> =
METHOD=3D""POST"">"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic
> > .C hrW(9)&Microsoft.VisualBasic.ChrW(9)&"<input type=3D""hidden""
> > name=3D""recipient""
> >=20
> value=3D""laheiden@cbplib.us"">"&Microsoft.VisualBasic.ChrW(10)&
> Microsoft.
> > VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<input
> > type=3D""hidden"" name=3D""subject"" value=3D""C.B. Phillips=20
> Contact Us Form=20
> >=20
> Input"">"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9)
> > &M icrosoft.VisualBasic.ChrW(9)&"<input type=3D""hidden""
> > value=3D""http://cbplib.us/contactus.asp?thanks=3Dyes""
> >=20
> =
name=3D""redirect"">"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBas
> > ic .ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<table
> >=20
> =
width=3D""100%"">"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.
> > Ch=20
> >=20
> rW(9)&Microsoft.VisualBasic.ChrW(9)&"<tr>"&Microsoft.VisualBasic.ChrW(
> > 10=20
> >=20
> )&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&
> Microsoft.
> > VisualBasic.ChrW(9)&"<td
> >=20
> =
valign=3D""top"">Name:</td>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.Vi
> > su=20
> >=20
> alBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.Ch
> > rW (9)&"<td valign=3D""top""><input TYPE=3DTEXT NAME=3D""name""=20
> > tabindex=3D""1""
> >=20
> =
maxsize=3D""75""></input></td>"&Microsoft.VisualBasic.ChrW(10)&Microsoft
> > .V=20
> >=20
> isualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"</tr>"&Microsoft.Vis
> > ua=20
> >=20
> lBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.Ch
> > rW=20
> >=20
> (9)&"<tr>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9
> > )& Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<td
> >=20
> =
valign=3D""top"">Email:</td>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.V
> > is=20
> >=20
> ualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.C
> > hr W(9)&"<td valign=3D""top""><input TYPE=3DTEXT NAME=3D""email""=20
> > tabindex=3D""2""
> >=20
> =
maxsize=3D""75""></input></td>"&Microsoft.VisualBasic.ChrW(10)&Microsoft
> > .V=20
> >=20
> isualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"</tr>"&Microsoft.Vis
> > ua=20
> >=20
> lBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.Ch
> > rW=20
> >=20
> (9)&"<tr>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9
> > )& Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<td
> >=20
> valign=3D""top"">Comments:</td>"&Microsoft.VisualBasic.ChrW(10)&
> Microsoft.
> >=20
> VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&Microsoft.Vi
> sualBasic.
> > ChrW(9)&"<td valign=3D""top""><textarea NAME=3D""COMMENTS"" ROWS=3D7 =
> >=20
> =
tabindex=3D""3""></textarea></td>"&Microsoft.VisualBasic.ChrW(10)&Micros
> > of=20
> >=20
> t.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"</tr>"&Microsoft.
> > Vi=20
> >=20
> sualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic
> > .C=20
> >=20
> hrW(9)&"</table>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic
> > .C=20
> >=20
> hrW(9)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(10)&Mi
> > cr osoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<p
> > align=3D""center""><input type=3D""submit"" name=3D""Submit""
> > value=3D""Submit""> <input type=3D""reset"" =
name=3D""Reset""
> >=20
> =
value=3D""Reset""></p>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualB
> > as=20
> >=20
> ic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"</form>"&Microsoft.VisualBas
> > ic
> > .ChrW(10))
> > Line 73: End If
> > Line 74:
> > __output.Write(""&Microsoft.VisualBasic.ChrW(10)&"<br><p
> > align=3D""center"">Location: 6 N. Jackson St., P.O. Box 156,=20
> Newark, IL
> > 60541<br>Phone: 815-695-5851 / Fax: 815-695-5804<br><A=20
> >=20
> href=3D""hours.asp#hours"">Hours</a></p></td></tr>"&Microsoft.Vi
> sualBasic.
> >=20
> ChrW(10)&Microsoft.VisualBasic.ChrW(9)&"<tr>"&Microsoft.VisualBasic.Ch
> > rW=20
> >=20
> (10)&Microsoft.VisualBasic.ChrW(9)&Microsoft.VisualBasic.ChrW(9)&"<td
> > align=3D""center"" bgcolor=3D""#696969""><A href=3D""aboutus.asp""
> > class=3D""bottomlink"">About Us</a> <A=20
> > href=3D""catalog.asp""
> > class=3D""bottomlink"">Catalog</a> <A=20
> href=3D""events.asp""
> > class=3D""bottomlink"">Programs & Events</a> <A =
> > href=3D""community.asp""
> > class=3D""bottomlink"">Community</a> <A
> > href=3D""resources.asp"" class=3D""bottomlink"">Resources</a><br><A
> > href=3D""contactus.asp"" class=3D""bottomlink"">Contact=20
> Us</a></td></tr>=20
> >=20
> </table>"&Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(10
> > )&=20
> >=20
> Microsoft.VisualBasic.ChrW(10)&Microsoft.VisualBasic.ChrW(10)&"</body>
> > "&
> >=20
> 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 =3D=20
> 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=20
> GetTypeHashCode() As Integer
> > Line 88: Return 1885199894
> > Line 89: End Function
> > Line 90: End Class
> > Line 91: End Namespace
> >=20
> >=20
> > > -----Original Message-----
> > > From: Rafael Teixeira [mailto:monoman@gmail.com]
> > > Sent: Wednesday, March 02, 2005 12:20 PM
> > > To: Chesko, Ron
> > > Cc: mono-vb@lists.ximian.com; mono-devel-list
> > > Subject: Re: [mono-vb] BC29999 error
> > >
> > > try rpm --nodeps just for xsp after installing all the others,=20
> > > normally
> > >
> > > HIH, :)
> > >
> > >
> > > On Wed, 2 Mar 2005 12:05:07 -0600, Chesko, Ron=20
> <ronc@palsnet.info>=20
> > > wrote:
> > > > Hey Rafael,
> > > >
> > > > This is the only page that I am having problems with in the=20
> > > > current site I am testing (we have about 4 or 5 sites=20
> that we host=20
> > > > that are using VB.NET). The other pages in this site seem to be=20
> > > > 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 =3D=20
> 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=20
> > > > listing is
> > > > blank:
> > > >
> > > >
> > > > Error message: (0,0) : error : THIS IS STILL ALPHA AND=20
> UNSUPPORTED=20
> > > > SOFTWARE, USE AT YOUR OWN RISK. /tmp/94557.vb(52,0) :=20
> 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=20
> mono(Mono.Posix) =3D
> > > > 1.0.5000.0
> > > > xsp-1.0.6-1.novell.9.1 requires mono(System) =
=3D
> > > > 1.0.5000.0
> > > > xsp-1.0.6-1.novell.9.1 requires
> > > mono(System.Data) =3D
> > > > 1.0.5000.0
> > > > xsp-1.0.6-1.novell.9.1 requires=20
> mono(System.Web) =3D
> > > > 1.0.5000.0
> > > > xsp-1.0.6-1.novell.9.1 requires
> > > > mono(System.Web.Services) =3D 1.
> > > > 0.5000.0
> > > > xsp-1.0.6-1.novell.9.1 requires=20
> mono(System.Xml) =3D
> > > > 1.0.5000.0
> > > > xsp-1.0.6-1.novell.9.1 requires=20
> mono(mscorlib) =3D
> > > > 1.0.5000.0
> > > >
> > > > Any ideas?
> > > >
> > > > Thanks,
> > > > Ron
> > > >
> > > > > -----Original Message-----
> > > > > From: Rafael Teixeira [mailto:monoman@gmail.com]
> > > > > Sent: Wednesday, March 02, 2005 11:47 AM
> > > > > To: Chesko, Ron
> > > > > Cc: mono-vb@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=20
> mbas in quiet=20
> > > > > mode, but I recall doing so only in the 1.1.x development=20
> > > > > series, and not backporting it to the 1.0.x stable series.
> > > > >
> > > > > We are currently recommending users to use the latest 1.1.x=20
> > > > > 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=20
> > > > > VB.NET pages...
> > > > >
> > > > > HIH,
> > > > >
> > > > >
> > > > > On Wed, 2 Mar 2005 09:39:52 -0600, Chesko, Ron
> > > <ronc@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: '
> > > > > >
> > > > >
> > >=20
> --------------------------------------------------------------------
> > > > > --
> > > > > > --
> > > > > > ------
> > > > > > 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: '
> > > > > >
> > > > >
> > >=20
> --------------------------------------------------------------------
> > > > > --
> > > > > > --
> > > > > > ------
> > > > > > Line 10:
> > > > > > Line 11: Option Explicit Off
> > > > > > Line 12: Option Strict On
> > > > > > Line 13:
> > > > > > Line 14: Imports Microsoft.VisualBasic Line 15:=20
> Imports System=20
> > > > > > Line
> > > > > > 16: Imports System.Collections Line 17: Imports=20
> > > > > > System.Collections.Specialized Line 18: Imports
> > > > > System.Configuration
> > > > > > Line 19: Imports System.Text Line 20: Imports=20
> > > > > > 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=20
> > > > > > 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=20
> Boolean =3D False
> > > > > > Line 35:
> > > > > > Line 36: Private Shared __autoHandlers As Integer
> > > > > > Line 37:
> > > > > > Line 38: Public Sub New()
> > > > > > Line 39: If ((ASP.contactus_aspx.__intialized =
=3D
> > > > > False)) Then
> > > > > > Line 40: =20
> ASP.contactus_aspx.__intialized =3D 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 =3D 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=3D""Heading"">Contact
> > > > > > Us</h2>"&Microsoft.VisualBasic.Strings.ChrW(10))
> > > > > > Line 67: if Request.QueryString( "thanks" )
> > > =3D "yes" then
> > > > > > Line 68: 'form has been sucessfully submitted
> > > > > > Line 69: 'show a thank you message
> > > > > > Line 70: response.write ("<p><b>Thank You=20
> 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:
> > > > > >
> > > > >
> > >=20
> __output.Write(""&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.V
> > > > > is
> > > > > > ua
> > > > > >
> > > > >
> > >=20
> 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
> > > > > >
> > > > >
> > >=20
> suggestions.</p>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.V
> > > > > is
> > > > > > ua
> > > > > >
> > > > >
> > >=20
> lBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&Microso
> > > > > ft
> > > > > > .V
> > > > > >
> > > > >
> > >=20
> isualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(9)&Mi
> > > > > cr
> > > > > > os oft.VisualBasic.Strings.ChrW(9)&"<form
> > > > > > action=3D""http://palsnet.info/cgi-bin/formmail.pl""
> > > > > >
> > > > >
> > >=20
> METHOD=3D""POST"">"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.V
> > > > > is
> > > > > > ua
> > > > > >
> > > lBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<inp
> > > > > > ut type=3D""hidden"" name=3D""recipient""
> > > > > >
> > > > >
> > >=20
> value=3D""laheiden@cbplib.us"">"&Microsoft.VisualBasic.Strings.ChrW(10
> > > > > )&
> > > > > > Mi
> > > > > >
> > > > >
> > >=20
> crosoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.Ch
> > > > > rW
> > > > > > (9 )&"<input type=3D""hidden"" name=3D""subject"" =
value=3D""C.B.
> > > > > > Phillips Contact Us Form
> > > > > >
> > > > >
> > >=20
> Input"">"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBas
> > > > > ic
> > > > > > .S=20
> > > > > > trings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<input
> > > > > > type=3D""hidden""
> > > value=3D""http://cbplib.us/contactus.asp?thanks=3Dyes""
> > > > > >
> > > > >
> > >=20
> name=3D""redirect"">"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft
> > > > > .V
> > > > > > is
> > > > > >
> > > > >
> > >=20
> ualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<tab
> > > > > le
> > > > > >
> > > > >
> > >=20
> width=3D""100%"">"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.Vi
> > > > > su
> > > > > > al
> > > > > >
> > > > >
> > >=20
> Basic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<tr>"&M
> > > > > ic
> > > > > > ro
> > > > > >
> > > > >
> > >=20
> soft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW
> > > > > (9
> > > > > > )&
> > > > > >
> > > > >
> > >=20
> Microsoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.
> > > > > Ch
> > > > > > rW
> > > > > > (9)&"<td
> > > > > >
> > > > >
> > >=20
> valign=3D""top"">Name:</td>"&Microsoft.VisualBasic.Strings.ChrW(10)&Mi
> > > > > cr
> > > > > > os
> > > > > >
> > > > >
> > >=20
> oft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9
> > > > > )&
> > > > > > Mi crosoft.VisualBasic.Strings.ChrW(9)&"<td
> > > valign=3D""top""><input
> > > > > > TYPE=3DTEXT NAME=3D""name"" tabindex=3D""1""
> > > > > >
> > > > >
> > >=20
> maxsize=3D""75""></input></td>"&Microsoft.VisualBasic.Strings.ChrW(10)
> > > > > &M
> > > > > > ic
> > > > > >
> > > > >
> > >=20
> rosoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.Chr
> > > > > W(
> > > > > > 9)
> > > > > >
> > > > >
> > >=20
> &"</tr>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.
> > > > > > St
> > > > > >
> > > > >
> > >=20
> rings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<tr>"&Microsoft
> > > > > .V
> > > > > > is
> > > > > >
> > > > >
> > >=20
> ualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(9)&Micr
> > > > > os
> > > > > > of
> > > > > >
> > > > >
> > >=20
> t.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&
> > > > > "<
> > > > > > td
> > > > > >
> > > > >
> > >=20
> valign=3D""top"">Email:</td>"&Microsoft.VisualBasic.Strings.ChrW(10)&M
> > > > > ic
> > > > > > ro
> > > > > >
> > > > >
> > >=20
> soft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(
> > > > > 9)
> > > > > > &M icrosoft.VisualBasic.Strings.ChrW(9)&"<td
> > > valign=3D""top""><input
> > > > > > TYPE=3DTEXT NAME=3D""email"" tabindex=3D""2""
> > > > > >
> > > > >
> > >=20
> maxsize=3D""75""></input></td>"&Microsoft.VisualBasic.Strings.ChrW(10)
> > > > > &M
> > > > > > ic
> > > > > >
> > > > >
> > >=20
> rosoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.Chr
> > > > > W(
> > > > > > 9)
> > > > > >
> > > > >
> > >=20
> &"</tr>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.
> > > > > > St
> > > > > >
> > > > >
> > >=20
> rings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"<tr>"&Microsoft
> > > > > .V
> > > > > > is
> > > > > >
> > > > >
> > >=20
> ualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(9)&Micr
> > > > > os
> > > > > > of
> > > > > >
> > > > >
> > >=20
> t.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&
> > > > > "<
> > > > > > td
> > > > > >
> > > > >
> > >=20
> valign=3D""top"">Comments:</td>"&Microsoft.VisualBasic.Strings.ChrW(10
> > > > > )&
> > > > > > Mi
> > > > > >
> > > > >
> > >=20
> crosoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.Ch
> > > > > rW
> > > > > > (9 )&Microsoft.VisualBasic.Strings.ChrW(9)&"<td
> > > > > > valign=3D""top""><textarea NAME=3D""COMMENTS"" ROWS=3D7
> > > > > >
> > > > >
> > >=20
> tabindex=3D""3""></textarea></td>"&Microsoft.VisualBasic.Strings.ChrW(
> > > > > 10
> > > > > > )&
> > > > > >
> > > > >
> > >=20
> Microsoft.VisualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.
> > > > > Ch
> > > > > > rW
> > > > > >
> > > > >
> > >=20
> (9)&"</tr>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualB
> > > > > as
> > > > > > ic
> > > > > >
> > > > >
> > >=20
> .Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"</table>"&Mi
> > > > > cr
> > > > > > os
> > > > > >
> > > > >
> > >=20
> oft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(
> > > > > 9)
> > > > > > &M
> > > > > >
> > > > >
> > >=20
> 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=3D""center""><input type=3D""submit""
> > > name=3D""Submit""
> > > > > > value=3D""Submit""> <input type=3D""reset""
> > > name=3D""Reset""
> > > > > >
> > > > >
> > >=20
> value=3D""Reset""></p>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microso
> > > > > ft
> > > > > > .V
> > > > > >
> > > > >
> > >=20
> isualBasic.Strings.ChrW(9)&Microsoft.VisualBasic.Strings.ChrW(9)&"</
> > > > > fo
> > > > > > rm
> > > > > > >"&Microsoft.VisualBasic.Strings.ChrW(10))
> > > > > > Line 73: End If
> > > > > > Line 74:
> > > > > >=20
> __output.Write(""&Microsoft.VisualBasic.Strings.ChrW(10)&"<br>
> > > > > > <p
> > > > > > align=3D""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=3D""hours.asp#hours"">Hours</a></p></td></tr>"&Microsoft.Vi
> > > > > sualBasic.
> > > > > >
> > > > > Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(9)&"<tr>"&
> > > > > Microsoft.
> > > > > >
> > > > >
> > >=20
> VisualBasic.Strings.ChrW(10)&Microsoft.VisualBasic.Strings.ChrW(9)&M
> > > > > ic
> > > > > > ro soft.VisualBasic.Strings.ChrW(9)&"<td align=3D""center""
> > > > > > bgcolor=3D""#696969""><A href=3D""aboutus.asp""
> > > > > class=3D""bottomlink"">About
> > > > > > Us</a> <A href=3D""catalog.asp""
> > > > > > class=3D""bottomlink"">Catalog</a> <A
> > > > > href=3D""events.asp""
> > > > > > class=3D""bottomlink"">Programs &
> > > Events</a> <A
> > > > > > href=3D""community.asp""
> > > > > > class=3D""bottomlink"">Community</a> <A
> > > > > > href=3D""resources.asp""=20
> > > > > > class=3D""bottomlink"">Resources</a><br><A
> > > > > > href=3D""contactus.asp"" class=3D""bottomlink"">Contact
> > > > > Us</a></td></tr>
> > > > > >
> > > > >
> > >=20
> </table>"&Microsoft.VisualBasic.Strings.ChrW(10)&Microsoft.VisualBas
> > > > > ic
> > > > > > .S
> > > > > >
> > > > >
> > >=20
> 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: =20
> __ctrl.SetRenderMethodDelegate(AddressOf
> > > > > > Me.__RenderTree)
> > > > > > Line 79: End Sub
> > > > > > Line 80:
> > > > > > Line 81: Protected Overrides Sub=20
> FrameworkInitialize()
> > > > > > Line 82: Me.TraceModeValue =3D
> > > > > 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=3D1
> > > > > > Line 93: End Namespace
> > > > > > Line 94: 'Indent=3D0
> > > > > >
> > > > > > Here is the source for the page:
> > > > > >
> > > > > > <%@ LANGUAGE =3D VBScript %>
> > > > > > <h2 class=3D"Heading">Contact Us</h2> <% if=20
> Request.QueryString(=20
> > > > > > "thanks" ) =3D "yes" then
> > > > > > 'form has been sucessfully submitted
> > > > > > 'show a thank you message
> > > > > > response.write ("<p><b>Thank You For Contacting=20
> > > > > > Us</b></p><p>If your inp ut requires us to contact=20
> you and you=20
> > > > > > have provided us with your contact informa tion we=20
> will be in=20
> > > > > > touch with you soon.</p>") else %>
> > > > > > <p>Please fill in the form below=20
> and submit it=20
> > > > > > with your comment s or suggestions.</p>
> > > > > >
> > > > > > <form
> > > > > action=3D"http://palsnet.info/cgi-bin/formmail.pl"
> > > > > > METHOD=3D"P
> > > > > > OST">
> > > > > > <input type=3D"hidden" name=3D"recipient"
> > > > > > value=3D"laheiden@cbplib.us"
> > > > > > >
> > > > > > <input type=3D"hidden" name=3D"subject"=20
> value=3D"C.B.
> > > > > > Phillips Contact Us Form Input">
> > > > > > <input type=3D"hidden"
> > > > > > value=3D"http://cbplib.us/contactus.asp?thank
> > > > > > s=3Dyes" name=3D"redirect">
> > > > > > <table width=3D"100%">
> > > > > > <tr>
> > > > > > <td valign=3D"top">Name:</td>
> > > > > > <td valign=3D"top"><input =
TYPE=3DTEXT
> > > > > NAME=3D"name"
> > > > > > tabindex=3D"
> > > > > > 1" maxsize=3D"75"></input></td>
> > > > > > </tr>
> > > > > > <tr>
> > > > > > <td valign=3D"top">Email:</td>
> > > > > > <td valign=3D"top"><input =
TYPE=3DTEXT
> > > > > NAME=3D"email"
> > > > > > tabindex=3D
> > > > > > "2" maxsize=3D"75"></input></td>
> > > > > > </tr>
> > > > > > <tr>
> > > > > > <td valign=3D"top">Comments:</td>
> > > > > > <td valign=3D"top"><textarea
> > > NAME=3D"COMMENTS"
> > > > > > ROWS=3D7 tabind
> > > > > > ex=3D"3"></textarea></td>
> > > > > > </tr>
> > > > > > </table>
> > > > > >
> > > > > > <p align=3D"center"><input type=3D"submit"
> > > name=3D"Submit"
> > > > > > value=3D"Subm
> > > > > > it"> <input type=3D"reset" name=3D"Reset"
> > > value=3D"Reset"></p>
> > > > > > </form>
> > > > > > <% End If %>
> > > > > > <!--#include file=3D"includes/bottom.inc"-->
> > > > > >
> > > > > > Ron Chesko
> > > > > > Senior Associate Network Services Prarie Area=20
> Library System=20
> > > > > > http://www.palsnet.info/
> > > > > >
> > > > > > _______________________________________________
> > > > > > Mono-vb mailing list
> > > > > > Mono-vb@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=20
> > > > > 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=20
> > > enlightment.
> > >
> >=20
>=20
>=20
> --
> Rafael "Monoman" Teixeira
> ---------------------------------------
> I'm trying to become a "Rosh Gadol" before my own eyes.=20
> See http://www.joelonsoftware.com/items/2004/12/06.html for=20
> enlightment.
>=20