SQL forespørgsel

Laver du evt. en MoveNext inden du udskriver fra tabellen?

Nej, den ser sådan ud:

Dim Connect2, Arr2, query2
query2 = \"SELECT * FROM nyhedsscroll\"
Set Connect2 = Server.CreateObject(\"ADODB.Connection\")
Connect2.Open Session(\"DB3\")
Set Arr2 = Connect2.Execute(query2)
do until Arr2.EOF%>
makeNews(\'<p><span class=typeName><%=Arr2(\"type\")%></span><br><span class=separator>&nbsp;</span><div class=description><%=Arr2(\"tekst\")%><br><a href=\"<%=Arr2(\"link\")%>\" class=nyhed1>Læs mere...</a></div></p>\');
<%
Arr2.MoveNext
loop
Arr2.Close
Connect2.Close%>

Prøv sådan her:

Set Connect2 = Server.CreateObject(\"ADODB.Connection\")
Connect2.Open Session(\"DB3\")

Hvad gør du med den session?
Session(\"DB3\")

Set Arr2 = Connect2.Execute(\"SELECT * FROM nyhedsscroll\")

Session(\"DB3\") er min sti til databasen

Og det du foreslår giver det samme resultat som før

Hej prøv denne ;-).

dim cn, rs, sql
Set cn = Server.CreateObject(\"ADODB.Connection\")
Set rs = Server.CreateObject(\"ADODB.Recordset\")
cn.open \"Database\",\"admin\",\"admin\"
rs.activeconnection = cn
rs.cursortype = adopenforwardonly
sql = \"SELECT * FROM [Table] WHERE Field=Value ORDER BY Field\"
rs.Open sql
On Error Resume Next
rs.MoveFirst
do while Not rs.eof
   
    rs.MoveNext
loop
rs.close
Set rs = nothing
cn.close
Set cn = nothing

Hej

Prøv at slette de 2 poster der ikke kommer ud for at se om de er fejlbehæftet.

Ö-)

Hej Igen

Der er ikke noget galt med dit script, har du prøvet at sende det til skærmen for at se om det ikke er java scriptet der er noget galt med.

Hilsen,
    Arm Stærk

prøv dette:
strSQL = \"Select * from tabel\"
Set rs = Conn.Execute(strSQL)

Do Until rs.eof
  Response.write rs(\"navn\")
  rs.movenext
Loop

set rs = nothing

*****************
det skulle meget gerne virke

Hvornår får jeg mine point