Hjälp snabbt

Får man se hela filen? (Misstänker att det ser lite kafka-artat ut )

Det är ett VBscript som jag har hämtat på ASP101.
Jag löste det men vet inte riktigt hur.
Här kommer koden:

<%@Language="VBScript"%>

<%
Dim oRS, oConn

 Set oRS = Server.CreateObject("ADODB.Recordset")
 Set oConn = Server.CreateObject("ADODB.Connection")

 oConn.ConnectionString = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("hus.mdb")
 oConn.Open

 oRS.Open "SELECT * FROM data", oConn, 2, 3
 oRS.Find "ID = '" & UCase(Request.QueryString("nummer")) & "'"
 If oRS.EOF Then
 	Response.Write "namn=Inget+valt"
 Else
 	Response.Write "namn=" & Server.URLEncode(oRS("namn")) & "&storlek=" & Server.URLEncode(oRS("storlek")) & "&personer=" & Server.URLEncode(oRS("personer")) & "&farg=" & Server.URLEncode(oRS("farg")) & "&levtid=" & Server.URLEncode(oRS("levtid")) & "&ID=" & Server.URLEncode(oRS("ID"))
 End If
oRS.Close
Set oRS = Nothing
oConn.Close
Set oConn = Nothing
%>

Jag använder den till att skicka data från Access till Flash.

Som felet lyder så har du blandat ihopa typerna lite konstigt

Du kanske jämför en sträng med ett siffervärde, vilket inte går så bra.

Men att felet skulle vara i den här raden kan jag inte förstå

oRS.Open "SELECT * FROM data", oConn, 2, 3

Det kanske är raden under? Att du har satt fältet nummer som ett numersikt värde men att du försöker jämföra värdet som en sträng, vilket som sagt inte fungerar. Prova ta bort enkelfnuttarna i raden - oRS.Find "ID = '" & UCase(Request.QueryString("nummer")) & "'"
Kan vara det som är felet. Eller så är det bara jag som snackar för mycket skit..

Det var nog så att det var siffror istället för sträng.
Om jag nu vill visa alla data i min post, hur skall Response.Write() skripten då se ut.

Somsagt så är man newbie.