Hallo!
1. /iishelp/common/500-100.asp
Diese "Hilfedatei" von Microsoft hat zwei Fehler, die Du beseitigen
solltest, um anst�ndige Fehlermeldungen zu bekommen. Das "elseif" in
Zeile 129 sollte in "else if" ge�ndert werden (neue Zeile) und an einer
anderen Stelle gibt es noch ein "go to", das nat�rlich "goto" hei�en
sollte.
2. Variablen
Man bekommt weniger Fehler, wenn man alle Variablen deklariert und dazu
am Anfang des Skripts "option explicit" setzt.
3. Zeichenketten verkn�pfen
In VBScript werden Zeichenketten mit "&" verkn�pft und nicht mit "+".
Letzteres ist zwar auch m�glich, kann aber zu Missverst�ndnissen f�hren.
Warum also nicht grunds�tzlich "&"?
4. Letzter Tag eines Monats
Das Monatsultimo erh�lt man - so wie Du es brauchst - sehr einfach mit
der Funktion:
dateserial(Jahr1, Monat1 + 1, 1) - 1
Du k�nntest also einfach schreiben:
RS.Fields("Datum1").value = cstr(dateserial(Jahr1, Monat1 + 1, 1) -
1)
... oder "formatdatetime" statt "cstr" verwenden, aber ...
5. Datumsfelder in der Datenbank
Dar�ber hinaus w�rde ich das Datum nicht als Zeichenkette in die
Datenbank schreiben, sondern als Datumswert. Dann kann man es auch
sortieren oder einfacher abfragen. Zus�tzlich umgehst Du damit Probleme,
die dadurch entstehen, dass unterschiedliche Server Datumsformate nach
unterschiedlichen Gebietsschemata erzeugen.
Freundliche Gr��e
Joachim van de Bruck
| [aspgerman] als [email protected] subscribed
| http://www.aspgerman.com/archiv/aspgerman/ = Listenarchiv
| Sie k�nnen sich unter folgender URL an- und abmelden:
| http://www.aspgerman.com/aspgerman/listen/anmelden/aspgerman.asp
