CoccozzMedlem sedan apr. 20032 072 inlägg Men eftersom den skall skriva ut tabeller och aspkod så fungera det inte :(
Här får du vad det är den skall skriva ut också ;)
<tr><td width="20%"><center><font face="Verdana" size="1" color="#000000"><%=rs("date")%></font></center></td>
<td width="40%"><center><font face="Verdana" size="1" color="#000000"><a href="news.asp?ID=<%=rs("id")%>">
<u><%=rs("title")%></u></a></font></center></td><td width="20%"><center><font face="Verdana" size="1" color="#000000"><%=rs("kalla")%></font></center></td>
<td width="20%"><center><font face="Verdana" size="1" color="#000000"><%=rs("misc")%></font></center></td>"
CoccozzMedlem sedan apr. 20032 072 inlägg Men det verkar som om det går att lösa genom att byta ut dubbelfnuttarna mot enkefnuttar
/red.
Nope. På allt utom när själva aspsnuttarna kommer...
Då får man felmeddelandet
Unterminated string constant
Efter koden ex.
response.write "<tr><td width='20%'><center><font face='Verdana' size='1' color='#000000'><%=rs('date')
-------------------------------------------------------------------------------------------------------^
GimboMedlem sedan dec. 20001 626 inlägg response.write "<tr><td width=""20%""><center><font face=""Verdana"" size=""1"" color=""#000000"">'" & rs("date")& "' </font></center>"
CoccozzMedlem sedan apr. 20032 072 inlägg Får då detta felmeddelande
Microsoft VBScript runtime error '800a01a8'
Object required: ''
/pag/Coffaz/Default/body.asp, line 64
Line 64
set rs = connect.execute(SQL)
GimboMedlem sedan dec. 20001 626 inlägg kan man få se på mer kod? (hela din koppling till databasen samt de raderna där du försöker kalla på data från databasen)
CoccozzMedlem sedan apr. 20032 072 inlägg Givetvis ;)
<%
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/databas/news.mdb")
SQL = "SELECT TOP 5 * From news ORDER BY ID DESC"
set rs = connect.execute(SQL)
while not rs.eof
response.write "<tr><td width=""20%""><center><font face=""Verdana"" size=""1"" color=""#000000"">'" & rs("date") & "'</font></center></td><td width=""40%""><center><font face=""Verdana"" size=""1"" color=""#000000""><a href=""news.asp?ID='" & rs("id") & "'""><u>'" & rs("title") & "'></u></a></font></center></td><td width=""20%""><center><font face=""Verdana"" size=""1"" color=""#000000"">'" & rs("kalla") & "'</font></center></td><td width=""20%""><center><font face=""Verdana"" size=""1"" color=""#000000"">'" & rs("misc") & "'</font></center></td>"
rs.movenext
Wend
%>
LarsGMedlem sedan dec. 200012 464 inlägg response.write "<tr><td width='20%'><center><font face='Verdana' size='1' color='#000000'> " & rs("date") &_
"</td></tr>"
CoccozzMedlem sedan apr. 20032 072 inlägg Så ändrade jag till innan, men då sa Gimbo att dubbla dubbelfnuttar och ' " & rs=("ddd") & " ' funkade
Men det hjälper väl inte mot det här felmeddelandet elr? Orkar inte ändra allt för att sedan ändra tebax igen :( :)
GimboMedlem sedan dec. 20001 626 inlägg det fungerar lika bra med dubbla fnuttar
<%
Set MinCon = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")
MinCon.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("/databas/news.mdb")
SQL = "SELECT TOP 5 * From news ORDER BY ID DESC"
'set rs = connect.execute(SQL)
rs.OPEN SQL, minCon
while not rs.eof
response.write "<tr><td width=""20%"">......"
ditt problem ligger i din recordset, jag har kommenterat bort set rs = minCon...
och lagt till
rs.open sql, mincon
testa det
CoccozzMedlem sedan apr. 20032 072 inlägg Nu fungerar det klockrent...Tackar så mycket :)
//Coccozz