VB远程添加ACCESS的字段和数据
VB+asp+access如何远程添加字段和据或是用别的什么方法 以下是往字段里插入数据的asp代码,你只要在VB的网络控件中传值到这个页面即可<%
fwq = Request("fwq")'服务器名
jsm = Request("jsm") '角色名
DBPath = "你的数据库名.mdb"
Set conn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.RecordSet")
On Error Resume Next '如果出错,继续执行代码
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DBPath)
If Err.Number <> 0 Then
Err.Clear
Set conn = Nothing
Response.Write("数据库连接错误")
End If
rs.open "select * from 用户库 where fwq='" & fwq & "' and jsm='"& jsm &"'",conn,1,1
If rs.eof Then'找不到符合条件的记录,则创建新记录
sql="Insert Into 用户库(服务器,角色名,备注) Values('"&fwq&"','"&jsm&"','新用户')"
conn.Execute(sql)
else''若找到则更新这条记录
'这里写更新记录的语句
End If
rs.Close
set rs = Nothing
%>
添加字段的话,应该也不难吧,我也菜只能写这么些了 经过一个通宵的学习已经会用VB+ASP向ACCESS添加记录了`还用VB做了个用户注册系统
非常谢楼上的提供方法` 不错,学习了
页:
[1]