专业的互联网服务提供商 | 全国销售热线:13088970831 企业:1432517019 客服:2856360245 | 登录 注册 新闻中心 客户支持 交费方式 联系我们 |
ASP连接access数据库例程
| ||
注意:要运行上述ACCESS例程请先下载数据库,放在db 或 rwdata文件夹下。请将例程放在根目录下。 <% Dim mode mode=request.form("text4") if mode=1 then name=request.form("text1") age=request.form("text2") addr=request.form("text3") if not isnumeric(age) then response.write "age must be number!try again":response.end age=clng(age) end if '******************************************************************** ' 与AccessDB相关的连接信息 ' 可以参照它建立您的数据库连接 '******************************************************************** Dim conn,rs,dbpath Set conn=Server.CreateObject("ADODB.Connection") Set rs=Server.CreateObject("ADODB.RecordSet") dbpath=Server.MapPath("rwdata/db_test_com.mdb") conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ="&dbpath '******************************************************************** '******************************************************************** dim strsql
if mode=1 then '******************************************************************** | ||
注意:要运行上述ACCESS例程请先下载数据库,放在rwdata文件夹下。请将例程放在根目录下。 |