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文件夹下。请将例程放在根目录下。 |
www.bo-yi.com |
全国服务热线:400-0755-393 加盟咨询电话:0755-82034561 投诉建议Q Q:275171283 讨论互动QQ群:64982759 |
报料号:jc68_com |
服务号:jc68-1 |
移动端二维码 |
腾讯微博 |
新浪微博 |