Udtrække data i et bestemt orden

Ja det kan gøre sådan her:

<%
noPrRow = 0
maxPrRow = 3
response.write "<table>"
do while not rs.EOF
  if noPrRow = 0 then response.write "<tr>"
  response.write "<td>"

  'Udskriv data her
  Response.write rs("kolonnenavn")

  response.write "</td>"
  noPrRow = noPrRow + 1
  if noPrRow = maxPrRow then
    response.write "</tr>"
    noPrRow = 0
  end if
  rs.Movenext
loop
if noPrRow > 0 then response.write "</tr>"
response.write "</table>"
%>


den udksriver det som

1  2  3
4  5  6
7  8  9
..
..
28 29 30

Melder fejl på linje 36 ; Et objekt er obligatorisk: ''

<!--#include file="Connections/Conn3.asp" -->
<%
Dim dost_site
Dim dost_site_numRows
Dim noPrRow
Dim maxPrRow
Dim vefat

Set dost_site = Server.CreateObject("ADODB.Recordset")
dost_site.ActiveConnection = MM_Conn_STRING
dost_site.Source = "SELECT * FROM dost_siteler"
dost_site.CursorType = 0
dost_site.CursorLocation = 2
dost_site.LockType = 1
dost_site.Open()

dost_site_numRows = 0
%>

<head>
<title>Untitled Document</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>

<body>

<%
noPrRow = 0
maxPrRow = 3
response.write "<table>"
do while not dost_site.EOF
  if noPrRow = 0 then response.write "<tr>"
  response.write "<td>"

  'Udskriv data her
  Response.write vefat.Fields.Item("isim").Value        <--------- Her
  response.write "</td>"
  noPrRow = noPrRow + 1
  if noPrRow = maxPrRow then
    response.write "</tr>"
    noPrRow = 0
  end if
  rs.Movenext
loop
if noPrRow > 0 then response.write "</tr>"
response.write "</table>"
%>
</body>

<%
dost_site.Close()
Set dost_site = Nothing
%>

vefat skal vel erstattes med dost_site da det er dit resordset.

den har jeg lige rettet, det var ikke det :)

så det vel en anden fejl?

ja ! men kan ikke finde den

Hvilken fejl får du?

Et objekt er obligatorisk: ''

På samme linie?

Der er en rs mere i denne linje:    rs.Movenext  lige før loop
Det skal være:
dost_site.movenext

det var på en anden linje :/ , har rettet den...

men jeg havde tænkt på at det jeg udskriver skulle fungere som et link

altså :
Response.write <a href="dost_site.Fields.Item("url")">dost_site.Fields.Item("isim").Value</a>

kunne i måske rette den til så det vil fungere :)

Sådan her:

Response.write "<a href=""" & dost_site.Fields.Item("url") & """>" & dost_site.Fields.Item("isim").Value & "</a>"

takker igen eagleeye, virker bedre end jeg havde forventet.

inden jeg lukker, kan man ikke angive width i response.write "<td>"  så de ikke står så tæt på hinanden?

fandt ud af det selv, så jeg takker og lukker :)

ok :)