---

efter opgradering virker mit script ikke siden er blank.

nogen der kan hjælpe ???

<%
dim Line_tx_

Dim objConn
Set objConn = Server.CreateObject("ADODB.Connection")

Dim objRS
Set objRS = Server.CreateObject("ADODB.Recordset")

objConn.ConnectionString="Driver={MySQL ODBC 3.51 Driver};
Server=localhost; Database=brugernavn; Uid=brugernavn; Pwd=password;"
objConn.Open

SQL_tx_ = "SELECT * FROM `usrtip` LIMIT 0 , 3000 "
objRS.Open SQL_tx_ , objConn
Line_co_ = 0

if not ObjRS.EOF then
DO
Line_co_ = Line_co_ + 1
response.write "<tr><td>" & ObjRS("TipMail_ol") & "</td><TD>" & Line_co_
& "</td></tr>"
ObjRS.MoveNext
Loop While Not ObjRS.EOF
end if


Set objConn = Nothing
Set objRS = Nothing



%>

---

Kim Sønderup (nukehosting.dk) skrev:

> efter opgradering

Hvad har du opgraderet?

Scriptet, browseren, webserveren, ...?


> virker mit script ikke siden er blank.

Er siden fuldstændig blank? Har du prøvet at vise html-koderne?

Giv gerne et link til siden.


> if not ObjRS.EOF then

Af hensyn til fejlfindingen - prøv at indsætte en else-del hvor du
udskriver en besked når postsættet er tomt.


> response.write "<tr><td>" & ObjRS("TipMail_ol") &
> "</td><TD>" & Line_co_

Her udskriver du nogle tabelrækker, men man kan ikke se om du også
udskriver det i en tabel (altså om der er <table> - </table>
omkring din udskrift).
--
Jens Gyldenkærne Clausen
Svar venligst under det du citerer, og citer kun det der er
nødvendigt for at forstå dit svar i sammenhængen. Se hvorfor og
hvordan på http://usenet.dk/netikette/citatteknik.html