|
[x]
Posted via EE Mobile
|
|
| Search, ask, and monitor your questions on the go with EE Mobile. Visit Experts Exchange from your mobile device and never be out of touch again. |
|
|
|
|
Asked by NEWJACK in Microsoft Access Database, Access Forms
i need to know how to make the following recordset updateable >>dont know what else i can say to explain what i need
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
|
Select Case xTask
Case Is = 213
With cmd
.ActiveConnection = cnAP
.CommandType = adCmdStoredProc
.CommandText = "qry_checkchecklist"
.Parameters.Refresh
.Parameters.Append .CreateParameter("fOrderID", adInteger, adParamInput, 20, xID)
.Parameters.Append .CreateParameter("fTask", adInteger, adParamInput, 129, xTask)
.Execute
End With
Set rs1 = New ADODB.Recordset
With rs1
.CursorLocation = adUseClient
.Open cmd
End With
If rs1.RecordCount <> 0 = True Then
DoCmd.OpenForm "frmOrderCheckList", acNormal, , , acFormEdit, acHidden
Form_frmTaskData.subCheckList.SourceObject = "frmOrderCheckList"
Set Form_frmTaskData.subCheckList.Form.Recordset = rs1
'*** Close and Release the Recordset
rs1.Close
Set rs1 = Nothing
|
20091111-EE-VQP-92 - Hierarchy / EE_QW_3_20080625
