This is a multi-part message in MIME format.
------=_NextPart_000_00CC_01C6B292.43CC2720
Content-Type: text/plain;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
I was wondering if i can create 2 server objects for my MySQL database. =
here is my code:
<!--#INCLUDE FILE=3D"connection.asp"-->
<%
catID =3D Request.QueryString("catID")
SQL_Get_Products =3D "Select catID, prodID, prod_price, =
prod_title, prod_img_url FROM products WHERE catID =3D '" & catID & "'"
rs.Open SQL_Get_Products , conn
SQL_Get_Categories =3D "Select * FROM categories WHERE =
parent_cat =3D '" & catID & "'"
rs2.Open SQL_Get_Categories , conn
%>
Connection.asp:
<%
server2 =3D "XXXXXXXXX"
database =3D "XXXXXXXXXXX"
username =3D "XXXXXXXXXXXX"
password =3D "XXXXXXXXXXXX"
sConnection =3D "DRIVER=3D{MySQL ODBC 3.51 Driver}; SERVER=3D" & server2 =
& "; DATABASE=3D" & database & "; UID=3D" & username & ";PASSWORD=3D" & =
password & "; OPTION=3D3"
Set Conn =3D Server.CreateObject("ADODB.Connection")
Conn.Open(sConnection)
set rs =3D Server.CreateObject("ADODB.recordset")
set rs2 =3D Server.CreateObject("ADODB.recordset")
%>
My error is:
Microsoft VBScript runtime error '800a01a8'
Object required: ''
/shoppingcart/index.asp, line 74
can anyone help me? PLEASE!!! i need to get one field out of one table, =
and all the rest out of the other.......
Thanks,
James
------=_NextPart_000_00CC_01C6B292.43CC2720
Content-Type: text/html;
charset="iso-8859-1"
Content-Transfer-Encoding: quoted-printable
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD>
<META http-equiv=3DContent-Type content=3D"text/html; =
charset=3Diso-8859-1">
<META content=3D"MSHTML 6.00.2900.2912" name=3DGENERATOR>
<STYLE></STYLE>
</HEAD>
<BODY bgColor=3D#ffffff>
<DIV><FONT face=3DArial size=3D2>I was wondering if i can create 2 =
server objects
for my MySQL database. here is my code:</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial
size=3D2> &nbs=
p;
<!--#INCLUDE
FILE=3D"connection.asp"--><BR> &nbs=
p;
<%<BR> &nbs=
p;
catID =3D
Request.QueryString("catID")<BR> =
;
SQL_Get_Products =3D "Select catID, prodID, prod_price, prod_title, =
prod_img_url
FROM products WHERE catID =3D '" & catID &
"'"<BR> =
rs.Open SQL_Get_Products ,
conn<BR> =
;
SQL_Get_Categories =3D "Select * FROM categories WHERE parent_cat =3D '" =
& catID
& =
"'"<BR> =
rs2.Open SQL_Get_Categories ,
conn<BR> =
;
%></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>Connection.asp:</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2><%<BR>server2 =3D =
"XXXXXXXXX"<BR>database =3D
"XXXXXXXXXXX"<BR>username =3D "XXXXXXXXXXXX"<BR>password =3D
"XXXXXXXXXXXX"<BR>sConnection =3D "DRIVER=3D{MySQL ODBC 3.51 Driver}; =
SERVER=3D" &
server2 & "; DATABASE=3D" & database & "; UID=3D" & =
username &
";PASSWORD=3D" & password & "; OPTION=3D3"<BR>Set Conn =3D
Server.CreateObject("ADODB.Connection")<BR>Conn.Open(sConnection)<BR>set =
rs =3D
Server.CreateObject("ADODB.recordset")<BR>set rs2 =3D
Server.CreateObject("ADODB.recordset")<BR>%><BR></FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>My error is:</FONT></DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2></FONT> </DIV>
<DIV><FONT face=3DArial size=3D2>
<P>Microsoft VBScript runtime <FONT face=3DArial size=3D2>error
'800a01a8'</FONT><FONT face=3D"Times New Roman" size=3D3> </FONT>
<P><FONT face=3DArial size=3D2>Object required: ''</FONT>
<P><FONT face=3DArial size=3D2>/shoppingcart/index.asp</FONT><FONT =
face=3DArial
size=3D2>, line 74</FONT> </P>
<P> </P>
<P> </P>
<P> </P>
<P> </P>
<P> </P>
<P>can anyone help me? PLEASE!!! i need to get one field out of one =
table, and
all the rest out of the other.......</P>
<P> </P>
<P> </P>
<P>Thanks,</P>
<P>James</P></DIV></FONT></BODY></HTML>
------=_NextPart_000_00CC_01C6B292.43CC2720--
