1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23:
<% Schemerige Recordset1 Schemerige Recordset1_numRows Vastgesteld Recordset1 = Server.CreateObject („ADODB.Recordset“) Recordset1.ActiveConnection = „Driver= {de Bestuurder van Microsoft Access (*.mdb)}; DBQ= c:\inetpub\wwwroot\statusreports\db\status.mdb“ schemerig Bureau Office= " werknemer = „„&Request.Form („werknemer“) &““ en „ als (Request.Form („werknemer“) = " allen“) toen Office= "" beëindig als Recordset1.Source = „SELECTEER * UIT JAX WAAR „&Office&“ gendate = # " &Request.Form („gendate“) & " # ORDERBY chef- DESC, werknemer ASC“ Recordset1.CursorType = 0 Recordset1.CursorLocation = 2 Recordset1.LockType = 1 Recordset1.Open () Recordset1_numRows = 0 %>