14. november 2001 - 11:00Der er
14 kommentarer og 1 løsning
ASP problem
Hej..
Jeg har et lille problem med nedenstående ASP script, som jeg håber der er nogen der kan hjælpe mig med.
Scriptet skal ud fra et linkid hente billeder fra en database i en tabel der hedder \"billed\". Det virker også, men hvis der ikke er skrevet noget i tabellen \"billed\", skriver den ikke at der ikke er nogle billeder i databasen!
Håber der er en kløgtig sjæl der kan hjælpe mig!
<% Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"database.mdb\") strSQL = \"select * from links WHERE linkid=\"&Request(\"linkid\")
set rs = Conn.execute(strSQL)
if rs.EOF then Response.write \"Ingen billeder i databasen.\" else Do Until rs.EOF %>
Denne side indeholder artikler med forskellige perspektiver på Identity & Access Management i private og offentlige organisationer. Artiklerne behandler aktuelle IAM-emner og leveres af producenter, rådgivere og implementeringspartnere.
HUH!!!! Jeg tror ikk jeg forstår dit problem. \"men hvis der ikke er skrevet noget i tabellen \"billed\", skriver den ikke at der ikke er nogle billeder i databasen!\" !?!??!?!??!?
Okay, jeg tror jeg har mistforstået dig helt .. Du vil ikke vide om tabellen er tom, men om feltet billed er tomt .. right??
Så skriver du bare:
<% Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"database.mdb\") strSQL = \"select * from links WHERE linkid=\"&Request(\"linkid\")
set rs = Conn.execute(strSQL)
If (rs.BOF AND rs.EOF) Then Response.write \"Ingen billeder i databasen.\" else Do Until rs.EOF If Not rs(\"billed\") = \"\" Then \' el det her hvis det ikke virkerIf Not IsEmpty(rs(\"billed\")) Then %>
<% Set Conn = Server.CreateObject(\"ADODB.Connection\") Conn.Open \"DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=\" & Server.MapPath (\"database.mdb\") strSQL = \"select * from links WHERE linkid=\"&Request(\"linkid\")
set rs = Conn.execute(strSQL)
If (rs.BOF AND rs.EOF) Then Response.write \"Ingen billeder i databasen.\" else Do Until rs.EOF If Not rs(\"billed\") = \"\" Then \' el det her hvis det ikke virkerIf Not IsEmpty(rs(\"billed\")) Then %>
<img src=\"grafik/<%= rs(\"billed\") %>\">
<% Else Response.write \"Ingen billeder i databasen.\" End if RS.MoveNext Loop end if
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.