script / ingenting i databasen
Jeg har lavet dette her script -><%
Response.Write \"<table align=\'center\' width=\'750\'>\"
Response.Write \"<tr align=\'left\' valign=\'top\'>\"
Response.Write \"<td class=\'nyhed_top\'>\"
Response.Write \"<b>NYHEDER</b>\"
Response.Write \"</td>\"
Response.Write \"</tr>\"
Response.Write \"</table>\"
Response.Write \"<br>\"
\' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject(\"ADODB.Connection\")
DSN = \"DRIVER={Microsoft Access Driver (*.mdb)}; \"
DSN = DSN & \"DBQ=\" & Server.MapPath (\"database/nyhed.mdb\")
Conn.Open DSN
\' SQL forespørgsel
strSQL = \"Select * from nyhed\"
\' Udfør forespørgsel (rs indeholder nu resultatet)
Set rs = Conn.Execute(strSQL)
Do
Response.Write \"<table align=\'center\' width=\'750\'>\"
Response.Write \"<tr align=\'left\' valign=\'top\'>\"
Response.Write \"<td class=\'nyhed_top\'>\"
\' Skriver værdien af kolonnen Dato
Response.Write \"<b>Skrevet d.</b> \"
Response.Write rs(\"Dato\") & \" \"
Response.Write \" \"
Response.Write \"-\"
Response.Write \" \"
\' Skriver værdien af kolonnen Emne
Response.Write \" \"
Response.Write \"<b>Emne :</b> \"
Response.Write rs(\"Emne\") & \" \"
Response.Write \"</td>\"
Response.Write \"</tr>\"
Response.Write \"<tr align=\'left\' valign=\'top\'>\"
Response.Write \"<td>\"
\' Skriver værdien af kolonnen Nyhed
Response.Write rs(\"Nyhed\") & \"<p>\"
Response.Write \"</td>\"
Response.Write \"</tr>\"
Response.Write \"</table>\"
Response.Write \"<br>\"
\' Gå til næste Record i rs
rs.MoveNext
\' Fortsæt indtil rs er gennemløbet (EOF = End Of File)
Loop While Not rs.EOF
Conn.Close
Set Conn = Nothing
%>
______________________________________-
Her kommer så spørgsmålet ->
Hvordan laver en funktion som skriver et eller andet på siden som fortæller brugeren at der ikke er nogle tags på tagwallen, f.eks ....
