sql

strSQL = \"SELECT * From \" & Request.Querystring(\"table\") & \"\"

well får fejl:
et objekt er obligatorisk: \"

i linie 82

strSQL = \"SELECT * From \" & Request.Querystring(\"table\") & \"\"
Set rs = myConn.Execute(strSQL)
Som er den nederste....

Du mangler nok at sætte en reference til myConn samt åbne en forbindelse til din DB

Lav
trSQL = \"SELECT * From \" & Request.Querystring(\"table\") & \"\"  omtil
strSQL = \"SELECT * From \" & Request.Querystring(\"table\")

Det der \"\" holder ikke :)

kornfreak:> & \"\" er nok fordi der skal noget mere på SQL\'et .. måske ..

Lav
strSQL = \"SELECT * From \" & Request.Querystring(\"table\") & \"\" 
omtil
strSQL = \"SELECT * From \" & Request.Querystring(\"table\")

Sårn..det ser lidt pænere ud!

Td...ja okay..MEN..linie 82  er Set rs = myConn.Execute(strSQL)
og fejlen er \"et objekt er obligatorisk: --->\"<---\"

Og er der fejl i strsql melder den osse fejl i execute linien ;)

kornfreak:> & \"\" er ikke fejlen, da det bare tilføjer \"ingenting\" til strengen.
Jeg kender problemet her selv, og det er en manglende object reference

Hm..okay så...*hmpf*..hehe..

*S*

Well, prøv lige og få det til og virke med denne kode...:

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"database.mdb\")
strSQL = \"SELECT * From \" & Request.Querystring(\"table\") & \"\"
Set rs = myConn.Execute(strSQL)

Do Until rs.EOF
%>

        <a href=\"admin.asp?mode=delete_data&table=<% Request.Querystring(\"table\") %>?id=<%=rs(\"id\")%>\"><font color=\"000000\"><%= rs(\"id\") %>...</a></font><br>
<%RS.MoveNext
Loop

Conn.Close
Set Conn = Nothing%>

hvilken fejlm får du da ?

Der opstod en Microsoft VBScript-kørselsfejl fejl \'800a01a8\'

Et objekt er obligatorisk: \'myConn\'

/beta/admin2.asp, linje 5

<%
Set Conn = Server.CreateObject(\"ADODB.Connection\")
Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"database.mdb\")
strSQL = \"SELECT * From \" & Request.Querystring(\"table\") & \"\"
Set rs = Conn.Execute(strSQL)

Do Until rs.EOF
%>

        <a href=\"admin.asp?mode=delete_data&table=<% Request.Querystring(\"table\") %>?id=<%=rs(\"id\")%>\"><font color=\"000000\"><%= rs(\"id\") %>...</a></font><br>
<%RS.MoveNext
Loop

Conn.Close
Set Conn = Nothing%>

Takker

np :-)