Hallo
Ich habe folgendes:
j = 0
if anzahl > 0 then
for i = 0 to ubound(UebArray) step 4
SQLxx = "select etc.
Set rsSubjCount = Server.CreateObject("ADODB.Recordset")
rsSubjCount.open SQLxx, MyConn
if not rsSubjCount.EOF then
tempArray(j) = "'" & rsSubjCount.fields(0).value & "'"
tempArray(j+1) = "'" & rsSubjCount.fields(1).value & "'"
j = j + 2
end if
next
end if
dabei kriege ich immer die Meldung 'Typen unvertraeglich' und zwar dort, wo ich versuche was in den TempArray reinzuschreiben. Ich habe schon alle moeglichen Varianten versucht, mit Hochkomma, ohne Hochkomma etc., aber alles geht nicht. Der obere Teil funktioniert, jedenfalls kann ich mir da Werte rausschreiben lassen.
Sieht irgendjemand den Fehler?
Gruss
Karin