Avatar billede maron Nybegynder
31. marts 2003 - 07:05 Der er 3 kommentarer og
1 løsning

Random poster fra Access

Jeg har et random script som trækker 10 tilfældige poster ud af en Access database og det virker fint, men de skal omsættes til link, det vil sige at jeg skal ha trukket kolonnen "url" og sat ind i flg. script.

<%
Set objRs = Server.CreateObject("ADODB.Recordset")
strConn = "Driver={MicroSoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("db/test.mdb")
strSQL = "SELECT * FROM test"
objRs.Open strSQL, strConn, 1

Count = 0
Do While Count < 10
    objRs.MoveFirst
    Randomize
    objRs.Move(int(objRs.RecordCount * rnd()))
    If Not objRs.EOF And Not objRs.BOF Then
        Count = Count + 1
          Response.Write objRs ("navn")     
        response.write ("<br>")
    End If
Loop
%>
Avatar billede dk_akj Nybegynder
31. marts 2003 - 08:15 #1
Do While Count < 10
    objRs.MoveFirst
    Randomize
    objRs.Move(int(objRs.RecordCount * rnd()))
    If Not objRs.EOF And Not objRs.BOF Then
        Count = Count + 1
          Response.Write objRs ("navn")     
          Response.Write "<a href=" & ObjRs("url")& ">" & objRs("url") & "</a>"
        response.write ("<br>")
    End If
Loop
%>

//akj
Avatar billede dk_akj Nybegynder
31. marts 2003 - 08:16 #2
Ovenstående viser url'en som et link denne viser navnet som et link til url'en

    Do While Count < 10
    objRs.MoveFirst
    Randomize
    objRs.Move(int(objRs.RecordCount * rnd()))
    If Not objRs.EOF And Not objRs.BOF Then
        Count = Count + 1
            Response.Write "<a href=" & ObjRs("url")& ">" & objRs("navn") & "</a>"
        response.write ("<br>")
    End If
Loop
%> 


//akj
Avatar billede maron Nybegynder
31. marts 2003 - 08:21 #3
Mange tak :-)
Avatar billede dk_akj Nybegynder
31. marts 2003 - 08:21 #4
selvtak

//akj
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