31. marts 2003 - 07:05Der 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.
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 %>
I dette særtema ser vi på, hvordan cloud og AI bliver fundamentet for virksomhedernes digitale forretning, og hvordan de nye muligheder for automatisering og forretningsværdi kan udnyttes uden at miste overblik, sikkerhed og menneskelig kontrol.
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 %>
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 %>
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.