15. september 2005 - 10:05
Der er
14 kommentarer og 1 løsning
Array sprøgsmaål
Kan jeg sætte mine DB udtræk ind i en enkelt Array eller string
Annonceindlæg tema
Cloud & AI
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.
15. september 2005 - 10:07
#1
brug : dim rs as adodb.recordset rs.getrows() /CAPAJ
15. september 2005 - 10:09
#2
Takker... lige et hurtigt spørgsmål... hvordan sætter jeg det så ind i mit Array
15. september 2005 - 10:13
#3
sry: Dim DitArray DitArray=rs.getrows()
15. september 2005 - 10:13
#4
Dim Rec, arrRecordset Set Rec = Server.CreateObject("ADODB.Recordset") 'Og hvad der ellers skal til for at åbne rec arrRecordset = Rec.GetRows Det giver et 2-dimensionelt array. Så du kan fx sige: Response.Write(arrRecordset(1, 3))
15. september 2005 - 10:32
#5
ADODB.Connection fejl '800a0e78' Handlingen er ikke tilladt, mens objektet er lukket. JEg har brugt din opsætning ldanielsen
15. september 2005 - 10:47
#6
Huskede du også at åben en connection og recordsettet og udføre en SELECT mod databasen?
15. september 2005 - 10:48
#7
ja... den køre en ordentlig gang JOIN Det kan da godt være jeg har sat dem ind forkert prøver lige igen
15. september 2005 - 10:50
#8
Ellers prøv at smide koden herind :)
15. september 2005 - 10:52
#9
jeg tror faktisk at det dur lidt nu... nu er det bare et andet sted den laver fejl.. strDSN = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="&Server.MapPath("../../../db/database.mdb") Set myConn = Server.CreateObject("ADODB.Connection") myConn.Open strDSN SQL = "(" & strSQL1 & ") UNION (" & strSQL2 & ") UNION (" & strSQL3 & ") UNION (" & strSQL4 & ") UNION (" & strSQL5 & ") UNION (" & strSQL6 & ") UNION (" & strSQL7 & ") UNION (" & strSQL8 & ") UNION (" & strSQL9 & ") UNION (" & strSQL10 & ") UNION (" & strSQL11 & ") UNION (" & strSQL12 & ") UNION (" & strSQL13 & ") UNION (" & strSQL14 & ") UNION (" & strSQL15 & ") UNION (" & strSQL16 & ") UNION (" & strSQL17 & ") UNION (" & strSQL18 & ") UNION (" & strSQL19 & ") UNION (" & strSQL20 & ") UNION (" & strSQL21 & ") UNION (" & strSQL22 & ") UNION (" & strSQL23 & ") UNION (" & strSQL24 & ") UNION (" & strSQL25 & ") UNION (" & strSQL26 & ") UNION (" & strSQL27 & ") UNION (" & strSQL28 & ") UNION (" & strSQL29 & ") UNION (" & strSQL30 & ") UNION (" & strSQL31 & ") UNION (" & strSQL32 & ")" Set rs = myConn.Execute(SQL) arrRecordset = myConn.GetRows Lidt dejligt med join
15. september 2005 - 10:55
#10
den laver fejl medmindre jeg sætter ' foran arrRecordset = myConn.GetRows
15. september 2005 - 10:56
#11
arr så kan man være dum arrRecordset = myConn.GetRows skal jo være arrRecordset = rs.GetRows
15. september 2005 - 10:57
#12
Det skal være arrRecordset = rs.GetRows
15. september 2005 - 11:10
#13
smid nogel svar.. så må i deles om point
15. september 2005 - 11:12
#14
Ikke nogen til mig, jeg synes ikke jeg bidragede med noget - ellers tak :)
15. september 2005 - 14:21
#15
Svar
Kurser inden for grundlæggende programmering