Avatar billede loukas Mester
10. august 2007 - 14:41 Der er 6 kommentarer og
1 løsning

tomt recordset?

Jeg forstår ikke hvorfor jeg ikke får noget skrevet ud på koden her, for der er masser af poster i tabellen "boliger":

Set rs = Server.CreateObject("ADODB.RecordSet")
SQL = "SELECT * FROM boliger"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open strconnect

rs.CursorLocation = 3
rs.Open SQL, Conn, 1   
   
    if rs.EOF then
        Response.Write "HMMMMM"
    else
        rs.PageSize = 10
        rs.AbsolutePage = intPage
        intRecCount = rs.PageSize
        intPageCount = rs.PageCount
        do while not rs.eof
etc..
Avatar billede jansangill Nybegynder
10. august 2007 - 15:28 #1
måske tilføj lidt mere kode, f.eks det der skal skrives ud. Det du har vist der er bare hvis der ikke er poster, så skriv HMMMM, ellers gør det andet. Men hvilket andet?
Avatar billede loukas Mester
10. august 2007 - 16:01 #2
Ja og det er jo netop det der er problemet, at den bare skriver HMMMMMM

Men her er noget mere kode
<%

strconnect = "Driver={MySQL ODBC 3.51 Driver};Server=localhost;port=3306;Database=bolig00721;User=istoria;Password=kasper4louis;Option=3;"

Set rs = Server.CreateObject("ADODB.RecordSet")
SQL = "SELECT * FROM boliger"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open strconnect

rs.CursorLocation = 3
rs.Open SQL, Conn, 1   
   
    if rs.EOF then
        Response.Write "HMMMMM"
    else
        do while not rs.eof
        Response.Write rs("leje_md") & "<br>"
        rs.movenext
        loop
    end if

Conn.Close

%>
Avatar billede loukas Mester
10. august 2007 - 16:02 #3
hov, jeg tror lige jeg skifter password ;-)
Avatar billede loukas Mester
10. august 2007 - 16:11 #4
Her er 2 forskellige koder.
Eksempel 1 Skriver "HMMMMMMM"
Eksempel 2 Skriver alle posterne ud som den skal.
Hvorfor ?!?!?


Eksempel 1
<%
strconnect = "Driver={MySQL ODBC 3.51 Driver};Server=localhost;port=3306;Database=bolig00721;User=istoria;Password=kasper4louis;Option=3;"

Set rs = Server.CreateObject("ADODB.RecordSet")
SQL = "SELECT * FROM boliger"
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open strconnect

rs.CursorLocation = 3
rs.Open SQL, Conn, 1   
   
    if rs.EOF then
        Response.Write "HMMMMM"
    else
        do while not rs.eof
        Response.Write rs("leje_md") & "<br>"
        rs.movenext
        loop
    end if
   
set rs = nothing
%>



Eksempel 2
<%
SQL2 = "SELECT * FROM boliger"   
set rs2 = Conn.Execute(SQL2)
   
    if rs2.EOF then
        Response.Write "HM2HM2"
    else
        do while not rs2.eof
            Response.Write rs2("leje_md") & "<br>"
            rs2.movenext
        loop
    end if
   
set rs2 = nothing
Conn.Close
%>
Avatar billede jansangill Nybegynder
10. august 2007 - 18:48 #5
prøv med

if rs.EOF then
        Response.Write "HMMMMM"
    else
      If Not (rs.BOF Or rs.EOF) Then
        rs.PageSize = 10
        rs.AbsolutePage = intPage
        intRecCount = rs.PageSize
        intPageCount = rs.PageCount
        do while not rs.eof
          response.write "s"
          rs.moveNext
        loop
      end if


I eksempel 2 åbner du ikke databsen, der executer du en sql. Måske har du åbnet din databse forkert?
Avatar billede loukas Mester
10. august 2007 - 23:47 #6
Som jeg skrev virker eksempel 2 fint. Så jeg åbner selvføl'i databasen ;-)
Og har du et forslag til hvordan jeg ellers kan åbne databasen?
Avatar billede loukas Mester
11. august 2007 - 00:07 #7
Hmm, Jeg har slettet databasen fra mySql-serveren og oprettet den igen.
Hokus pokus, nu virker det hele igen.
Hvorfor har jeg desværre ikke nogen forklaring på.
Men tak for hjælpen anyway ;-)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester