I dont know what your asking for either, but maybe this is it?!?!:

Dim Conn, RS, cnpath, SQL
Set Conn = Server.CreateObject("ADODB.Connection")
cnpath="DBQ=" & server.mappath("/database/instant.mdb")
Conn.Open  "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpath &
";pwd=******"

Set objRS = Conn.Execute("SELECT SKU FROM YourTable")

Cat = Request.QueryString("Cat")
SubCat = Request.QueryString("SubCat")
SKU = objRS("SKU")



HTH
Sam Thompson
----------------------------------------------
2cs Communications Ltd
http://www.2cs.com
[EMAIL PROTECTED]
T: 01473 622263
F: 01473 622515
-----------------------------------------------
----- Original Message -----
From: <Rob Lamb`" <[EMAIL PROTECTED]>>
To: "ActiveServerPages" <[EMAIL PROTECTED]>
Sent: Tuesday, August 20, 2002 8:49 AM
Subject: Defining a recorset as a variable


> Hi
>
> I need to define a recorset as a variable.  I am really stuck and cant get
it right.  If I hard code the product number in I dont have a problem but I
need each product to have its unique number.
>
> I have connected to the database with an ADODB connection.
>
> Here is ny existing code please can someone advise me as what to do!
>
> <%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
> <%
> Option Explicit
> Response.Buffer = True
>
> Dim Cat, SubCat, header, SKU
>
> Cat = Request.QueryString("Cat")
> SubCat = Request.QueryString("SubCat")
> SKU = I need the record value here
>
>         Dim Conn, RS, cnpath, SQL
> Set Conn = Server.CreateObject("ADODB.Connection")
> Set RS = Server.CreateObject("ADODB.RecordSet")
> cnpath="DBQ=" & server.mappath("/database/instant.mdb")
> Conn.Open  "DRIVER={Microsoft Access Driver (*.mdb)}; " & cnpath &
";pwd=******"
> %>
>
> Thanks
>
> Rob
> ---
> You are currently subscribed to activeserverpages as: [EMAIL PROTECTED]
> To unsubscribe send a blank email to
%%email.unsub%%
>


---
You are currently subscribed to activeserverpages as: [email protected]
To unsubscribe send a blank email to [EMAIL PROTECTED]

Reply via email to