Hallo,
ich versuche in einer Prozedur, die im script-Bereich im head meiner Seite steht ein DB-Update durchzuführen (Access). Die Datenbank liegt auf dem selben Server wie die ASP-Seiten und die Verbindung funktioniert. Ich habe die Verbindung Con bereits am Anfang dieser Seite hergestellt. Die Prozedur wird per Button-Klick aufgerufen. Die Parameterübergabe funktioniert auch, die MsgBox gibt zum Test die Werte richtig aus. Nur die zweite MsgBox erscheint nicht und die Daten in der DB werden auch nicht geändert. An was könnte das liegen?
Sub DBUpdate(kursnummer,termin,freiePlaetze)
freiePlaetze = CInt(freiePlaetze)
If freiePlaetze > 0 Then
freiePlaetze = freiePlaetze - 1
End If
MsgBox freiePlaetze & " " & termin & " " & kursnummer
sqlString = "UPDATE Termine SET FreiePlaetze = " & freiePlaetze &_
"WHERE Kursnummer = " & kursnummer & " AND Termin = " & termin
Con.Execute sqlString
Con.Close
MsgBox "Die freien Plätze wurden um 1 reduziert!"
End Sub
Würde mich sehr über Eure Hilfe freuen. Ich weiß nicht mehr weiter.
Gruß Mannix