1. Die Felder mit Standartwerten belegt.
2. �ndern der Schleife und der Reihenfolge
Dim iLoop
iLoop = 0
For each num in datumS
If ((mitarbeiter1(iLoop) <> 0) or (datumS(iLoop) <> 0 )) then
strSQL = "INSERT INTO Rufbereitschaft (Datum, Name) VALUES ('"
&datumS(iLoop)& "','" &mitarbeiter1(iLoop)& "')"
dbBooks.Execute strSQL
end if
iLoop = iLoop +1
next
Und nun l�uft es.
Danke f�r die Hilfen.
mfg wegener
| Oft Gefragtes: http://www.aspgerman.com/aspgerman/faq/
| [aspdebeginners] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspdebeginners/ = Listenarchiv
| Sie knnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspdebeginners.asp
