<script language="vbscript" runat="server">
CustID=Request.QueryString("CustID")
Set conn=Server.CreateObject("ADODB.Connection")
conn.Open "Provider=Microsoft.Jet.OLEDB.4.0; "& "Data Source=" & Server.MapPath("/Data/Orders.mdb")
Set OrderData=Server.CreateObject("ADODB.RecordSet")
OrderData.CursorType = 3
OrderData.CursorLocation = 3
OrderData.ActiveConnection = conn
OrderData.Open("Select OrderID From Orders where CustomerID='"+CustID+"'")
OrdID=OrderData.Fields("OrderID")
OrderData.Close
OrderData.Open("Select ProductID From Items where OrderID='"+OrdID+"'")
RespStr=OrderData.GetString
Response.Write(RespStr)
</script>

The highlighted line causes the error...

The table Orders contains 2 columns and 1 record

OrderId (autonumber)
50

CusomerID
856564321986757 (Sess. var, global.asa, type text, temp customer ID)

The table Items contains 2 columns and 4 records (both columns text)

OrderID
50
50
50
50

ProductId
7463547
9283745
9283547
0298083

The tables are related via OrderID.
This script is serverside ajax.

no such thing as "serverside ajax"

and the FULL error message is?

Microsoft VBscript runtime error '800a000d'
Type mismatch: string:"Select ProductID"
GetItems.asp, line 12

You are so picky Chris, guess that makes you a programmer.
It is an ASP script called by a javascript xmlhttp object (AJAX), don't think that has anything to do with problem... but?

Maybe it appears picky, but it is important, especially when programming to have the correct information.

the problem could be one several things. best guess would be has OrdID returned with a value or is it NULL?

You should be using some error handling in there, especially when dealing with database retrieval and data passed in request collections.

OrderID returns a number... cstr(OrderID) did the trick. thx.

Here's the problem: You're using PLUS signs to concatenate strings instead of AMPERSAND signs.

OrderData.Open("Select ProductID From Items where OrderID='" & OrdID & "'")

In VBScript, the ampersand is used for string concatenation. When you use a plus, it tries to "literally" add the parameters, resulting in a type mismatch (since you're adding a number to a string).

CStr() will bypass the error as you figured out (by making both arguments strings), but the correct way is to just use ampersands for string concatenation anywhere you are writing vbscript. (Jscript uses + just like java and c++).

Also, it'd probably be better to remove the single quotes from the SELECT statement as well, since OrderID is a numeric field. The single quotes means you pass SQL a string, which it then has to convert back to a number to compare it to the OrderID field. Every millisecond saved is a millisecond faster that your page loads!

I would write it like this:

OrderData.Open("Select ProductID From Items where OrderID=" & OrdID)

Hey Thx, I think you solved my next post too!

Nope, but it did clean up the OrderId script! thx again, perhaps you can be as helpful with the next one?