<%
Dim oConn, oRs, filePath, strSQL
filePath = Server.MapPath("anetdb.mdb")

Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&FilePath

Set oRs = Server.CreateObject("ADODB.RecordSet")
strSQL = "SELECT * FROM 客戶基本資料"
oRs.Open strSQL, oConn, 3, 3

oRs.AddNew
oRs.Fields("公司名稱") = Request("companyname")
oRs.Fields("網址") = Request("url")
oRs.Fields("建立日期") = date
oRs.Update
oRs.Close
%>

上述紅色部份的敘述為新增功能
在某些頁面新增沒問題
有些卻有問題﹝錯誤500)
可能的問題是什麼呢
抱歉請教一下了

贊助商連結

相同的一段程式碼套用在不同的新增頁面
有的新增頁面可以正確的執行有的卻不行
因此反而不容易偵錯
會出現以下的錯誤訊息
HTTP 500 - 內部伺服器錯誤
加上網管有設定Custom Error Page
除錯就更不容易了
可以請教問題出在哪嗎
會是TextBox與資料庫欄位欄寬不合(OVER)的關係嗎
謝謝賜教