Jeg forstår det ikke...

prøv at kald din ID variabel for vID i stedet.

virker det nu?

Den skal se sådan her ud,

ID = " & Request.QueryString("ID") & "

schulze>> Det hjalp ikke - det ændrede bare fejlen til:
Microsoft VBScript runtime error '800a01f4'
Variable is undefined: 'vID'
/beta/udgivelser.asp, line 4

-master-d->> Nu får jeg denne fejl:

Microsoft VBScript compilation error '800a0401'
Expected end of statement
/beta/udgivelser.asp, line 4
ID = " & Request.QueryString("ID") & "
------------------------------^

Har det noget med URL'en at gøre?

beta/udgivelser.asp?LAND=NONE&ID=1

/cotus

ups
prøv dette
ID = '" & Request.QueryString("ID") & "'

Dim ID

i starten af din kode.

Eller fjern OPTION EXPLICIT i toppen

ID = " & Request.QueryString("ID") & "
...skal se sådan her ud...
  ID = Request.QueryString("ID")

husk at dim'e vID før du bruger den, hvis du bruger option explicit

Tilføj:
Dim vID

:)) Vi var vist lige enige om at dimme...:))

Dvs., at denne kode:

<%
ID = Request.QueryString("ID")

Set conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("database/siteinabox.mdb")

set rs = Conn.execute("SELECT * FROM publications WHERE ID=" & vID)

TITLE = rs("TITLE")
PUBLISHER = rs("PUBLISHER")
PIC1 = rs ("PIC1")
PIC2 = rs ("PIC2")
PIC3 = rs ("PIC3")
PUBLISHED = rs ("PUBLISHED")
FORMAT = rs ("FORMAT")
SALE = rs ("SALE")
BYMAIL = rs ("BYMAIL")
ABOUT = rs ("ABOUT")
COMMENT = rs ("COMMENT")
COUNTRY = rs ("COUNTRY")
%>

,skal se hvordan ud?

/cotus

Har du prøver at udskrive din sql-sætning. Jeg kan ikke se om det er variablen ID eller querystring("ID") der ikke indeholder en værdig.

response.write("SELECT * FROM publications WHERE ID=" & vID)

måske afsløre det noget?
-cyberper

du skal enten rette ID = request..... til vID = Request.... eller i rette din SQL WHERE ID = " & vID til WHERE ID = " & ID


Jeg ville rette denne:
ID = Request.QueryString("ID")

Til denne:
vID = Request.QueryString("ID")

Denne kode i min editor:
<%
Dim id, conn, dsn, strSQL, rs
%>
<h3>Udgivelser</h3>
<p><b>2. Vælg en udgivelse fra <% Response.write Request.Querystring ("LAND") %>.</b></p><p>
<form>
<SELECT onchange='self.location.href=this.options[this.selectedIndex].value;' SIZE="10" NAME="VAELGLAND">
<%
LAND = Request.Querystring("LAND")

Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("database/siteinabox.mdb")
Conn.Open DSN
strSQL = ("SELECT * FROM publications WHERE COUNTRY=" & LAND)
Set rs = Conn.Execute(strSQL)
Do
%>
<OPTION VALUE="comic.asp?id=<% Response.write rs("ID") %>"><% Response.write rs("TITLE") %></OPTION>
<%   
rs.MoveNext
Loop While Not rs.EOF
Conn.Close
Set Conn = Nothing
%>
</SELECT>
</form>
</p>

Giver denne kode i browseren:
<h3>Udgivelser</h3>
<p><b>2. Vælg en udgivelse fra Danmark.</b></p><p>
<form>
<SELECT onchange='self.location.href=this.options[this.selectedIndex].value;' SIZE="10" NAME="VAELGLAND">
<font face="Arial" size=2>
<p>Microsoft VBScript runtime </font> <font face="Arial" size=2>error '800a01f4'</font>
<p>
<font face="Arial" size=2>Variable is undefined: 'LAND'</font>
<p>
<font face="Arial" size=2>/beta/udgivelser.asp</font><font face="Arial" size=2>, line 10</font>

Land er så vidt jeg kan se en tekst streng så du skal hvade ' omkring i SQL-en:

strSQL = "SELECT * FROM publications WHERE COUNTRY='" & LAND & "'"

Takker mange gange eagleeye... nu fungerer det! :)

/cotus