freelanceprogrammers.org Forum Index » ASP

Re: aspclassic to ASP.NET ..................................


View user's profile Post To page top
System-Administrator@... Posted: Mon Jan 03, 2005 10:47 am


Joined: 03 Jan 2005

Posts: 15
Re: aspclassic to ASP.NET ..................................
So far I did manage to get the repeater to work and made the member page
listing :)
http://webslave/btcNET/ViewBTCMemberIndex.aspx and thanks to al that have
help so far thank you.


I am not making my Sql String correctly I guess as the code below results in
an error also listed after the code. What I am attempting to do is just get
the record with the member that was clicked from the preceding page. Then I
will display it on the page.


<CODE>


`---------- Get Playingname from Querystring ------

Dim strPlayingName As String

strPlayingName = Request.QueryString("PlayingName")



Dim strSQLstring As String

strSQLstring = "SELECT * FROM tblBTC WHERE PlayingName LIKE " &
strPlayingName

`--------------------------------



`Create a DataAdapter ------------------------------------

Dim objDataAdapter As OleDbDataAdapter

`objDataAdapter = New OleDbDataAdapter("SELECT * FROM tblBTC", objConn)

objDataAdapter = New OleDbDataAdapter(strSQLstring, objConn)


</CODE>




Syntax error (missing operator) in query expression `PlayingName LIKE
Hudson[BTC]`.
Description: An unhandled exception occurred during the execution of the
current web request. Please review the stack trace for more information
about the error and where it originated in the code.

Exception Details: System.Data.OleDb.OleDbException: Syntax error (missing
operator) in query expression `PlayingName LIKE Hudson[BTC]`.

Source Error:

An unhandled exception was generated during the execution of the
current web request. Information regarding the origin and location of the
exception can be identified using the exception stack trace below.

Stack Trace:

[OleDbException (0x80040e14): Syntax error (missing operator) in query
expression `PlayingName LIKE Hudson[BTC]`.]





Mike Belcher
Independant Computer Consultant
Email: mbelcher@...



Have a nice day.
----- Original Message -----
From: "Ben Miller" <mylists@...>
To: <AspNetAnyQuestionIsOk@yahoogroups.com>
Sent: Wednesday, December 29, 2004 12:05 PM
Subject: Re: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET


>
> I have attached a Repeater definition that should work.
>
> This should generate the correct looking layout that you have on your site
> currently. All you need is a DataTable with the data using the same
> fieldnames that you had in your objRS("fieldname") stuff.
>
> Ben Miller
>
> ----- Original Message -----
> From: Ben Miller
> To: AspNetAnyQuestionIsOk@yahoogroups.com
> Sent: Wednesday, December 29, 2004 9:36 AM
> Subject: Re: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET
>
>
> Looking at the page referenced below, you have a great example of using a
> DataList or a Repeater control. DataList will generate beginning table
> and
> ending table tags and you can form the layout inside like you have. If
> you
> use a Repeater then you have full control of the HTML and table tags to
> get
> what you want.
>
> This is not that bad, as you would have a databinding statement wherever
> you
> have the objRS("fieldname") and the rest would remain the same.
>
> HTH. I will reply with a template if I get time today.
>
> Ben Miller
>
> ----- Original Message -----
> From: System-Administrator@...
> To: AspNetAnyQuestionIsOk@yahoogroups.com
> Sent: Tuesday, December 28, 2004 9:49 PM
> Subject: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET
>
>
> I am in the process of converting an aspclassic website I have over to
> asp.net before I do anything more with it. I would like it to do at least
> what it is able to do now. It has custom views I made with aspclassic and
> forms to edit etc.... I am having issues at the moment just making a
> simple
> connection to a .MDB file. I can go into server explorer and make the
> connection using visual studio .net no problem but its
> LONG....................... I also want to make data generate in the way
> it
> does not with asp classic. The site is www.belchingtoadclan.com and it is
> a
> little old but before adding more features to it I want to convert it
> over.
> Some things are confusing in how to get the same results in .net. Like a
> page to list the members of the gaming clan
>
> http://belchingtoadclan.gotdns.com/btc2/_Scripts/ViewBTCMemberIndex.asp
>
>
> that lists the members. How can I make the same custom type page
> generation in .net? If you click on a member there is another custom
> generated page. SO far in .net its datagrids etc but that isn`t what I
> need.
> Here is the code from the page listed above its OLD. As far as included
> content goes I got that figured out. Its the building of the page the way
> it
> is done now and making that happen in .NET - This is the best list there
> is
> so I posted here. Thank you.
>
>
> <CODE>
> <%@ Language=VBScript %>
> <% Option Explicit %>
> <!--#include file="adovbs.inc"-->
> <!--#include file="DatabaseConnect.asp"-->
>
> <HTML><head>
>
> <style>
> <!--
> .bodyfont { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE:
> 9pt; }
> .lrgheader { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE:
> 9pt; FONT-WEIGHT: 700; }
> .header { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE: 8pt;
> FONT-WEIGHT: 700; }
> .content { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE:
> 7pt;
> FONT-WEIGHT: 400; }
> -->
> </style>
>
> <STYLE>BODY {
> SCROLLBAR-FACE-COLOR: #000000; SCROLLBAR-HIGHLIGHT-COLOR: #000000;
> SCROLLBAR-SHADOW-COLOR: #000000; SCROLLBAR-ARROW-COLOR: #000000;
> SCROLLBAR-TRACK-COLOR: #000000; SCROLLBAR-DARKSHADOW-COLOR: #000000
> }
> </style>
>
> <style fprolloverstyle>A:hover {color: #00FF00; font-weight: bold}
> </style>
>
>
>
>
>
> </head>
> <body bgcolor="#000000" text="#C0C0C0" link="#FFFFFF" vlink="#FFFFFF"
> alink="#FFFFFF" background="../_Images/right.gif" bgproperties="fixed">
> <div align="center">
> <table border="0" cellpadding="0" cellspacing="0" width="572">
> <tr>
> <td>
> <!--webbot bot="Include" U-Include="../MenuSystem/Menu.htm"
> TAG="BODY" --></td>
> </tr>
> <tr>
> <td>
> <br>
> &nbsp;<div align="center">
> <div align="center">
> <table border="1" cellpadding="3" cellspacing="0" width="383"
> id="table3" bordercolorlight="#666666" bordercolordark="#333333">
> <tr>
> <td nowrap background="../_Images/Development/metal3Dark.gif">
> <p align="center"><font face="Verdana" size="5" color="#808000">
> <b>B</b>elching
> <b>T</b>oad <b>C</b>lan Members</font></td>
> </tr>
> </table>
> </div>
> </div>
> </td>
> </tr>
> </table>
> </div>
> <%
> `AUTHOR MIKE BELCHER
> `THIS WILL LIST THE MEMBERS
> %>
>
> <%
> `create a SQL statement to list the Events by ProgramStart
>
>
>
> Dim strSQL
> strSQL = "SELECT * FROM tblBTC" & " ORDER BY DateJoined"
>
> Dim objRS
> Set objRS = Server.CreateObject("ADODB.Recordset")
> objRS.Open strSQL, objConn
>
> Response.Write "<center><table border=""0"" width=""575""
> cellpadding=""0"" cellspacing=""0"" height=""303"">"
> Response.Write "<tr>"
> Response.Write "<td>"
>
> Dim strLink, strPlayingName, strLocation, strCounter, strEmail
> Response.Write "<BR><BR><center>"
>
> strCounter = 0
> Do While Not objRS.EOF
> strCounter = strCounter + 1
> strPlayingName = objRS("PlayingName")
> strEmail = objRS("Email")
> strPlayingName = Server.URLEncode(strPlayingName)
>
> strPlayingName=Replace(strPlayingName, "~", "%7E")` tilde
> strPlayingName=Replace(strPlayingName, "`", "%60")` `
> strPlayingName=Replace(strPlayingName, "!", "%21")` exclamation
> strPlayingName=Replace(strPlayingName, "@", "%40")` @
> strPlayingName=Replace(strPlayingName, "#", "%23")` pound
> strPlayingName=Replace(strPlayingName, "$", "%24")` dollar sign
> `strPlayingName=Replace(strPlayingName, "%", "%2525")` percent sign
> strPlayingName=Replace(strPlayingName, "^", "%5E")` exponent
> strPlayingName=Replace(strPlayingName, "&", "%26")` and
> strPlayingName=Replace(strPlayingName, "*", "%2A")` and
> strPlayingName=Replace(strPlayingName, "(", "%28")` (
> strPlayingName=Replace(strPlayingName, ")", "%29")` )
> strPlayingName=Replace(strPlayingName, ",", "%2C")` comma
> strPlayingName=Replace(strPlayingName, "`", "%27")` apostrophe
> strPlayingName=Replace(strPlayingName, "-", "%2D")` dash
> strPlayingName=Replace(strPlayingName, "_", "%5F")` underscore
> strPlayingName=Replace(strPlayingName, "+", "%20")` plus
> strPlayingName=Replace(strPlayingName, "=", "%3D")` equal
> strPlayingName=Replace(strPlayingName, "{", "%7B")` left bracket
> strPlayingName=Replace(strPlayingName, "}", "%7D")` right bracket
> strPlayingName=Replace(strPlayingName, "[", "%5B")` [
> strPlayingName=Replace(strPlayingName, "]", "%5D")` [
> strPlayingName=Replace(strPlayingName, "|", "%7C")` |
> strPlayingName=Replace(strPlayingName, "", "%5C")`
> strPlayingName=Replace(strPlayingName, "/", "%2F")` /
> strPlayingName=Replace(strPlayingName, ":", "%3A")` :
> strPlayingName=Replace(strPlayingName, ";", "%3B")` ;
> `strPlayingName=Replace(strPlayingName, """, "%22")` qoute
> strPlayingName=Replace(strPlayingName, "<", "%3C")` <
> strPlayingName=Replace(strPlayingName, ">", "%3E")` >
> strPlayingName=Replace(strPlayingName, ".", "%2E")` .
>
>
> Response.Write "<table border=""0"" width=""780"" cellpadding=""3""
> cellspacing=""3"" id=""table2""><tr>"
> Response.Write "<td width=""50""
> background=""../_Images/Development/bg2.gif""><br></td><td>"
> Response.Write "<div align=""center"">"
> Response.Write "<table border=""2"" cellpadding=""3"" cellspacing=""0""
> width=""100%"" align=""left"" id=""table3""
> background=""../_Images/Development/metal3Dark.gif""
> bordercolorlight=""#666666"" bordercolordark=""#333333""
> bgcolor=""#292929"">"
> Response.Write "<tr>"
> Response.Write "<td><font face=""Verdana""><B><BIG><BIG>"
> Response.Write "<font size=""5"" color=""#C0C0C0"">"
> Response.Write "<a href=`../_scripts/ViewBTCMemberfromindex.asp?" &
> objRS("PlayingName") & "`>" & objRS("PlayingName") &
> "<a/></font></BIG></BIG></B>"
> Response.Write "</font><font color=""#008000""><font face=""Verdana""
> size=""2""><b><br>"
> Response.Write "JOINED: </b><font color=""#00ff00"">" &
> objRS("DateJoined") & "<br></font></font>"
> Response.Write "<font face=""Verdana"" size=""2""
> color=""#008000""><b>NAME:</b><font color=""#00ff00"">" & objRS("Name") &
> "</font></font>"
> Response.Write "<font color=""#008000"" face=""Verdana"" size=""4""><br>"
> Response.Write "</font><font face=""Verdana"" size=""2""
> color=""#008000""><b>AGE:</b> <font color=""#00ff00"">" & objRS("Age") &
> "</font></font>"
> Response.Write "<font face=""Verdana"" size=""4""><br></font></font>"
> Response.Write "<font face=""Verdana"" color=""#008000""
> size=""2""><b>LOCATION:</b> <font color=""#00ff00"">" & objRS("Location")
> &
> "</font></font>"
> Response.Write "<SMALL><font face=""Verdana""
> color=""#0080FF""><br></FONT></SMALL>"
> Response.Write "<font face=""Verdana"" color=""#008000""
> size=""2""><b>EMAIL:</b> <font color=""#00ff00""><a href=`mailto:" &
> strEmail & "?Subject=Mail from BelchingToadClan Members Page`>" &
> objRS("Email") & "</a></font></font>"
> Response.Write "<font face=""Verdana"" size=""4""
> color=""#008000""><br></font>"
> Response.Write "<font face=""Verdana"" color=""#008000""
> size=""2""><b>AIM:</b> <font color=""#00ff00""><A
> href=""aim:goim?screenname=" & objRS("Aim") & """>" & objRS("Aim") &
> "</A></font></font><br>"
> Response.Write "<font face=""Verdana"" size=""2""
> color=""#008000""><b>ICQ:</b><font color=""#00ff00"">" & objRS("Icq") &
> "<br></font>"
> Response.Write "<b>CONNECTION:</b></font><font face=""Verdana""
> size=""2""
> color=""#00FF00"">" & objRS("Connect") & "</font>"
> Response.Write "</td>"
> Response.Write "</tr>"
> Response.Write "</table>"
> Response.Write "</div>"
> Response.Write "&nbsp;</td>"
> Response.Write "<td width=""268""
> background=""../_Images/Development/bg2.gif"">"
> Response.Write "&nbsp;</td></tr><tr>"
> Response.Write "<td width=""50"">"
> Response.Write "<br>"
> Response.Write "&nbsp;</td><td>"
> Response.Write "&nbsp;</td>"
> Response.Write "<td width=""268"">"
> Response.Write "&nbsp;</td></tr></table>"
>
>
>
> `Response.Write "<B><img src=""../_Images/sarge.gif"" width=""21""
> height=""32"" border=""0""><BIG><BIG><a class=""roll""
> href=`../_scripts/ViewBTCMemberfromindex.asp?" & objRS("PlayingName") &
> "`>"
> & objRS("PlayingName") & "</a></B></BIG></BIG></FONT><BR> "
> `Response.Write "<SMALL><font face=""Verdana"" color=""#0080FF"">" &
> objRS("Location") & "</FONT></SMALL><BR>"
> `Response.Write "<SMALL><a href=`mailto:" & strEmail & "?Subject=Mail
> from
> BelchingToadClan Members Page`>" & objRS("Email") & "</a></B></SMALL>"
> `Response.Write "<BR><BR><BR>"
> objRS.MoveNext
> Loop
> `Response.Write "<BIG>THERE ARE CURRENTLY <B>[" & strCounter & "]</B> BTC
> MEMBERS</BIG><br>"
> `Response.Write "</td>"
> `Response.Write "</tr><tr><td width=""575""><!--webbot bot=""Include""
> U-Include=""../Footer.htm"" TAG=""BODY"" startspan --></td></table>"
>
>
> %>
>
> <p>&nbsp;</p>
>
> <%
> objRS.Close
> Set objRS = Nothing
> objConn.Close
> Set objConn = Nothing
> %>
> </FONT>
> <!--webbot bot="Include" U-Include="../MenuSystem/Footer.htm"
> TAG="BODY" -->
> </BODY>
> </HTML>
> </CODE>
>
>
>
> Mike Belcher
> Independant Computer Consultant
>
> Email: mbelcher@...
>
>
> [Non-text portions of this message have been removed]
>
>
> Yahoo! Groups Sponsor
> ADVERTISEMENT
>
>
>
>
>
> ------------------------------------------------------------------------------
> Yahoo! Groups Links
>
> a.. To visit your group on the web, go to:
> http://groups.yahoo.com/group/AspNetAnyQuestionIsOk/
>
> b.. To unsubscribe from this group, send an email to:
> AspNetAnyQuestionIsOk-unsubscribe@yahoogroups.com
>
> c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of
> Service.
>
>
>
> [Non-text portions of this message have been removed]
>
>
> Yahoo! Groups Sponsor
> ADVERTISEMENT
>
>
>
>
>
>
> Yahoo! Groups Links
>
> To visit your group on the web, go to:
> http://groups.yahoo.com/group/AspNetAnyQuestionIsOk/
>
> To unsubscribe from this group, send an email to:
> AspNetAnyQuestionIsOk-unsubscribe@yahoogroups.com
>
> Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
>
> ----------
>
> <asp:Repeater id="ClanMembersList" runat="server">
> <HeaderTemplate>
> <table border="0" width="780" cellpadding="3" cellspacing="3">
> <tr>
> </HeaderTemplate>
> <ItemTemplate>
> <td width="50" background="../_Images/Development/bg2.gif"><br></td>
> <td>
> <div align="center">
> <table border="2" cellpadding="3" cellspacing="0" width="100%"
> align="left" id="table3"
> background="../_Images/Development/metal3Dark.gif"
> bordercolorlight="#666666" bordercolordark="#333333" bgcolor="#292929">
> <tr>
> <td><font face="Verdana"><B><BIG><BIG>
> <font size="5" color="#C0C0C0">
> <a href=`../_scripts/ViewBTCMemberfromindex.asp?<%#
> DataBinder.Eval(Container.DataItem, "PlayingName") %>`><%#
> DataBinder.Eval(Container.DataItem, "PlayingName")
> %><a/></font></BIG></BIG></B>
> </font><font color="#008000"><font face="Verdana" size="2"><b><br>
> JOINED: </b><font color="#00ff00"><%# DataBinder.Eval(Container.DataItem,
> "DateJoined") %><br></font></font>
> <font face="Verdana" size="2" color="#008000"><b>NAME:</b><font
> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Name")
> %></font></font>
> <font color="#008000" face="Verdana" size="4"><br>
> </font><font face="Verdana" size="2" color="#008000"><b>AGE:</b> <font
> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Age")
> %></font></font>
> <font face="Verdana" size="4"><br></font></font>
> <font face="Verdana" color="#008000" size="2"><b>LOCATION:</b> <font
> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Location")
> %></font></font>
> <SMALL><font face="Verdana" color="#0080FF"><br></FONT></SMALL>
> <font face="Verdana" color="#008000" size="2"><b>EMAIL:</b> <font
> color="#00ff00"><a href=`mailto:<%# DataBinder.Eval(Container.DataItem,
> "Email") %>?Subject=Mail from BelchingToadClan Members Page`><%#
> DataBinder.Eval(Container.DataItem, "Email") %></a></font></font>
> <font face="Verdana" size="4" color="#008000"><br></font>
> <font face="Verdana" color="#008000" size="2"><b>AIM:</b> <font
> color="#00ff00"><A href=`aim:goim?screenname=<%#
> DataBinder.Eval(Container.DataItem, "Aim") %>`><%#
> DataBinder.Eval(Container.DataItem, "Aim") %></A></font></font><br>
> <font face="Verdana" size="2" color="#008000"><b>ICQ:</b><font
> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Icq")
> %><br></font>
> <b>CONNECTION:</b></font><font face="Verdana" size="2" color="#00FF00"><%#
> DataBinder.Eval(Container.DataItem, "Connect") %></font>
> </td>
> </tr>
> </table>
> </div>&nbsp;
> </td>
> <td width="268" background="../_Images/Development/bg2.gif">&nbsp;</td>
> </tr>
> <tr>
> <td width="50">
> <br>&nbsp;
> </td>
> <td>&nbsp;
> </td>
> <td width="268">&nbsp;
> </td>
> </ItemTemplate>
> <FooterTemplate>
> </tr>
> </table>
> </FooterTemplate>
> </asp:Repeater>
>
>
>
> [Non-text portions of this message have been removed]
>
>
>
>
>
> Yahoo! Groups Links
>
>
>
>
>
>
>
>
Reply with quote
Send private message
View user's profile Post To page top
jamil_h_t Posted: Mon Jan 03, 2005 2:32 pm


Joined: 07 Jan 2006

Posts: 7
Re: aspclassic to ASP.NET ..................................
hi all , how can i store an array after the postback in vb.net , if it is as
view state how can i use it

thank`s


---------------------------------
Do you Yahoo!?
All your favorites on one personal page – Try My Yahoo!

[Non-text portions of this message have been removed]
Reply with quote
Send private message
View user's profile Post To page top
ben4miller Posted: Mon Jan 03, 2005 7:16 pm


Joined: 05 Jan 2005

Posts: 3
Re: aspclassic to ASP.NET ..................................
You need to put ` (single quotes) around the data.

SELECT * FROM tblBTC WHERE PlayingName LIKE `" & strPlayingName & "`"

the above looks like (singlequote)(doublequote) & strPlayingName &
(doublequote)(singlequote)(doublequote)

The delimiter when using strings is the single quote.

Ben Miller

----- Original Message -----
From: System-Administrator@...
To: AspNetAnyQuestionIsOk@yahoogroups.com
Sent: Sunday, January 02, 2005 9:47 PM
Subject: Re: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET
.....................................


So far I did manage to get the repeater to work and made the member page
listing :)
http://webslave/btcNET/ViewBTCMemberIndex.aspx and thanks to al that have
help so far thank you.


I am not making my Sql String correctly I guess as the code below results in
an error also listed after the code. What I am attempting to do is just get
the record with the member that was clicked from the preceding page. Then I
will display it on the page.


<CODE>


`---------- Get Playingname from Querystring ------

Dim strPlayingName As String

strPlayingName = Request.QueryString("PlayingName")



Dim strSQLstring As String

strSQLstring = "SELECT * FROM tblBTC WHERE PlayingName LIKE " &
strPlayingName

`--------------------------------



`Create a DataAdapter ------------------------------------

Dim objDataAdapter As OleDbDataAdapter

`objDataAdapter = New OleDbDataAdapter("SELECT * FROM tblBTC", objConn)

objDataAdapter = New OleDbDataAdapter(strSQLstring, objConn)


</CODE>




Syntax error (missing operator) in query expression `PlayingName LIKE
Hudson[BTC]`.
Description: An unhandled exception occurred during the execution of the
current web request. Please review the stack trace for more information
about the error and where it originated in the code.

Exception Details: System.Data.OleDb.OleDbException: Syntax error (missing
operator) in query expression `PlayingName LIKE Hudson[BTC]`.

Source Error:

An unhandled exception was generated during the execution of the
current web request. Information regarding the origin and location of the
exception can be identified using the exception stack trace below.

Stack Trace:

[OleDbException (0x80040e14): Syntax error (missing operator) in query
expression `PlayingName LIKE Hudson[BTC]`.]





Mike Belcher
Independant Computer Consultant
Email: mbelcher@...



Have a nice day.
----- Original Message -----
From: "Ben Miller" <mylists@...>
To: <AspNetAnyQuestionIsOk@yahoogroups.com>
Sent: Wednesday, December 29, 2004 12:05 PM
Subject: Re: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET


>
> I have attached a Repeater definition that should work.
>
> This should generate the correct looking layout that you have on your site
> currently. All you need is a DataTable with the data using the same
> fieldnames that you had in your objRS("fieldname") stuff.
>
> Ben Miller
>
> ----- Original Message -----
> From: Ben Miller
> To: AspNetAnyQuestionIsOk@yahoogroups.com
> Sent: Wednesday, December 29, 2004 9:36 AM
> Subject: Re: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET
>
>
> Looking at the page referenced below, you have a great example of using a
> DataList or a Repeater control. DataList will generate beginning table
> and
> ending table tags and you can form the layout inside like you have. If
> you
> use a Repeater then you have full control of the HTML and table tags to
> get
> what you want.
>
> This is not that bad, as you would have a databinding statement wherever
> you
> have the objRS("fieldname") and the rest would remain the same.
>
> HTH. I will reply with a template if I get time today.
>
> Ben Miller
>
> ----- Original Message -----
> From: System-Administrator@...
> To: AspNetAnyQuestionIsOk@yahoogroups.com
> Sent: Tuesday, December 28, 2004 9:49 PM
> Subject: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET
>
>
> I am in the process of converting an aspclassic website I have over to
> asp.net before I do anything more with it. I would like it to do at least
> what it is able to do now. It has custom views I made with aspclassic and
> forms to edit etc.... I am having issues at the moment just making a
> simple
> connection to a .MDB file. I can go into server explorer and make the
> connection using visual studio .net no problem but its
> LONG....................... I also want to make data generate in the way
> it
> does not with asp classic. The site is www.belchingtoadclan.com and it is
> a
> little old but before adding more features to it I want to convert it
> over.
> Some things are confusing in how to get the same results in .net. Like a
> page to list the members of the gaming clan
>
> http://belchingtoadclan.gotdns.com/btc2/_Scripts/ViewBTCMemberIndex.asp
>
>
> that lists the members. How can I make the same custom type page
> generation in .net? If you click on a member there is another custom
> generated page. SO far in .net its datagrids etc but that isn`t what I
> need.
> Here is the code from the page listed above its OLD. As far as included
> content goes I got that figured out. Its the building of the page the way
> it
> is done now and making that happen in .NET - This is the best list there
> is
> so I posted here. Thank you.
>
>
> <CODE>
> <%@ Language=VBScript %>
> <% Option Explicit %>
> <!--#include file="adovbs.inc"-->
> <!--#include file="DatabaseConnect.asp"-->
>
> <HTML><head>
>
> <style>
> <!--
> .bodyfont { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE:
> 9pt; }
> .lrgheader { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE:
> 9pt; FONT-WEIGHT: 700; }
> .header { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE: 8pt;
> FONT-WEIGHT: 700; }
> .content { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE:
> 7pt;
> FONT-WEIGHT: 400; }
> -->
> </style>
>
> <STYLE>BODY {
> SCROLLBAR-FACE-COLOR: #000000; SCROLLBAR-HIGHLIGHT-COLOR: #000000;
> SCROLLBAR-SHADOW-COLOR: #000000; SCROLLBAR-ARROW-COLOR: #000000;
> SCROLLBAR-TRACK-COLOR: #000000; SCROLLBAR-DARKSHADOW-COLOR: #000000
> }
> </style>
>
> <style fprolloverstyle>A:hover {color: #00FF00; font-weight: bold}
> </style>
>
>
>
>
>
> </head>
> <body bgcolor="#000000" text="#C0C0C0" link="#FFFFFF" vlink="#FFFFFF"
> alink="#FFFFFF" background="../_Images/right.gif" bgproperties="fixed">
> <div align="center">
> <table border="0" cellpadding="0" cellspacing="0" width="572">
> <tr>
> <td>
> <!--webbot bot="Include" U-Include="../MenuSystem/Menu.htm"
> TAG="BODY" --></td>
> </tr>
> <tr>
> <td>
> <br>
> &nbsp;<div align="center">
> <div align="center">
> <table border="1" cellpadding="3" cellspacing="0" width="383"
> id="table3" bordercolorlight="#666666" bordercolordark="#333333">
> <tr>
> <td nowrap background="../_Images/Development/metal3Dark.gif">
> <p align="center"><font face="Verdana" size="5" color="#808000">
> <b>B</b>elching
> <b>T</b>oad <b>C</b>lan Members</font></td>
> </tr>
> </table>
> </div>
> </div>
> </td>
> </tr>
> </table>
> </div>
> <%
> `AUTHOR MIKE BELCHER
> `THIS WILL LIST THE MEMBERS
> %>
>
> <%
> `create a SQL statement to list the Events by ProgramStart
>
>
>
> Dim strSQL
> strSQL = "SELECT * FROM tblBTC" & " ORDER BY DateJoined"
>
> Dim objRS
> Set objRS = Server.CreateObject("ADODB.Recordset")
> objRS.Open strSQL, objConn
>
> Response.Write "<center><table border=""0"" width=""575""
> cellpadding=""0"" cellspacing=""0"" height=""303"">"
> Response.Write "<tr>"
> Response.Write "<td>"
>
> Dim strLink, strPlayingName, strLocation, strCounter, strEmail
> Response.Write "<BR><BR><center>"
>
> strCounter = 0
> Do While Not objRS.EOF
> strCounter = strCounter + 1
> strPlayingName = objRS("PlayingName")
> strEmail = objRS("Email")
> strPlayingName = Server.URLEncode(strPlayingName)
>
> strPlayingName=Replace(strPlayingName, "~", "%7E")` tilde
> strPlayingName=Replace(strPlayingName, "`", "%60")` `
> strPlayingName=Replace(strPlayingName, "!", "%21")` exclamation
> strPlayingName=Replace(strPlayingName, "@", "%40")` @
> strPlayingName=Replace(strPlayingName, "#", "%23")` pound
> strPlayingName=Replace(strPlayingName, "$", "%24")` dollar sign
> `strPlayingName=Replace(strPlayingName, "%", "%2525")` percent sign
> strPlayingName=Replace(strPlayingName, "^", "%5E")` exponent
> strPlayingName=Replace(strPlayingName, "&", "%26")` and
> strPlayingName=Replace(strPlayingName, "*", "%2A")` and
> strPlayingName=Replace(strPlayingName, "(", "%28")` (
> strPlayingName=Replace(strPlayingName, ")", "%29")` )
> strPlayingName=Replace(strPlayingName, ",", "%2C")` comma
> strPlayingName=Replace(strPlayingName, "`", "%27")` apostrophe
> strPlayingName=Replace(strPlayingName, "-", "%2D")` dash
> strPlayingName=Replace(strPlayingName, "_", "%5F")` underscore
> strPlayingName=Replace(strPlayingName, "+", "%20")` plus
> strPlayingName=Replace(strPlayingName, "=", "%3D")` equal
> strPlayingName=Replace(strPlayingName, "{", "%7B")` left bracket
> strPlayingName=Replace(strPlayingName, "}", "%7D")` right bracket
> strPlayingName=Replace(strPlayingName, "[", "%5B")` [
> strPlayingName=Replace(strPlayingName, "]", "%5D")` [
> strPlayingName=Replace(strPlayingName, "|", "%7C")` |
> strPlayingName=Replace(strPlayingName, "", "%5C")`
> strPlayingName=Replace(strPlayingName, "/", "%2F")` /
> strPlayingName=Replace(strPlayingName, ":", "%3A")` :
> strPlayingName=Replace(strPlayingName, ";", "%3B")` ;
> `strPlayingName=Replace(strPlayingName, """, "%22")` qoute
> strPlayingName=Replace(strPlayingName, "<", "%3C")` <
> strPlayingName=Replace(strPlayingName, ">", "%3E")` >
> strPlayingName=Replace(strPlayingName, ".", "%2E")` .
>
>
> Response.Write "<table border=""0"" width=""780"" cellpadding=""3""
> cellspacing=""3"" id=""table2""><tr>"
> Response.Write "<td width=""50""
> background=""../_Images/Development/bg2.gif""><br></td><td>"
> Response.Write "<div align=""center"">"
> Response.Write "<table border=""2"" cellpadding=""3"" cellspacing=""0""
> width=""100%"" align=""left"" id=""table3""
> background=""../_Images/Development/metal3Dark.gif""
> bordercolorlight=""#666666"" bordercolordark=""#333333""
> bgcolor=""#292929"">"
> Response.Write "<tr>"
> Response.Write "<td><font face=""Verdana""><B><BIG><BIG>"
> Response.Write "<font size=""5"" color=""#C0C0C0"">"
> Response.Write "<a href=`../_scripts/ViewBTCMemberfromindex.asp?" &
> objRS("PlayingName") & "`>" & objRS("PlayingName") &
> "<a/></font></BIG></BIG></B>"
> Response.Write "</font><font color=""#008000""><font face=""Verdana""
> size=""2""><b><br>"
> Response.Write "JOINED: </b><font color=""#00ff00"">" &
> objRS("DateJoined") & "<br></font></font>"
> Response.Write "<font face=""Verdana"" size=""2""
> color=""#008000""><b>NAME:</b><font color=""#00ff00"">" & objRS("Name") &
> "</font></font>"
> Response.Write "<font color=""#008000"" face=""Verdana"" size=""4""><br>"
> Response.Write "</font><font face=""Verdana"" size=""2""
> color=""#008000""><b>AGE:</b> <font color=""#00ff00"">" & objRS("Age") &
> "</font></font>"
> Response.Write "<font face=""Verdana"" size=""4""><br></font></font>"
> Response.Write "<font face=""Verdana"" color=""#008000""
> size=""2""><b>LOCATION:</b> <font color=""#00ff00"">" & objRS("Location")
> &
> "</font></font>"
> Response.Write "<SMALL><font face=""Verdana""
> color=""#0080FF""><br></FONT></SMALL>"
> Response.Write "<font face=""Verdana"" color=""#008000""
> size=""2""><b>EMAIL:</b> <font color=""#00ff00""><a href=`mailto:" &
> strEmail & "?Subject=Mail from BelchingToadClan Members Page`>" &
> objRS("Email") & "</a></font></font>"
> Response.Write "<font face=""Verdana"" size=""4""
> color=""#008000""><br></font>"
> Response.Write "<font face=""Verdana"" color=""#008000""
> size=""2""><b>AIM:</b> <font color=""#00ff00""><A
> href=""aim:goim?screenname=" & objRS("Aim") & """>" & objRS("Aim") &
> "</A></font></font><br>"
> Response.Write "<font face=""Verdana"" size=""2""
> color=""#008000""><b>ICQ:</b><font color=""#00ff00"">" & objRS("Icq") &
> "<br></font>"
> Response.Write "<b>CONNECTION:</b></font><font face=""Verdana""
> size=""2""
> color=""#00FF00"">" & objRS("Connect") & "</font>"
> Response.Write "</td>"
> Response.Write "</tr>"
> Response.Write "</table>"
> Response.Write "</div>"
> Response.Write "&nbsp;</td>"
> Response.Write "<td width=""268""
> background=""../_Images/Development/bg2.gif"">"
> Response.Write "&nbsp;</td></tr><tr>"
> Response.Write "<td width=""50"">"
> Response.Write "<br>"
> Response.Write "&nbsp;</td><td>"
> Response.Write "&nbsp;</td>"
> Response.Write "<td width=""268"">"
> Response.Write "&nbsp;</td></tr></table>"
>
>
>
> `Response.Write "<B><img src=""../_Images/sarge.gif"" width=""21""
> height=""32"" border=""0""><BIG><BIG><a class=""roll""
> href=`../_scripts/ViewBTCMemberfromindex.asp?" & objRS("PlayingName") &
> "`>"
> & objRS("PlayingName") & "</a></B></BIG></BIG></FONT><BR> "
> `Response.Write "<SMALL><font face=""Verdana"" color=""#0080FF"">" &
> objRS("Location") & "</FONT></SMALL><BR>"
> `Response.Write "<SMALL><a href=`mailto:" & strEmail & "?Subject=Mail
> from
> BelchingToadClan Members Page`>" & objRS("Email") & "</a></B></SMALL>"
> `Response.Write "<BR><BR><BR>"
> objRS.MoveNext
> Loop
> `Response.Write "<BIG>THERE ARE CURRENTLY <B>[" & strCounter & "]</B> BTC
> MEMBERS</BIG><br>"
> `Response.Write "</td>"
> `Response.Write "</tr><tr><td width=""575""><!--webbot bot=""Include""
> U-Include=""../Footer.htm"" TAG=""BODY"" startspan --></td></table>"
>
>
> %>
>
> <p>&nbsp;</p>
>
> <%
> objRS.Close
> Set objRS = Nothing
> objConn.Close
> Set objConn = Nothing
> %>
> </FONT>
> <!--webbot bot="Include" U-Include="../MenuSystem/Footer.htm"
> TAG="BODY" -->
> </BODY>
> </HTML>
> </CODE>
>
>
>
> Mike Belcher
> Independant Computer Consultant
>
> Email: mbelcher@...
>
>
> [Non-text portions of this message have been removed]
>
>
> Yahoo! Groups Sponsor
> ADVERTISEMENT
>
>
>
>
>
> ------------------------------------------------------------------------------
> Yahoo! Groups Links
>
> a.. To visit your group on the web, go to:
> http://groups.yahoo.com/group/AspNetAnyQuestionIsOk/
>
> b.. To unsubscribe from this group, send an email to:
> AspNetAnyQuestionIsOk-unsubscribe@yahoogroups.com
>
> c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of
> Service.
>
>
>
> [Non-text portions of this message have been removed]
>
>
> Yahoo! Groups Sponsor
> ADVERTISEMENT
>
>
>
>
>
>
> Yahoo! Groups Links
>
> To visit your group on the web, go to:
> http://groups.yahoo.com/group/AspNetAnyQuestionIsOk/
>
> To unsubscribe from this group, send an email to:
> AspNetAnyQuestionIsOk-unsubscribe@yahoogroups.com
>
> Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
>
> ----------
>
> <asp:Repeater id="ClanMembersList" runat="server">
> <HeaderTemplate>
> <table border="0" width="780" cellpadding="3" cellspacing="3">
> <tr>
> </HeaderTemplate>
> <ItemTemplate>
> <td width="50" background="../_Images/Development/bg2.gif"><br></td>
> <td>
> <div align="center">
> <table border="2" cellpadding="3" cellspacing="0" width="100%"
> align="left" id="table3"
> background="../_Images/Development/metal3Dark.gif"
> bordercolorlight="#666666" bordercolordark="#333333" bgcolor="#292929">
> <tr>
> <td><font face="Verdana"><B><BIG><BIG>
> <font size="5" color="#C0C0C0">
> <a href=`../_scripts/ViewBTCMemberfromindex.asp?<%#
> DataBinder.Eval(Container.DataItem, "PlayingName") %>`><%#
> DataBinder.Eval(Container.DataItem, "PlayingName")
> %><a/></font></BIG></BIG></B>
> </font><font color="#008000"><font face="Verdana" size="2"><b><br>
> JOINED: </b><font color="#00ff00"><%# DataBinder.Eval(Container.DataItem,
> "DateJoined") %><br></font></font>
> <font face="Verdana" size="2" color="#008000"><b>NAME:</b><font
> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Name")
> %></font></font>
> <font color="#008000" face="Verdana" size="4"><br>
> </font><font face="Verdana" size="2" color="#008000"><b>AGE:</b> <font
> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Age")
> %></font></font>
> <font face="Verdana" size="4"><br></font></font>
> <font face="Verdana" color="#008000" size="2"><b>LOCATION:</b> <font
> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Location")
> %></font></font>
> <SMALL><font face="Verdana" color="#0080FF"><br></FONT></SMALL>
> <font face="Verdana" color="#008000" size="2"><b>EMAIL:</b> <font
> color="#00ff00"><a href=`mailto:<%# DataBinder.Eval(Container.DataItem,
> "Email") %>?Subject=Mail from BelchingToadClan Members Page`><%#
> DataBinder.Eval(Container.DataItem, "Email") %></a></font></font>
> <font face="Verdana" size="4" color="#008000"><br></font>
> <font face="Verdana" color="#008000" size="2"><b>AIM:</b> <font
> color="#00ff00"><A href=`aim:goim?screenname=<%#
> DataBinder.Eval(Container.DataItem, "Aim") %>`><%#
> DataBinder.Eval(Container.DataItem, "Aim") %></A></font></font><br>
> <font face="Verdana" size="2" color="#008000"><b>ICQ:</b><font
> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Icq")
> %><br></font>
> <b>CONNECTION:</b></font><font face="Verdana" size="2" color="#00FF00"><%#
> DataBinder.Eval(Container.DataItem, "Connect") %></font>
> </td>
> </tr>
> </table>
> </div>&nbsp;
> </td>
> <td width="268" background="../_Images/Development/bg2.gif">&nbsp;</td>
> </tr>
> <tr>
> <td width="50">
> <br>&nbsp;
> </td>
> <td>&nbsp;
> </td>
> <td width="268">&nbsp;
> </td>
> </ItemTemplate>
> <FooterTemplate>
> </tr>
> </table>
> </FooterTemplate>
> </asp:Repeater>
>
>
>
> [Non-text portions of this message have been removed]
>
>
>
>
>
> Yahoo! Groups Links
>
>
>
>
>
>
>
>





Yahoo! Groups Links

To visit your group on the web, go to:
http://groups.yahoo.com/group/AspNetAnyQuestionIsOk/

To unsubscribe from this group, send an email to:
AspNetAnyQuestionIsOk-unsubscribe@yahoogroups.com

Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
Reply with quote
Send private message
View user's profile Post To page top
System-Administrator@... Posted: Tue Jan 04, 2005 2:20 am


Joined: 03 Jan 2005

Posts: 15
Re: aspclassic to ASP.NET ..................................
I knew it was something simple I was not doing. It was late at night and was
tired :) Thanks.


Have a nice day.
----- Original Message -----
From: "Ben Miller" <mylists@...>
To: <AspNetAnyQuestionIsOk@yahoogroups.com>
Sent: Monday, January 03, 2005 8:16 AM
Subject: Re: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET
.....................................


>
> You need to put ` (single quotes) around the data.
>
> SELECT * FROM tblBTC WHERE PlayingName LIKE `" & strPlayingName & "`"
>
> the above looks like (singlequote)(doublequote) & strPlayingName &
> (doublequote)(singlequote)(doublequote)
>
> The delimiter when using strings is the single quote.
>
> Ben Miller
>
> ----- Original Message -----
> From: System-Administrator@...
> To: AspNetAnyQuestionIsOk@yahoogroups.com
> Sent: Sunday, January 02, 2005 9:47 PM
> Subject: Re: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET
> .....................................
>
>
> So far I did manage to get the repeater to work and made the member page
> listing :)
> http://webslave/btcNET/ViewBTCMemberIndex.aspx and thanks to al that have
> help so far thank you.
>
>
> I am not making my Sql String correctly I guess as the code below results
> in
> an error also listed after the code. What I am attempting to do is just
> get
> the record with the member that was clicked from the preceding page. Then
> I
> will display it on the page.
>
>
> <CODE>
>
>
> `---------- Get Playingname from Querystring ------
>
> Dim strPlayingName As String
>
> strPlayingName = Request.QueryString("PlayingName")
>
>
>
> Dim strSQLstring As String
>
> strSQLstring = "SELECT * FROM tblBTC WHERE PlayingName LIKE " &
> strPlayingName
>
> `--------------------------------
>
>
>
> `Create a DataAdapter ------------------------------------
>
> Dim objDataAdapter As OleDbDataAdapter
>
> `objDataAdapter = New OleDbDataAdapter("SELECT * FROM tblBTC", objConn)
>
> objDataAdapter = New OleDbDataAdapter(strSQLstring, objConn)
>
>
> </CODE>
>
>
>
>
> Syntax error (missing operator) in query expression `PlayingName LIKE
> Hudson[BTC]`.
> Description: An unhandled exception occurred during the execution of the
> current web request. Please review the stack trace for more information
> about the error and where it originated in the code.
>
> Exception Details: System.Data.OleDb.OleDbException: Syntax error (missing
> operator) in query expression `PlayingName LIKE Hudson[BTC]`.
>
> Source Error:
>
> An unhandled exception was generated during the execution of the
> current web request. Information regarding the origin and location of the
> exception can be identified using the exception stack trace below.
>
> Stack Trace:
>
> [OleDbException (0x80040e14): Syntax error (missing operator) in query
> expression `PlayingName LIKE Hudson[BTC]`.]
>
>
>
>
>
> Mike Belcher
> Independant Computer Consultant
> Email: mbelcher@...
>
>
>
> Have a nice day.
> ----- Original Message -----
> From: "Ben Miller" <mylists@...>
> To: <AspNetAnyQuestionIsOk@yahoogroups.com>
> Sent: Wednesday, December 29, 2004 12:05 PM
> Subject: Re: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET
>
>
>>
>> I have attached a Repeater definition that should work.
>>
>> This should generate the correct looking layout that you have on your
>> site
>> currently. All you need is a DataTable with the data using the same
>> fieldnames that you had in your objRS("fieldname") stuff.
>>
>> Ben Miller
>>
>> ----- Original Message -----
>> From: Ben Miller
>> To: AspNetAnyQuestionIsOk@yahoogroups.com
>> Sent: Wednesday, December 29, 2004 9:36 AM
>> Subject: Re: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET
>>
>>
>> Looking at the page referenced below, you have a great example of using a
>> DataList or a Repeater control. DataList will generate beginning table
>> and
>> ending table tags and you can form the layout inside like you have. If
>> you
>> use a Repeater then you have full control of the HTML and table tags to
>> get
>> what you want.
>>
>> This is not that bad, as you would have a databinding statement wherever
>> you
>> have the objRS("fieldname") and the rest would remain the same.
>>
>> HTH. I will reply with a template if I get time today.
>>
>> Ben Miller
>>
>> ----- Original Message -----
>> From: System-Administrator@...
>> To: AspNetAnyQuestionIsOk@yahoogroups.com
>> Sent: Tuesday, December 28, 2004 9:49 PM
>> Subject: [AspNetAnyQuestionIsOk] aspclassic to ASP.NET
>>
>>
>> I am in the process of converting an aspclassic website I have over to
>> asp.net before I do anything more with it. I would like it to do at least
>> what it is able to do now. It has custom views I made with aspclassic and
>> forms to edit etc.... I am having issues at the moment just making a
>> simple
>> connection to a .MDB file. I can go into server explorer and make the
>> connection using visual studio .net no problem but its
>> LONG....................... I also want to make data generate in the way
>> it
>> does not with asp classic. The site is www.belchingtoadclan.com and it is
>> a
>> little old but before adding more features to it I want to convert it
>> over.
>> Some things are confusing in how to get the same results in .net. Like a
>> page to list the members of the gaming clan
>>
>> http://belchingtoadclan.gotdns.com/btc2/_Scripts/ViewBTCMemberIndex.asp
>>
>>
>> that lists the members. How can I make the same custom type page
>> generation in .net? If you click on a member there is another custom
>> generated page. SO far in .net its datagrids etc but that isn`t what I
>> need.
>> Here is the code from the page listed above its OLD. As far as included
>> content goes I got that figured out. Its the building of the page the way
>> it
>> is done now and making that happen in .NET - This is the best list there
>> is
>> so I posted here. Thank you.
>>
>>
>> <CODE>
>> <%@ Language=VBScript %>
>> <% Option Explicit %>
>> <!--#include file="adovbs.inc"-->
>> <!--#include file="DatabaseConnect.asp"-->
>>
>> <HTML><head>
>>
>> <style>
>> <!--
>> .bodyfont { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE:
>> 9pt; }
>> .lrgheader { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE:
>> 9pt; FONT-WEIGHT: 700; }
>> .header { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE:
>> 8pt;
>> FONT-WEIGHT: 700; }
>> .content { FONT-FAMILY: Tahoma, Arial, Verdana, Helvetica; FONT-SIZE:
>> 7pt;
>> FONT-WEIGHT: 400; }
>> -->
>> </style>
>>
>> <STYLE>BODY {
>> SCROLLBAR-FACE-COLOR: #000000; SCROLLBAR-HIGHLIGHT-COLOR: #000000;
>> SCROLLBAR-SHADOW-COLOR: #000000; SCROLLBAR-ARROW-COLOR: #000000;
>> SCROLLBAR-TRACK-COLOR: #000000; SCROLLBAR-DARKSHADOW-COLOR: #000000
>> }
>> </style>
>>
>> <style fprolloverstyle>A:hover {color: #00FF00; font-weight: bold}
>> </style>
>>
>>
>>
>>
>>
>> </head>
>> <body bgcolor="#000000" text="#C0C0C0" link="#FFFFFF" vlink="#FFFFFF"
>> alink="#FFFFFF" background="../_Images/right.gif" bgproperties="fixed">
>> <div align="center">
>> <table border="0" cellpadding="0" cellspacing="0" width="572">
>> <tr>
>> <td>
>> <!--webbot bot="Include" U-Include="../MenuSystem/Menu.htm"
>> TAG="BODY" --></td>
>> </tr>
>> <tr>
>> <td>
>> <br>
>> &nbsp;<div align="center">
>> <div align="center">
>> <table border="1" cellpadding="3" cellspacing="0" width="383"
>> id="table3" bordercolorlight="#666666" bordercolordark="#333333">
>> <tr>
>> <td nowrap background="../_Images/Development/metal3Dark.gif">
>> <p align="center"><font face="Verdana" size="5" color="#808000">
>> <b>B</b>elching
>> <b>T</b>oad <b>C</b>lan Members</font></td>
>> </tr>
>> </table>
>> </div>
>> </div>
>> </td>
>> </tr>
>> </table>
>> </div>
>> <%
>> `AUTHOR MIKE BELCHER
>> `THIS WILL LIST THE MEMBERS
>> %>
>>
>> <%
>> `create a SQL statement to list the Events by ProgramStart
>>
>>
>>
>> Dim strSQL
>> strSQL = "SELECT * FROM tblBTC" & " ORDER BY DateJoined"
>>
>> Dim objRS
>> Set objRS = Server.CreateObject("ADODB.Recordset")
>> objRS.Open strSQL, objConn
>>
>> Response.Write "<center><table border=""0"" width=""575""
>> cellpadding=""0"" cellspacing=""0"" height=""303"">"
>> Response.Write "<tr>"
>> Response.Write "<td>"
>>
>> Dim strLink, strPlayingName, strLocation, strCounter, strEmail
>> Response.Write "<BR><BR><center>"
>>
>> strCounter = 0
>> Do While Not objRS.EOF
>> strCounter = strCounter + 1
>> strPlayingName = objRS("PlayingName")
>> strEmail = objRS("Email")
>> strPlayingName = Server.URLEncode(strPlayingName)
>>
>> strPlayingName=Replace(strPlayingName, "~", "%7E")` tilde
>> strPlayingName=Replace(strPlayingName, "`", "%60")` `
>> strPlayingName=Replace(strPlayingName, "!", "%21")` exclamation
>> strPlayingName=Replace(strPlayingName, "@", "%40")` @
>> strPlayingName=Replace(strPlayingName, "#", "%23")` pound
>> strPlayingName=Replace(strPlayingName, "$", "%24")` dollar sign
>> `strPlayingName=Replace(strPlayingName, "%", "%2525")` percent sign
>> strPlayingName=Replace(strPlayingName, "^", "%5E")` exponent
>> strPlayingName=Replace(strPlayingName, "&", "%26")` and
>> strPlayingName=Replace(strPlayingName, "*", "%2A")` and
>> strPlayingName=Replace(strPlayingName, "(", "%28")` (
>> strPlayingName=Replace(strPlayingName, ")", "%29")` )
>> strPlayingName=Replace(strPlayingName, ",", "%2C")` comma
>> strPlayingName=Replace(strPlayingName, "`", "%27")` apostrophe
>> strPlayingName=Replace(strPlayingName, "-", "%2D")` dash
>> strPlayingName=Replace(strPlayingName, "_", "%5F")` underscore
>> strPlayingName=Replace(strPlayingName, "+", "%20")` plus
>> strPlayingName=Replace(strPlayingName, "=", "%3D")` equal
>> strPlayingName=Replace(strPlayingName, "{", "%7B")` left bracket
>> strPlayingName=Replace(strPlayingName, "}", "%7D")` right bracket
>> strPlayingName=Replace(strPlayingName, "[", "%5B")` [
>> strPlayingName=Replace(strPlayingName, "]", "%5D")` [
>> strPlayingName=Replace(strPlayingName, "|", "%7C")` |
>> strPlayingName=Replace(strPlayingName, "", "%5C")`
>> strPlayingName=Replace(strPlayingName, "/", "%2F")` /
>> strPlayingName=Replace(strPlayingName, ":", "%3A")` :
>> strPlayingName=Replace(strPlayingName, ";", "%3B")` ;
>> `strPlayingName=Replace(strPlayingName, """, "%22")` qoute
>> strPlayingName=Replace(strPlayingName, "<", "%3C")` <
>> strPlayingName=Replace(strPlayingName, ">", "%3E")` >
>> strPlayingName=Replace(strPlayingName, ".", "%2E")` .
>>
>>
>> Response.Write "<table border=""0"" width=""780"" cellpadding=""3""
>> cellspacing=""3"" id=""table2""><tr>"
>> Response.Write "<td width=""50""
>> background=""../_Images/Development/bg2.gif""><br></td><td>"
>> Response.Write "<div align=""center"">"
>> Response.Write "<table border=""2"" cellpadding=""3"" cellspacing=""0""
>> width=""100%"" align=""left"" id=""table3""
>> background=""../_Images/Development/metal3Dark.gif""
>> bordercolorlight=""#666666"" bordercolordark=""#333333""
>> bgcolor=""#292929"">"
>> Response.Write "<tr>"
>> Response.Write "<td><font face=""Verdana""><B><BIG><BIG>"
>> Response.Write "<font size=""5"" color=""#C0C0C0"">"
>> Response.Write "<a href=`../_scripts/ViewBTCMemberfromindex.asp?" &
>> objRS("PlayingName") & "`>" & objRS("PlayingName") &
>> "<a/></font></BIG></BIG></B>"
>> Response.Write "</font><font color=""#008000""><font face=""Verdana""
>> size=""2""><b><br>"
>> Response.Write "JOINED: </b><font color=""#00ff00"">" &
>> objRS("DateJoined") & "<br></font></font>"
>> Response.Write "<font face=""Verdana"" size=""2""
>> color=""#008000""><b>NAME:</b><font color=""#00ff00"">" & objRS("Name") &
>> "</font></font>"
>> Response.Write "<font color=""#008000"" face=""Verdana""
>> size=""4""><br>"
>> Response.Write "</font><font face=""Verdana"" size=""2""
>> color=""#008000""><b>AGE:</b> <font color=""#00ff00"">" & objRS("Age") &
>> "</font></font>"
>> Response.Write "<font face=""Verdana"" size=""4""><br></font></font>"
>> Response.Write "<font face=""Verdana"" color=""#008000""
>> size=""2""><b>LOCATION:</b> <font color=""#00ff00"">" & objRS("Location")
>> &
>> "</font></font>"
>> Response.Write "<SMALL><font face=""Verdana""
>> color=""#0080FF""><br></FONT></SMALL>"
>> Response.Write "<font face=""Verdana"" color=""#008000""
>> size=""2""><b>EMAIL:</b> <font color=""#00ff00""><a href=`mailto:" &
>> strEmail & "?Subject=Mail from BelchingToadClan Members Page`>" &
>> objRS("Email") & "</a></font></font>"
>> Response.Write "<font face=""Verdana"" size=""4""
>> color=""#008000""><br></font>"
>> Response.Write "<font face=""Verdana"" color=""#008000""
>> size=""2""><b>AIM:</b> <font color=""#00ff00""><A
>> href=""aim:goim?screenname=" & objRS("Aim") & """>" & objRS("Aim") &
>> "</A></font></font><br>"
>> Response.Write "<font face=""Verdana"" size=""2""
>> color=""#008000""><b>ICQ:</b><font color=""#00ff00"">" & objRS("Icq") &
>> "<br></font>"
>> Response.Write "<b>CONNECTION:</b></font><font face=""Verdana""
>> size=""2""
>> color=""#00FF00"">" & objRS("Connect") & "</font>"
>> Response.Write "</td>"
>> Response.Write "</tr>"
>> Response.Write "</table>"
>> Response.Write "</div>"
>> Response.Write "&nbsp;</td>"
>> Response.Write "<td width=""268""
>> background=""../_Images/Development/bg2.gif"">"
>> Response.Write "&nbsp;</td></tr><tr>"
>> Response.Write "<td width=""50"">"
>> Response.Write "<br>"
>> Response.Write "&nbsp;</td><td>"
>> Response.Write "&nbsp;</td>"
>> Response.Write "<td width=""268"">"
>> Response.Write "&nbsp;</td></tr></table>"
>>
>>
>>
>> `Response.Write "<B><img src=""../_Images/sarge.gif"" width=""21""
>> height=""32"" border=""0""><BIG><BIG><a class=""roll""
>> href=`../_scripts/ViewBTCMemberfromindex.asp?" & objRS("PlayingName") &
>> "`>"
>> & objRS("PlayingName") & "</a></B></BIG></BIG></FONT><BR> "
>> `Response.Write "<SMALL><font face=""Verdana"" color=""#0080FF"">" &
>> objRS("Location") & "</FONT></SMALL><BR>"
>> `Response.Write "<SMALL><a href=`mailto:" & strEmail & "?Subject=Mail
>> from
>> BelchingToadClan Members Page`>" & objRS("Email") & "</a></B></SMALL>"
>> `Response.Write "<BR><BR><BR>"
>> objRS.MoveNext
>> Loop
>> `Response.Write "<BIG>THERE ARE CURRENTLY <B>[" & strCounter & "]</B>
>> BTC
>> MEMBERS</BIG><br>"
>> `Response.Write "</td>"
>> `Response.Write "</tr><tr><td width=""575""><!--webbot bot=""Include""
>> U-Include=""../Footer.htm"" TAG=""BODY"" startspan --></td></table>"
>>
>>
>> %>
>>
>> <p>&nbsp;</p>
>>
>> <%
>> objRS.Close
>> Set objRS = Nothing
>> objConn.Close
>> Set objConn = Nothing
>> %>
>> </FONT>
>> <!--webbot bot="Include" U-Include="../MenuSystem/Footer.htm"
>> TAG="BODY" -->
>> </BODY>
>> </HTML>
>> </CODE>
>>
>>
>>
>> Mike Belcher
>> Independant Computer Consultant
>>
>> Email: mbelcher@...
>>
>>
>> [Non-text portions of this message have been removed]
>>
>>
>> Yahoo! Groups Sponsor
>> ADVERTISEMENT
>>
>>
>>
>>
>>
>>
------------------------------------------------------------------------------
>> Yahoo! Groups Links
>>
>> a.. To visit your group on the web, go to:
>> http://groups.yahoo.com/group/AspNetAnyQuestionIsOk/
>>
>> b.. To unsubscribe from this group, send an email to:
>> AspNetAnyQuestionIsOk-unsubscribe@yahoogroups.com
>>
>> c.. Your use of Yahoo! Groups is subject to the Yahoo! Terms of
>> Service.
>>
>>
>>
>> [Non-text portions of this message have been removed]
>>
>>
>> Yahoo! Groups Sponsor
>> ADVERTISEMENT
>>
>>
>>
>>
>>
>>
>> Yahoo! Groups Links
>>
>> To visit your group on the web, go to:
>> http://groups.yahoo.com/group/AspNetAnyQuestionIsOk/
>>
>> To unsubscribe from this group, send an email to:
>> AspNetAnyQuestionIsOk-unsubscribe@yahoogroups.com
>>
>> Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
>>
>> ----------
>>
>> <asp:Repeater id="ClanMembersList" runat="server">
>> <HeaderTemplate>
>> <table border="0" width="780" cellpadding="3" cellspacing="3">
>> <tr>
>> </HeaderTemplate>
>> <ItemTemplate>
>> <td width="50" background="../_Images/Development/bg2.gif"><br></td>
>> <td>
>> <div align="center">
>> <table border="2" cellpadding="3" cellspacing="0" width="100%"
>> align="left" id="table3"
>> background="../_Images/Development/metal3Dark.gif"
>> bordercolorlight="#666666" bordercolordark="#333333" bgcolor="#292929">
>> <tr>
>> <td><font face="Verdana"><B><BIG><BIG>
>> <font size="5" color="#C0C0C0">
>> <a href=`../_scripts/ViewBTCMemberfromindex.asp?<%#
>> DataBinder.Eval(Container.DataItem, "PlayingName") %>`><%#
>> DataBinder.Eval(Container.DataItem, "PlayingName")
>> %><a/></font></BIG></BIG></B>
>> </font><font color="#008000"><font face="Verdana" size="2"><b><br>
>> JOINED: </b><font color="#00ff00"><%# DataBinder.Eval(Container.DataItem,
>> "DateJoined") %><br></font></font>
>> <font face="Verdana" size="2" color="#008000"><b>NAME:</b><font
>> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Name")
>> %></font></font>
>> <font color="#008000" face="Verdana" size="4"><br>
>> </font><font face="Verdana" size="2" color="#008000"><b>AGE:</b> <font
>> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Age")
>> %></font></font>
>> <font face="Verdana" size="4"><br></font></font>
>> <font face="Verdana" color="#008000" size="2"><b>LOCATION:</b> <font
>> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Location")
>> %></font></font>
>> <SMALL><font face="Verdana" color="#0080FF"><br></FONT></SMALL>
>> <font face="Verdana" color="#008000" size="2"><b>EMAIL:</b> <font
>> color="#00ff00"><a href=`mailto:<%# DataBinder.Eval(Container.DataItem,
>> "Email") %>?Subject=Mail from BelchingToadClan Members Page`><%#
>> DataBinder.Eval(Container.DataItem, "Email") %></a></font></font>
>> <font face="Verdana" size="4" color="#008000"><br></font>
>> <font face="Verdana" color="#008000" size="2"><b>AIM:</b> <font
>> color="#00ff00"><A href=`aim:goim?screenname=<%#
>> DataBinder.Eval(Container.DataItem, "Aim") %>`><%#
>> DataBinder.Eval(Container.DataItem, "Aim") %></A></font></font><br>
>> <font face="Verdana" size="2" color="#008000"><b>ICQ:</b><font
>> color="#00ff00"><%# DataBinder.Eval(Container.DataItem, "Icq")
>> %><br></font>
>> <b>CONNECTION:</b></font><font face="Verdana" size="2"
>> color="#00FF00"><%#
>> DataBinder.Eval(Container.DataItem, "Connect") %></font>
>> </td>
>> </tr>
>> </table>
>> </div>&nbsp;
>> </td>
>> <td width="268" background="../_Images/Development/bg2.gif">&nbsp;</td>
>> </tr>
>> <tr>
>> <td width="50">
>> <br>&nbsp;
>> </td>
>> <td>&nbsp;
>> </td>
>> <td width="268">&nbsp;
>> </td>
>> </ItemTemplate>
>> <FooterTemplate>
>> </tr>
>> </table>
>> </FooterTemplate>
>> </asp:Repeater>
>>
>>
>>
>> [Non-text portions of this message have been removed]
>>
>>
>>
>>
>>
>> Yahoo! Groups Links
>>
>>
>>
>>
>>
>>
>>
>>
>
>
>
>
>
> Yahoo! Groups Links
>
> To visit your group on the web, go to:
> http://groups.yahoo.com/group/AspNetAnyQuestionIsOk/
>
> To unsubscribe from this group, send an email to:
> AspNetAnyQuestionIsOk-unsubscribe@yahoogroups.com
>
> Your use of Yahoo! Groups is subject to the Yahoo! Terms of Service.
>
>
>
>
> Yahoo! Groups Links
>
>
>
>
>
>
>
>
Reply with quote
Send private message
View user's profile Post To page top
System-Administrator@... Posted: Tue Jan 04, 2005 5:11 am


Joined: 03 Jan 2005

Posts: 15
Re: aspclassic to ASP.NET ..................................
Okay I managed to do the connection and it works. Here is my issue and if I can
get this right I can do other simular pages without a problem it is just
learning that FIRST one that is the hard part the same as classic asp and ADO.



Here is the old page in asp classic
Basically you click on the ViewBTCMemberIndex.asp page that I have already
converted with many thanks to Ben Miller and now once that is done it displays
that members information ...

here is the link to what it looks like now done in classic asp
http://belchingtoadclan.gotdns.com/btc2/_scripts/ViewBTCMemberfromindex.asp?Quak
eDealer[BTC]


I used to just open a recordset and get the one record belonging to the member
and i could access each field value in that row. I cold response.write it and
display it etc.. I cannot figure out how to do that in asp.net. Here is the
code fromt he old page. YOu will see how I could get the record I want and then
assign the values to variables....... How to do that in asp.net?


Like how I do this in ado:
strName = objRS("Name")
strPlayingname = objRS("Playingname")

In ADO.NET:
strName = ???
strPlayingname = ????

I put what I started in asp.net after the current asp classic code Block listed.




<ASPCLASSIC-CODE>
<%@ Language=VBScript %>
<% Option Explicit %>
<!--#include file="adovbs.inc"-->
<!--#include file="DatabaseConnect.asp"-->

<html>

<head>
<meta http-equiv="Content-Language" content="en-us">
<meta http-equiv="Content-Type" content="text/html; charset=windows-1252">
<title>Menu</title>

<STYLE>BODY {
SCROLLBAR-FACE-COLOR: #000000; SCROLLBAR-HIGHLIGHT-COLOR: #000000;
SCROLLBAR-SHADOW-COLOR: #000000; SCROLLBAR-ARROW-COLOR: #000000;
SCROLLBAR-TRACK-COLOR: #000000; SCROLLBAR-DARKSHADOW-COLOR: #000000
}
</style>


<style fprolloverstyle>A:hover {color: #00FF00; font-style: italic}
</style>
</head>

<body bgcolor="#000000" text="#C0C0C0" link="#C0C0C0" vlink="#C0C0C0"
alink="#00FF00" style="text-align: center">



<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="572">
<tr>
<td>
<!--webbot bot="Include" U-Include="../MenuSystem/Menu.htm" TAG="BODY" --></td>
</tr>
<tr>
<%
`AUTHOR: MIKE BELCHER
`VIEW MEMBERS

%>

<%

`GRAB THE RECORD VALUE FROM THE QUERYSTRING HERE AND PLACE INTO A VARIABLE.
Dim strRecord , arrRecord
strRecord = Request.QueryString
strRecord=Replace(strRecord, "%40", "@")
strRecord=Replace(strRecord, "%2E", ".")
strRecord=Replace(strRecord, "%7E", "~")` put tilde back
strRecord=Replace(strRecord, "%60", "`")` put ` back
strRecord=Replace(strRecord, "%21", "!")` put exclamation back
strRecord=Replace(strRecord, "%40", "@")` put @ back
strRecord=Replace(strRecord, "%23", "#")` put pound back
strRecord=Replace(strRecord, "%24", "$")` put dollar sign back
`strRecord=Replace(strRecord, "%2525", "%")` put percent sign back
strRecord=Replace(strRecord, "%5E", "^")` put exponent back
strRecord=Replace(strRecord, "%26", "&")` put and back
strRecord=Replace(strRecord, "%2A", "*")` put and back
strRecord=Replace(strRecord, "%28", "(")` put ( back
strRecord=Replace(strRecord, "%29", ")")` put ) back
strRecord=Replace(strRecord, "%20", " ")` put spaces back
strRecord=Replace(strRecord, "%2C", ",")` put comma back
strRecord=Replace(strRecord, "%27", "`")` put apostrophe back
strRecord=Replace(strRecord, "%2D", "-")` put dash back
strRecord=Replace(strRecord, "%5F", "_")` put underscore back
strRecord=Replace(strRecord, "%3D", "=")` put equal back
strRecord=Replace(strRecord, "%7B", "{")` put left bracket back
strRecord=Replace(strRecord, "%7D", "}")` put right bracket back
strRecord=Replace(strRecord, "%5B", "[")` put [ back
strRecord=Replace(strRecord, "%5D", "]")` put ] back
strRecord=Replace(strRecord, "%7C", "|")` put | back
strRecord=Replace(strRecord, "%5C", "")` put back
strRecord=Replace(strRecord, "%2F", "/")` put / back
strRecord=Replace(strRecord, "%3A", ":")` put : back
strRecord=Replace(strRecord, "%3B", ";")` put ; back
`strRecord=Replace(strRecord, "%22", """"")` put back
strRecord=Replace(strRecord, "%3C", "<")` put < back
strRecord=Replace(strRecord, "%3E", ">")` put > back
strRecord=Replace(strRecord, "%2E", ".")` put . back

`create a SQL statement open the recordset
Dim strSQL
strSQL = "SELECT * FROM tblBTC"

Dim objRS
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open strSQL, objConn


`FIND THE RECORD WE WANT
Dim strShowRecord

Do While Not (objRS.EOF OR strShowRecord)
If Not(StrComp(objRS("PlayingName"), strRecord, vbTextCompare) = 0) Then
`nothing
objRS.MoveNext
Else
strShowRecord = true
End If
Loop



Dim strName, strPlayingname, strUserName, strPassword, strLocation, strEmail,
strAge, strIcq, strAim, strOccupation
Dim strBio, strPersonalInformation, strGamesPlayed, strConnect, strProcessor,
strRam, strVideocard
Dim strSoundcard, strHarddrive, strAdditionalsysteminformation, strPhoto,
strSystemPhoto, strDateJoined, strOS

strName = objRS("Name")
strPlayingname = objRS("Playingname")
strUserName = objRS("UserName")
strPassword = objRS("Password")
strLocation = objRS("Location")
strEmail = objRS("Email")
strAge = objRS("Age")
strIcq = objRS("Icq")
strAim = objRS("Aim")
strOccupation = objRS("Occupation")
strBio = objRS("Bio")
strPersonalInformation = objRS("PersonalInformation")
strGamesPlayed = objRS("GamesPlayed")
strConnect = objRS("Connect")
strProcessor = objRS("Processor")
strRam = objRS("Ram")
strVideocard = objRS("Videocard")
strSoundcard = objRS("Soundcard")
strHarddrive = objRS("Harddrive")
strAdditionalsysteminformation = objRS("Additionalsysteminformation")
strPhoto = objRS("Photo")
strSystemPhoto = objRS("SystemPhoto")
strDateJoined = objRS("DateJoined")
strOS = objRS("OS")


%>


<div align="center">
<table border="0" cellpadding="0" cellspacing="5" width="780" id="table3"><tr>
<td width="50" valign="top">
&nbsp;</td><td valign="top">
&nbsp;</td><td width="50" valign="top">
&nbsp;</td></tr><tr>
<td width="50" valign="top" background="../_Images/Development/bg2.gif">
&nbsp;</td><td valign="top">
<font face="Verdana" SIZE="4" color="#008000">
<div align="center">
<table border="1" cellpadding="0" cellspacing="0" width="100%" align="left"
id="table4">
<tr>
<td background="../_Images/Development/metal3Dark.gif"
bordercolorlight="#666666" bordercolordark="#333333" bgcolor="#292929">
<font face="Verdana" SIZE="4">
<div align="center">
<table border="0" cellpadding="0" cellspacing="0" width="100%" align="left"
id="table6">
<tr>
<td colspan="4"><font face="Verdana" SIZE="4">
<strong><big><big><big><font size="6"><%=strPlayingname
%></font></big></big></big></strong></font></td>
</tr>
<tr>
<td width="100%" colspan="4">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;
</td>
</tr>
<tr>
<td width="1%">&nbsp;</td>
<td width="30%" colspan="2">
<font face="Verdana" SIZE="4" color="#008000">
<div align="center">
<table border="1" cellpadding="0" cellspacing="0" id="table7"
bordercolorlight="#666666" bordercolordark="#333333" bgcolor="#000000">
<tr>
<td>
<img border="0" src="<%=strPhoto %>" width="166" height="166"></td>
</tr>
</table>
</font>
</div></td>
<font face="Verdana" SIZE="4" color="#008000">
<font face="Verdana" SIZE="3">
<td width="69%" valign="top">
<font face="Verdana" SIZE="3" color="#008000">
<b>JOINED: </b><font color="#00FF00"><%=strDateJoined %></font><br>
<b>NAME: </b><font color="#00FF00"><%=strName %><br>
</font><b>AGE:</b> <font color="#00FF00"><%=strAge %><br>
</font><b>
LOCATION:</b> <font color="#00FF00"><%=strLocation %></font><br><b>
PLAYING&nbsp; NAME:</b> <font color="#00FF00"><%=strPlayingname %></font><br>
<b>EMAIL:</b> <font color="#00FF00"><a href=`mailto:<%=strEmail %>`><%=strEmail
%></a></font><br>
<b>AIM:</b> <font color="#00FF00"><A href="aim:goim?screenname=<%=strAim
%>"><%=strAim %></A></font><br>
<b>
ICQ:</b> <font color="#00FF00"><%=strIcq %></font>
<br><b>OCCUPATION:</b> <font color="#00FF00"><%=strOccupation %></font></td>
</tr>
<tr>
<td width="100%" colspan="4">&nbsp;&nbsp;&nbsp; </td>
</tr>
<tr>
<td width="100%" colspan="4">
<font face="Verdana" SIZE="4" color="#008000">
<b>BIO:</b><BR><font color="#00FF00"><%=strBio %></font><br><br>

<b>PERSONAL INFORMATION:</b><BR><font
color="#00FF00"><%=strPersonalInformation %></font><br><br>

<b>GAMES PLAYED:<br></b>
<font face="Verdana" SIZE="4" color="#00FF00"><%=strGamesPlayed
%></font><br><br>&nbsp;</td>
</tr>
<tr>
<td width="100%" colspan="4">
<b>
<font face="Verdana" SIZE="5" color="#1079AD">SYSTEM
INFORMATION</font></b></td>
</tr>
<tr>
<td width="100%" colspan="4">
&nbsp;&nbsp; </td>
</tr>
<tr>
<td width="20" colspan="2">
&nbsp;</td>
<td width="30%">
<font face="Verdana" SIZE="4" color="#008000">
<div align="center">
<table border="1" cellpadding="0" cellspacing="0" align="center" id="table8"
bordercolorlight="#666666" bordercolordark="#333333" bgcolor="#000000">
<tr>
<td>
<img border="0" src="<%=strSystemPhoto %>" width="166" height="166"></td>
</tr>
</table>
</div></td>
<td valign="top">
<b><font color="#FF00FF" face="Verdana"><br>
</font><font color="#1079AD" face="Verdana">CONNECTION:</font></b><font
color="#FF00FF" face="Verdana">
<font color="#31F7FF"><%=strConnect %></font><br></font>

<font color="#1079AD" face="Verdana"><b>OPERATING SYSTEM:</b></font><font
color="#FF00FF" face="Verdana">
<font color="#31F7FF"><%=strOS %></font><br>

</font><font color="#1079AD" face="Verdana"><b>PROCESSOR:</b></font><font
color="#FF00FF" face="Verdana">
<font color="#31F7FF"><%=strProcessor %></font><br>

</font><font color="#1079AD" face="Verdana"><b>RAM:</b></font><font
color="#FF00FF" face="Verdana">
<font color="#31F7FF"><%=strRam %></font><br></font>


<font color="#1079AD" face="Verdana"><b>
VIDEO CARD:</b></font><font color="#FF00FF" face="Verdana">
<font color="#31F7FF"><%=strVideocard %></font><br></font>

<font color="#1079AD" face="Verdana"><b>
SOUND CARD:</b></font><font color="#FF00FF" face="Verdana">
<font color="#31F7FF"><%=strSoundcard %></font><br></font>

<font color="#1079AD" face="Verdana"><b>HARD DRIVE:</b></font><font
color="#FF00FF" face="Verdana">
</font><font color="#31F7FF" face="Verdana"><%=strHarddrive %></font>

<font color="#FF00FF" face="Verdana"><font color="#FF80FF"><br>
</font><br>&nbsp;</td>
</tr>
<tr>
<td width="100%" colspan="4">
<br>
<font color="#1079AD" face="Verdana" SIZE="4"><b>ADDITIONAL SYSTEM
INFORMATION:</b></font><font color="#FF00FF" face="Verdana" SIZE="4"><BR>
</font><font color="#31F7FF" face="Verdana"
SIZE="4"><%=strAdditionalsysteminformation %></font><font color="#FF00FF"
face="Verdana" SIZE="4">
</font><br>
&nbsp;</td>
</tr>
</table>
</div>

<font face="Verdana"><strong><big><big><big><font size="6"><br>
<br>
<br>
<br>
<br>
<br>
</font></big></big></big></strong></font></font>
<font face="Verdana" SIZE="4" color="#008000">
<b><br>
&nbsp;</b></font><p><br>
<font face="Verdana" SIZE="4" color="#008000">
<br><font color="#FF00FF"><br>
<br></td>
</tr>
</table>
</div>
<font face="Verdana"><strong><big><big><big><font size="6"><br>
&nbsp;</font></big></big></big></strong></font></td>
<td width="50" valign="top" background="../_Images/Development/bg2.gif">
&nbsp;</td></tr><tr>
<td width="50" valign="top">
&nbsp;</td><td valign="top">
&nbsp;</td><td width="50" valign="top">
&nbsp;</td></tr></table>




</div>
<!--webbot bot="Include" U-Include="../MenuSystem/Footer.htm" TAG="BODY" -->

</body>

</html>



<%
objRS.Close
Set objRS = Nothing
objConn.Close
Set objConn = Nothing

Dim strLink
strLink = ""
%>




</table>
</div>

</BODY>
</HTML>

</ASPCLASSIC-CODE>







</ASP.NET-CODE>


`Open the Connection -------------------------------------

Dim objConn As OleDbConnection

Dim objConnString As String = "Provider=Microsoft.Jet.OLEDB.4.0;Data
Source=C:InetpubwwwroottcNETDBelcherman.mdb"

objConn = New OleDb.OleDbConnection(objConnString)

objConn.Open()

`Response.Write("Connection OPENED <BR><BR>")

`Open the Connection -------------------------------------



`Create a DataSet ----------------------------------------

Dim objDataSet As New DataSet

`Response.Write("objDataSet Created <BR><BR>")

`Create a DataSet ----------------------------------------

`---------- Get Playingname from Querystring ------

Dim strPlayingName As String

strPlayingName = Request.QueryString("PlayingName")



Dim strSQLstring As String

strSQLstring = "SELECT * FROM tblBTC WHERE PlayingName LIKE `" & strPlayingName
& "`"

`--------------------------------









`Create a DataAdapter ------------------------------------

Dim objDataAdapter As OleDbDataAdapter

`objDataAdapter = New OleDbDataAdapter("SELECT * FROM tblBTC", objConn)

objDataAdapter = New OleDbDataAdapter(strSQLstring, objConn)

objDataAdapter.Fill(objDataSet, "BTC MEMBERS")

`Response.Write("objDataAdapter Created and used to fill the the objDataSet with
tblBTC <BR><BR>")

`Create a DataAdapter ------------------------------------





`CODE ===============================================================

`tblBTC.DataSource = objDataSet

`tblBTC.DataBind()

`literal1.text = " HTML CODE "

`Want to add more:

`literal1.text &= " MORE HTML CODE "

`<%# DataBinder.Eval(Container.DataItem, "PlayingName") %>











Dim tblBTC As DataTable = objDataSet.Tables.Item("tblBTC")

`tblBTC.Rows.Item("PlayingName")





strBTC.Text = " HTML CODE <BR>"

strBTC.Text &= " -------- HTML CODE added again<BR>"

strBTC.Text &= "PlayingName = " & strPlayingName & "<BR>"

strBTC.Text &= "SQLString = " & strSQLstring & "<BR>"

strBTC.Text &= "DATAITEM ==== " &
objDataSet.Tables("tblBTC").Rows.Item("PlayingName").ToString()





`Console.WriteLine(rowCustomer.Item("CompanyName"))

`objDataSet.Tables("tblBTC").Rows.Item("PlayingName").ToString()

`objDataSet.Tables("tblBTC").Rows.

`objDataSet.Tables("tblBTC").Rows.Item("PlayingName").ToString())

`objDataSet.Tables("tblBTC").Columns.



`CODE ===============================================================









`Close things up ------------------------------------

objDataSet.Dispose()

objDataSet = Nothing

objDataAdapter = Nothing

objConn.Close()

objConn = Nothing

`Response.Write("CLOSED <BR><BR>")

`Close things up ------------------------------------





`----------------------------- Script extras ----------------------

`strSQLstring = "SELECT * FROM tblBTC WHERE PlayingName LIKE `%strPlayingName%`"

`---------------------------------------------------------------------------

</ASP.NET-CODE>




I have tried and looked around but so far nothing is like what i need.


Mike Belcher
Independent Computer Consultant
Email: mbelcher@...



[Non-text portions of this message have been removed]
Reply with quote
Send private message
View user's profile Post To page top
aws_kamal Posted: Thu Jan 06, 2005 5:02 pm


Joined: 06 Jan 2005

Posts: 1
Re: aspclassic to ASP.NET ..................................
hi,
u can store the array in the sessionby converting the array to
object before save it on Session

Session("array") = CObj(myArray)

Regards

Aws

--- In AspNetAnyQuestionIsOk@yahoogroups.com, jamil tamimi
<jamil_h_t@y...> wrote:
>
> hi all , how can i store an array after the postback in vb.net ,
if it is as view state how can i use it
>
> thank`s
>
>
> ---------------------------------
> Do you Yahoo!?
> All your favorites on one personal page – Try My Yahoo!
>
> [Non-text portions of this message have been removed]
Reply with quote
Send private message
Post new topic Reply to topic
Display posts from previous:   
 

All times are GMT
Page 1 of 1
You cannot post new topics in this forum
You cannot reply to topics in this forum
You cannot edit your posts in this forum
You cannot delete your posts in this forum
You cannot vote in polls in this forum
Freelace Website Designer - Customer web design and software building.
China Wholesale - Electronics Products
Character Studio - Tutorials and Help