ช่วยตรวจดูerror โค้ดนี้ให้ทีค่ะ เพิ่งลองเล่น asp อะค่ะ แล้วก็เลยลองแก้โค้ดดู ซึ่งโค้ดในตอนแรกสามารถอัพโหลดและแก้ไขข้อมูลได้ปกติ
เพิ่งลองเล่น asp อะค่ะ แล้วก็เลยลองแก้โค้ดดู ซึ่งโค้ดในตอนแรกสามารถอัพโหลดและแก้ไขข้อมูลได้ปกติ แต่พอเปลี่ยนที่อยู่ของดาต้าเบท มันก็ไม่ยอมแอดข้อมูลให้อะค่ะ แต่รูปเข้าไปอยู่ในโฟเดอร์ตามต้องการแล้ว
<%@ codepage="874" %>
<% If Session("User") = "" Then Response.Redirect "default.asp" %>
<!--#include file="dbconnect.asp" -->
<!--#include file="validate.asp" -->
<!--#include file="upload.asp" -->
<%
'--------------------------------------------------------------
Response.Buffer = TRUE
'--------------------------------------------------------------
filepath=Server.MapPath("../db/video")
%>
<html>
<head><title></title></head>
<body bgcolor="#FFFFFF" text="#000000" leftmargin="0" topmargin="0">
<!--#include file="header.html" -->
<table width="100%" border="0" cellspacing="0" cellpadding="0">
<tr>
<td width="24%">
<!--#include file="bmenu.asp" -->
</td>
<td width="76%" valign="top">
<%
'--------------------------------------------------------------
byteCount = Request.TotalBytes
RequestBin = Request.BinaryRead(byteCount)
'--------------------------------------------------------------
Dim UploadRequest
Set UploadRequest = CreateObject("Scripting.Dictionary")
BuildUploadRequest RequestBin
GID = UploadRequest.Item("GID").Item("Value")
SNAME = UploadRequest.Item("SNAME").Item("Value")
SNOTE = doEmpty(UploadRequest.Item("SNOTE").Item("Value"))
'------------------------------------------------------------------
filepathname = UploadRequest.Item("SFILEVDO").Item("FileName")
SFILEVDO = Right(filepathname,Len(filepathname)-InstrRev(filepathname,"\"))
plvalue = UploadRequest.Item("SFILEVDO").Item("Value")
%>
<%
'------------------------------------------------------------------
If Trim(GID) = "" Or Trim(SNAME) = "" Then
Response.Write "กรุณากรอกข้อมูลให้ครบ<br>"
Response.Write "<a href=adds2.asp>Back</a>"
Response.End
End If
%>
<%
'------------------------------------------------------------------
Sub uploadimage(imgvalue,imgname)
if lenB(imgvalue) = 0 then
response.write "<b>ไม่สามารถอัพโหลดไฟล์ได้ " & "กรุณาลองใหม่อีกครั้ง Back </b>"
response.end
end if
limitSize = 4000000 * 6000000
if lenB(imgvalue) > limitSize then
response.write "<b>File มีขนาด " & FormatNumber(limitSize / 1024) & " KB "
response.end
end if
Set ScriptObject = Server.CreateObject("Scripting.FileSystemObject")
Set fileObj = ScriptObject.CreateTextFile(filepath & "/" & imgname)
For i = 1 to LenB(imgvalue)
fileObj.Write chr(AscB(MidB(imgvalue,i,1)))
Next
fileObj.Close
End Sub
%>
<%
'-------------------------------------------------------------------
Call uploadimage(plvalue,SFILEVDO)
%>
<%
'-------------------------------------------------------------------
If ConnectDB() = True Then
sql = "insert into subject " & _
"(GID, SNAME,SFILEVDO, SNOTE) " & _
"values ("& GID &", '"& SNAME &"','"& SFILEVDO &"','"& doQuote(SNOTE) &"')"
Conn.Execute sql 'error บันทัดนี้อะค่ะ
Response.Write "อัพโหลดเรียบร้อยแล้ว "
Response.Write "<a href=adds2.asp>กลับสู่หน้าหลัก</a>"
End If
%>
</td>
</tr>
</table>
</body>
</html>
Conn.Execute sql 'error บันทัดนี้อะค่ะ
Error Type:
Microsoft JET Database Engine (0x80004005)
Operation must use an updateable query.
/asp/test/admin/addsresult2.asp, line 94
Browser Type:
Mozilla/4.0 (compatible; MSIE 7.0; Windows NT 5.1; .NET CLR 1.1.4322; .NET CLR 2.0.50727)
Page:
POST 53906 bytes to /asp/test/admin/addsresult2.asp
POST Data:
error '80020009'
Exception occurred.
/iisHelp/common/500-100.asp, line 223
อยากรทราบว่ามันเป็นอะไรเหรอคะ แล้วต้องแก้ตรงไหนอะคะ
Tag : - - - -
Date :
11 ม.ค. 2551 15:26:37
By :
BOBO
View :
1621
Reply :
2
Operation must use an updateable query.
/asp/test/admin/addsresult2.asp, line 94
ในตาราง มี ฟิล์ดที่เป็น primary Key หรือ มี Index ทีระบุว่า ห้ามมีข้อมูลซ้ำกัน
และคุณกำลัง เพิ่มข้อมูลที่เขา หรือคูณ ได้ห้ามไว้แล้ว
ระบบจึงบอกกับคุณว่า ต้องใช้ Update เท่านั้น ห้าม Insert
(ไปดูการออกแบบตาราง หรือดูว่ามีข้อมูลซ้ำกับตัวที่กำลังจะเพิ่มหรือไม่)
กรณีที่สอง ฟังก์ชั่น connect ของคุณ ได้มีเงื่อนไขอย่างใดอย่างหนึ่ง เช่นการล็อกเรคคอร์ดที่ระบุว่า
การเชื่อมต่อในครั้งนี้ อนุญาตให้แค่ การ อัพเตต เท่านั้น ไม่สามารถเพิ่มข้อมูลใหม่ได้
(ไปดูการเซ็ตค่า ของ Conn ของคุณ)
Date :
12 ม.ค. 2551 18:58:34
By :
GTM
ตรวจเช็คหมดแล้วค่ะ แต่ก็ยังไม่ได้อยู่ดี ขอบคุณนะคะที่ช่วยตอบ ^^
Date :
14 ม.ค. 2551 22:17:51
By :
BOBO
Load balance : Server 03