 |
|
มีปัญหาเวลาใช้ asp กับ Oracle โดยผ่าน Server.CreateObject("ADODB.Recordset") |
|
 |
|
|
 |
 |
|
จากโค้ดนี้
Set appdet = Server.CreateObject("ADODB.Recordset")
appdet.Open "Select * From dcc_wf_appdet Where " + _
"wfd_type='" & xDCN_TYPE & "' and " + _
"wfd_nbr = '" & obj.form(b,"xDCN_DOC_OLD") & "' and " + _
"wfd_rev='" & obj.form(b,"xDCN_NEWREV_OLD") & "' And wfd_class = '" & xxDCN_CLASS & "' ", Conn, 1, 3
มันขึ้น เออเรอว่า
ADODB.Recordset error '800a0cb3'
Current Recordset does not support updating. This may be a limitation of the provider, or of the selected locktype.
/DCCSystem/Doc/Sys/SYSdailyInsert.asp, line 1306
ซึ้งที่บรรทัด 1306 มีโค้ดว่า
appdet.addnew
ครับ
และผมลองแก้ จาก Conn, 1, 3 เป็น Conn, 1, 3, 2
มันจะเปลี่ยนขึ้นเออเรอว่า
Microsoft OLE DB Provider for Oracle error '80040e14'
ORA-00903: invalid table name
/DCCSystem/Doc/Sys/SYSdailyInsert.asp, line 1276
ซึ้งที่บรรทัด 1276 มีโค้ดว่า
appdet.Open "Select * From dcc_wf_appdet Where " + _
"wfd_type='" & xDCN_TYPE & "' and " + _
"wfd_nbr = '" & obj.form(b,"xDCN_DOC_OLD") & "' and " + _
"wfd_rev='" & obj.form(b,"xDCN_NEWREV_OLD") & "' And wfd_class = '" & xxDCN_CLASS & "' ", Conn, 1, 3, 2
ครับ
Tag : ASP, Oracle, VBScript
|
|
 |
 |
 |
 |
Date :
2010-11-17 14:21:51 |
By :
ptou |
View :
1610 |
Reply :
3 |
|
 |
 |
 |
 |
|
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
จากโค้ดด้านบนจะมีการ insert เข้าฐานข้อมูลตามโค้ดด้านล่างด้วยนะครับ
appdet("wfd_nbr") = xDCN_DOC
appdet("wfd_rev") = xDCN_NEWREV
appdet.update
|
 |
 |
 |
 |
Date :
2010-11-17 14:25:33 |
By :
ptou |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
Microsoft OLE DB Provider for Oracle error '80040e14'
ORA-00903: invalid table name
/DCCSystem/Doc/Sys/SYSdailyInsert.asp, line 1276
จาก Error ข้างบนมันบอกว่า ไม่มี Table ชื่อ dcc_wf_appdet อันนี้ลองตรวจสอบใน Oracle ดูว่ามี Table ชื่อนี้ไหม เราเชื่อมต่อ Database ถูก ลูกหรือเปล่า (กรณีมีหลาย ก้อน Database)
คำแนะนำผมนะ เอาแบบ ถึกๆ ละกัน
ผมจะลอง insert เฉพาะ Field ที่เป็น Key ก่อน หรือ Field ที่ Database Require เท่านั้น แล้วดูว่ามีปัญหาไหม
อาจจะทำแบบนี้ก็ได้
Code (ASP)
strSQL="select * from dcc_wf_appdet "
RS.Open strSQL CN,1,3
RS.AddNew
RS("wfd_nbr")="Text1"
RS("wfd_rev")="Rev1"
RS.Update
RS.Close
Set RS=Nothing
สมมุติว่า Field 2 Field นั้น Require นะครับ แล้วดูว่า Error หรือเปล่าถ้าไม่ Error ค่อยเปลีย่นไปเป็น รับค่าจาก Object ใน Form ดูคับ
|
 |
 |
 |
 |
Date :
2010-11-17 19:21:43 |
By :
inanosms |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
 |
|
|
 |
 |
|
ขอบคุณครับ คุณ inanosms
|
 |
 |
 |
 |
Date :
2010-11-18 08:27:50 |
By :
ptou |
|
 |
 |
 |
 |
|
|
 |
 |
|
 |
 |
|
|