Avatar billede Slettet bruger
06. april 2005 - 20:50 Der er 6 kommentarer og
1 løsning

Kan ikke få data frem.

Hvad er der galt siden den ikke vil hente mine data frem?



<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("db/loft.mdb")

Set rs = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM loft order by made DESC "
rs.Open strSQL, connection, 1, 3
Do While Not rs.EOF And intRecCount > 0

Set record = Connection.Execute(strSQL)
Ialt = Record("found")
response.write("<font size=""2"">")
response.write(""& rs("headline") & "<br>")
response.write(""& rs("text") & "<br>")
response.write("Skrevet af: "& rs("name") & "<br>")
response.write("Skrevet den: "& rs("made") & "<br>")
response.write("Hjemmeside: "& rs("homepage") & "<br>")
response.write("Mail: "& rs("mail") & "<br>")
intRecCount = intRecCount - 1
rs.MoveNext
Loop

rs.Close
Set rs = Nothing


%>


DDD
Avatar billede busschou Praktikant
06. april 2005 - 20:54 #1
er det alt kode?
for så skal du da sætte intRecCount...ellers laver den intet
Avatar billede busschou Praktikant
06. april 2005 - 20:55 #2
Det jeg mener er at denne linje
Do While Not rs.EOF And intRecCount > 0
Hvis ikke du inden den har sat intRecCount ...ja så er den jo ikke større end nul ;o)
Avatar billede Slettet bruger
06. april 2005 - 21:01 #3
Ja men det er da noget der høre til et paging system neb det vil jeg ikke have på så jeg har prøvet at fjerne det.

Men det vil ikke kan ikke helt finde udaf hvordan det skal se ud uden intreccount.

DDD
Avatar billede Slettet bruger
06. april 2005 - 21:09 #4
AAhhhhhh sådan her virker det næsten:



<%
Set Connection = Server.CreateObject("ADODB.Connection")
Connection.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ="&Server.MapPath("db/loft.mdb")

Set rs = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM loft order by made DESC "
rs.Open strSQL, connection, 1, 3
Do While Not rs.EOF

Set record = Connection.Execute(strSQL)

response.write("<font size=""2"">")
response.write(""& rs("headline") & "<br>")
response.write(""& rs("text") & "<br>")
response.write("Skrevet af: "& rs("name") & "<br>")
response.write("Skrevet den: "& rs("made") & "<br>")
response.write("Hjemmeside: "& rs("homepage") & "<br>")
response.write("Mail: "& rs("mail") & "<br>")

rs.MoveNext
Loop

rs.Close
Set rs = Nothing


%>



Men nu skriver den først alle data i "headline" og så alle data i text osv.......
Men den skal jo skrive en række af gangen.
Altså
"headline"
"text"
osv.
"headline"
"text
osv.

istedet for
"headline"
"headline"
"text"
"text"
osv..
osv..

Hvad gør jeg så galt der??
Avatar billede Slettet bruger
06. april 2005 - 21:14 #5
Sorry Det går ikke godt for mig idag.
jeg læste forkert. Min fejl.

Men tak for hjælpen med det andet vil du have dine point?

DDD
Avatar billede busschou Praktikant
06. april 2005 - 21:15 #6
tja..hvis du mener de er fortjent :o)
Avatar billede Slettet bruger
06. april 2005 - 21:20 #7
Jo jeg havde ikke rigtigt lagt mærke til det før du sagde det.
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