tjekker om der er noget i databasen
Hvordan skal den tjekke om der er noget i databasen, hvis der ik er noget..så skal den skrive \"FANDT INTET\"her er scripten, og på forhånd tak for hjælpen :O)
<%
dim mode, albumid, ringetoneid, land
strDSN = \"DRIVER={Microsoft Access Driver (*.mdb)};DBQ=\"&Server.MapPath(\"test.mdb\")
Set myConn = Server.CreateObject(\"ADODB.Connection\")
myConn.Open strDSN
session(\"lid\") = Request(\"lid\")
session(\"land\") = Request(\"land\")
%>
<!DOCTYPE HTML PUBLIC \"-//W3C//DTD HTML 4.0 Transitional//EN\">
<html>
<head>
<title>Untitled</title>
</head>
<body>
<A HREF=\"land.asp\">Forside</A> - <%=session(\"land\")%>
<BR><BR>
<%
strSQL = \"SELECT * From album Where land = \" & session(\"lid\") & \" ORDER by id desc\"
Set rs = myConn.Execute(strSQL)
do while not rs.eof
%>
<a href=\"melodi.asp?album=<%= rs(\"albumnavn\") %>&aid=<%= rs(\"id\") %>\"><%= rs(\"albumnavn\") %></a><br>
<%
rs.movenext
loop
%>
</body>
</html>
<%
rs.close
set rs=nothing
myconn.close
set myconn= nothing%>
