skrive fra en database

Mener du ikke læse?

<td bgcolor=""#FF0000""><%= rs("Beskrivelse") %></td>

jo, læse... :0)... er vist lidt træt...

hmmm... glemte at skrive at hele koden er inden for <% %>

her er hele koden:

<%response.expires = 0%>
<body text="#FFFFFF" link="#FFFFFF" vlink="#CCCCCC" alink="#CCCCCC">
<table width="570" border="0" cellspacing="0" cellpadding="0" height="313">
  <tr>
    <td background="../images2/main.gif">
      <table width="570" border="0" cellspacing="0" cellpadding="0" height="313">
        <tr align="left">
          <td colspan="4" height="280">
            <table width="100%" border="0" cellspacing="0" cellpadding="0" height="100%">
              <tr>
                <td width="10" rowspan="2">&nbsp;</td>
                <td height="10">&nbsp; </td>
                <td width="10" rowspan="2">&nbsp;</td>
              </tr>
              <tr>
                <td valign="top" align="left">
<%Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/mypage/real thing/dbase/dbase.mdb")
Conn.Open DSN

strSQL = "Select * From grafik Where Type = 'photo'"

Set rs = Conn.Execute(strSQL)

Do

if rs.EOF then
  Response.write "Ingen billeder i databasen."
else
  colPrRow = 4
  colInRow = 0
  response.write "<table width=""450"" border=""0"">"
  do while NOT RS.EOF
    if colInRow = 0 then response.write "<tr>"
    response.write "<td><table width=""100"" border=""0"" cellspacing=""1"" cellpadding=""0"" height=""150"" bgcolor=""#000000""><tr><td bgcolor=""#FF0000""> =rs("Beskrivelse") </td></tr><tr><td>" & "<img src=""../images/photoshop/" & rs("billed") & """>" & "</td></tr><tr><td bgcolor=""#FF0000"">&nbsp;</td></tr><tr><td bgcolor=""#FF0000"">&nbsp;</td></tr></table></td>"
    colInRow = colInRow + 1
    if colInRow >= colPrRow then
      colInRow = 0
      response.write "</tr>"
    end if
    RS.MoveNext
  loop
  if colInRow > 0 then
    Response.Write "</tr>"
  end if
  response.write "</table>"
end if

Loop While Not rs.EOF

conn.Close
Set Conn = Nothing
%>

du skal have <% og %> uden om, når du skriver ud som du gør

enten skriver man:
%>
<td><%=rs("kolonnenavn")%></td>
<%

Eller skriver man:
<%
Response.write "<td>" & rs("kolonnenavn") & "</td>"
%>


Så denne:
response.write "<td><table width=""100"" border=""0"" cellspacing=""1"" cellpadding=""0"" height=""150"" bgcolor=""#000000""><tr><td bgcolor=""#FF0000""> =rs("Beskrivelse") </td></tr><tr><td>" & "<img src=""../images/photoshop/" & rs("billed") & """>" & "</td></tr><tr><td bgcolor=""#FF0000"">&nbsp;</td></tr><tr><td bgcolor=""#FF0000"">&nbsp;</td></tr></table></td>"

Skal være:

response.write "<td><table width=""100"" border=""0"" cellspacing=""1"" cellpadding=""0"" height=""150"" bgcolor=""#000000""><tr><td bgcolor=""#FF0000"">" & rs("Beskrivelse") & "</td></tr><tr><td>" & "<img src=""../images/photoshop/" & rs("billed") & """>" & "</td></tr><tr><td bgcolor=""#FF0000"">&nbsp;</td></tr><tr><td bgcolor=""#FF0000"">&nbsp;</td></tr></table></td>"

Wuhuuu... det virker :0).... Tak!