上鎖的討論區
瀏覽次數：436
推到 Plurk!
推到 Facebook!
想问一个不对门路的问题:ASP+Access连接中,权限如何# |
|
答題得分者是：sos_admin
|
|
aKnightChen@Hotmail.com
一般會員   發表：62 回覆：57 積分：23 註冊：2003-06-13 發送簡訊給我 |
我用ASP ACCESS连接,
想INSERT一条记录,(INSERT语法绝对正确,而SELECT语法却可以成功执行)
可是总是提示:
---------------------------------------
Microsoft JET Database Engine 错误 '80040e14' INSERT INTO 语句的语法错误。 /SETCLIENTIP.ASP，行22
---------------------------------------
我将ACCESS的属性-->安全-->里将EVERYONE全设为可读可写权限.
我还将ACCESS所在的目录-->属性-->安全-->里也将EVERYONE设为可读写权限，
可是错误仍然一样。(我发现网上有好多网友也为此问题困惑)
------------
请大家指点。 發表人 - aKnightChen@Hotmail.com 於 2003/09/01 10:10:46
|
|
sos_admin
版主  發表：121 回覆：697 積分：768 註冊：2003-07-23 發送簡訊給我 |
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("../data/bjxx.mdb") 您可以这样设置数据库连接
|
|
ddy
站務副站長  發表：262 回覆：2105 積分：1169 註冊：2002-07-13 發送簡訊給我 |
ASP+Access 與Delphi 無關，移至回收區
|
|
aKnightChen@Hotmail.com
一般會員 發表：62 回覆：57 積分：23 註冊：2003-06-13 發送簡訊給我 |
首先非常感谢SOS ADMIN的回答.
-------------
注:我可以连接到ACCESS,能正确执行SELECT,可是不能执行UPDATE,INSERT语句
-------------
我的数据库连接是:
Conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("\")&"\KNTSOFTCLIENT.mdb;User ID=Admin;Password=;" 我也采用了你那种连接方式,
错误仍有.
|
|
aKnightChen@Hotmail.com
一般會員 發表：62 回覆：57 積分：23 註冊：2003-06-13 發送簡訊給我 |
<%
dim Conn
set rsExec=Server.CreateObject("ADODB.RecordSet")
set rsOpen=Server.CreateObject("ADODB.RecordSet") Set Conn = Server.CreateObject("ADODB.Connection") Conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source="&Server.MapPath("\")&"\KNTSOFTCLIENT.mdb;User ID=Admin;Password=;" sStr="SELECT TOP 1 CLT_ID FROM CLT_COST WHERE CLT_ID='" Request.QueryString("CLT_ID") "' AND #" CStr(Year(Now)) "-" CStr(Month(Now)) "-" CStr(Day(Now)) "# BETWEEN START_TIME AND END_TIME "
rsOpen.Open sStr,Conn,1,1 if not rsOpen.Eof then
rsOpen.Close
sStr="SELECT TOP 1 CLT_ID FROM CLT_IP WHERE CLT_ID='" Request.QueryString("CLT_ID") "'"
rsOpen.Open sStr,Conn,1,1
if rsOpen.Eof then
sStr="INSERT INTO CLT_IP (CLT_ID,IP) VALUE ('" Request.QueryString("CLT_ID") "','" Request.ServerVariables("remote_addr") "')"
Response.Write sStr
Response.Flush
[redrsExec.Open sStr,Conn,1,1] '在此出错[/red]
else
sStr="UPDATE CLT_IP SET IP='" Request.ServerVariables("remote_addr") "' WHERE CLT_ID='" Request.QueryString("CLT_ID") "'"
Response.Write sStr
Response.Flush
rsExec.Open sStr,Conn,1,1
end if
end if
%>
|
|
sos_admin
版主 發表：121 回覆：697 積分：768 註冊：2003-07-23 發送簡訊給我 |
对不起，您的这篇问题违法的ktop规定！ 我认为应该发表在〔難以歸類主題的討論區(Delphi) 〕，并且可以换个方法问哦< >,不过问题还是一样的帮您解答哦！< > <%
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" &_
Server.MapPath("../data/bjxx.mdb")
Set rs = Server.CreateObject("ADODB.Recordset")
xadd="insert into zhidu (lb,lr) values ('2222','33333')"
set rs=conn.execute(xadd)
response.write"数据添加成功！！！"
conn.close
%> 举个例子吧！
|
|
ddy
站務副站長 發表：262 回覆：2105 積分：1169 註冊：2002-07-13 發送簡訊給我 |
sos_admin 說的沒錯，我也是很不想刪這篇，只是不得不刪
因為之後如果有人發問asp /vb 的問題，就很難有立場去處理
aKnightChen@Hotmail.com 就麻煩您換個方式問囉
|
發表時間：2003-09-01 10:08:21
IP:218.20.xxx.xxx 未訂閱
系統時間：2024-10-01 21:07:21
聯絡我們 | Delphi K.Top討論版
| 本站聲明 |
|
1. 本論壇為無營利行為之開放平台，所有文章都是由網友自行張貼，如牽涉到法律糾紛一切與本站無關。 2. 假如網友發表之內容涉及侵權，而損及您的利益，請立即通知版主刪除。 3. 請勿批評中華民國元首及政府或批評各政黨，是藍是綠本站無權干涉，但這裡不是政治性論壇！ |