|
|
| 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 | 27 | 28 | 29 | 30 | |
|
|
|
|
|
|
|
|
การเปิดตารางฐานข้อมูลใช้ใน VBA โดยใช้ ADODB.Recordset กับ SQL statement
Dim rsKaizen As ADODB.Recordset Dim cmdKaizen As ADODB.Command
'Query up open kaizen request strCmd = "SELECT WO.WRNO, WO.REMARK, WO.WOACTION, WO.WRDATE, WO.ACT_DATE " & vbCrLf & _ "FROM WO "
Set rsKaizen = New ADODB.Recordset rsKaizen.ActiveConnection = CurrentProject.Connection rsKaizen.CursorType = adOpenStatic rsKaizen.LockType = adLockReadOnly rsKaizen strCmd
rsKaizen.Filter = "WRNO like 'KR*' AND ACT_DATE = '0'"
Create Date : 24 กันยายน 2553 |
Last Update : 24 กันยายน 2553 10:11:35 น. |
|
0 comments
|
Counter : 873 Pageviews. |
|
|
|
| |
|
|