response.write

Hur får man denna html kod till serverbaserad kod, dvs hur skrivar man om den fast m h a response.write:

<table border="0" width="100%" cellspacing="1" cellpadding="0">

                                            <tr>
                                            <% 
count = 0
Do Until rs.EOF
count = count + 1
If count Mod 2 = 0 then
color = "#AEAEFF"
Else 
color = "#FFFFFF"
End If %>
                                            <td width="86%" bgcolor="<%=color%>"> <b><%=left(rs("rubrik"),25)%>...</b> postad av: <i><%=rs("avsandare")%></i>&nbsp;<%=right(rs("datum"),5)%></td>
                                            <td width="14%" bgcolor="<%=color%>"> 

						<% 
						   response.write "<a href=""visa.asp?fraga=" & rs("ID") &"""> Läs mer »</a>" 
						   
						%>

						</td>

                                        </tr>
      <%
rs.MoveNext
Loop
%>

                                      </table>

Alltså det jag inte har fattat ännu, är hur man skriver tabeller m h a response.write ?? någon som tror sig kunna hjälpa mig??

Kanske...

<% 
response.write "<table border='0' width='100%' cellspacing='1' cellpadding='0'><tr>"          

count = 0
Do Until rs.EOF
count = count + 1
If count Mod 2 = 0 then
color = "#AEAEFF"
Else 
color = "#FFFFFF"
End If 
		
response.write " <td width='86%' bgcolor='" & color & "'> <b>" & left(rs("rubrik"),25) & "...</b> postad av: <i>" & rs("avsandare") & "</i> " & right(rs("datum"),5) & "</td><td width='14%' bgcolor='" & color & "'>"
 
	response.write "<a href=""visa.asp?fraga=" & rs("ID") &"""> Läs mer »</a></td></tr>" 
						   
rs.MoveNext
Loop

response.write "</table>"
%>

<td width='86%' kan man skriva:

td width=""86%""

om du gillar att ha " i källan om någon kollar på dina koder =)

Den skriver inte ut posterna från databasen, I dont get it??!!

'skriver ut posterna med varannan rad blå varannan vit
response.write "<table border='0' width='100%' cellspacing='1' cellpadding='0'>"

'Varannan rad färgad
count = 0
Do Until rs.EOF
count = count + 1
If count Mod 2 = 0 then
color = "#AEAEFF"
Else 
color = "#FFFFFF"
End If

'Skriver ut poster från databasen
response.write "<td width=""86%"" bgcolor='" & color & "'> <b>" & left(rs("rubrik"),25) & "...</b> postad av:<i> " & rs("avsandare") & " </i> " & right(rs("datum"),5) & "</td>"
response.write "<td width=""14%"" bgcolor='" & color & "'> <a href=""visa.asp?fraga=" & rs("ID") &"""> Läs mer »</a></td></tr> "
response.write "</table>" 

rs.MoveNext
loop
wend

jag får felmeddelandet

ADODB.Recordset error '800a0cc1' 
Item cannot be found in the collection corresponding to the requested name or ordinal.

det enda den skriver ut är ... postad av:

Du har skrivit fel namn på ett rs , finns inget fält som heter så

nope alla rs stämmer överens med databasen

Response.Write"<td width=""86%"" bgcolor="""& color &"""><b>"& left(Rs("rubrik"),25) &"...</b> postad av:<i> "& Rs("avsandare") &"</i> "& right(Rs("datum"),5) &"</td>"_
			&"<td width=""14%"" bgcolor="""& color &"""><a href=""visa.asp?fraga="& Rs("ID") &"""> Läs mer »</a></td></tr></table>"

hade jag skrivit

jag får samma felmeddelande, kan det va för att jag har 2st do while sattser??

lite längre upp i koden ser det ut så här:

pMonth = 0
while not rs.EOF
if not isnull(rs("datum")) then nMonth = month(cdate(rs("datum")))
if pMonth <> nMonth then
response.write "<p><b> "& monthname(nMonth) & "</b><hr size=1>"
pMonth = nMonth
end if

För övrigt är datum ett korkat namn på en kolumn

men nu är det så att jag har en datum kolumn, det är ett arkiv där posterna lagras som jag håller på med och då är inte datum ett korkat namn på en kolumn

Jo för datum är ett reserverat ord i de flesta databaser likaså text, sök på reserverade ord i detta forum så hittar du mer info om det