09. juli 2022 - 13:48Der er
10 kommentarer og 1 løsning
Sortering af dato
Har lavet denne kode fra 2 databaser, og resultatet skal sortere efter query2 efter salgsdato. Sælger nr. 3179 har lavet 29 salg.... hvordan sorterer jeg efter salgsdato?
<% Dim DBconn Set DBconn = Server.CreateObject("ADODB.Connection") DBconn.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("Saelger.mdb")
Dim rs, query Set rs = Server.CreateObject("ADODB.RecordSet")
query = "SELECT SalgID FROM Salg WHERE SalgID.SaelgerID=3179" rs.Open query, DBconn
count=1
Do While Not rs.EOF
Dim DBconn2 Set DBconn2 = Server.CreateObject("ADODB.Connection") DBconn2.Open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("Salg.mdb")
Dim rs2, query2 Set rs2 = Server.CreateObject("ADODB.RecordSet")
query2 = "SELECT * FROM Salg WHERE Salg.SalgID =" & rs("SalgID") & " ORDER BY Salg.Salgsdato" rs2.Open query2, DBconn2
Ellers så må det være noget med at hente id-er fra den første tabel til et array, og lave det til en streng som "[7,9,13]" og så " SalgID in [7,9,13] ORDER BY ..."
Og så kan man jo overveje om det skal være i 2 databaser?
query = "SELECT * FROM Saelger, [Server.MapPath("/log/Salg.mdb&");].Salg WHERE Saelger.SalgID=Salg.SalgID AND SalgID.SaelgerID=3763 ORDER BY Salg.Salgsdato"
kommer med fejl
Der opstod en Microsoft VBScript-kørselsfejl error '800a01c2'
Antallet af argumenter er forkert eller egenskabstildelingen er ugyldig: 'log'
query = "SELECT * FROM Saelger, [" & Server.MapPath("/log/Salg.mdb") & "].Salg WHERE Saelger.SalgID=Salg.SalgID AND SalgID.SaelgerID=3763 ORDER BY Salg.Salgsdato"
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.
