I have an ASP form (VBScript) that lists Appointment slots (there are several of the same time but I use a summing query to list just one each) and people who need to schedule themselves in. When all slots are full, that time is filtered out. When the user selects their name and Appt Slot and clicks Submit, I want to update one record of the Appt table with the ID of the person. I tried a SELECT that returns multiple fields but I can't edit/update the UserID. UPDATE doesn't accept a [TOP 1] parameter.
Code:
qryCheckPre = "SELECT [OpenSlots].[TimeStart], [OpenSlots].[TestSlot], [OpenSlots].[Location], [OpenSlots].[TimeLoc] "
qryCheckPre = qryCheckPre + "FROM [OpenSlots] "
qryCheckPre = qryCheckPre + "WHERE ([OpenSlots].[TimeLoc] = '"
qryCheck = qryCheckPre + tmpTime + " - " + tmpLoc + "'); "
Set WriteRS = Server.CreateObject("ADODB.Recordset")
WriteRS.Open qryCheck, FitTestDB, adOpenForwardOnly, adLockOptimistic, adCmdText
WriteRS.Edit
WriteRS("UserID") = tmpUserID
WriteRS("Submit") = Now
WriteRS.Update
WriteRS.Close
dBforums
>
Update single MSAccess record from ASP form
11-24-04, 20:04
Update single MSAccess record from ASP form
Linear Mode
