ASP之数据库连接

来源:互联网 发布:北京网络营销软件价格 编辑:程序博客网 时间:2024/06/04 18:12

FROM:http://blog.sina.com.cn/s/blog_41176fd10100nt91.html

<一>数据库的连接方法


  1.Access数据库的DSN-less连接方法:

 

setadocon=Server.Createobject("adodb.connection")
adoconn.Open"Driver={Microsoft AccessDriver(*.mdb)};DBQ="& _
Server.MapPath("数据库所在路径")


  2.Access OLE DB连接方法:

setadocon=Server.Createobject("adodb.connection")
adocon.open"Provider=Microsoft.Jet.OLEDB.4.0;"&_
"Data Source=" & Server.MapPath("数据库所在路径")


  3.SQL server连接方法:

setadocon=server.createobject("adodb.recordset")
adocon.Open"Driver={SQLServer};Server=(Local);UID=***;PWD=***;"& _
"database=数据库名;"


  4.SQL server OLE DB连接方法:

setadocon=Server.Createobject("adodb.connection")
adocon.open"provider=SQLOLEDB.1;DataSource=RITANT4;"& _
"user ID=***;Password=***;"& _
"inital Catalog=数据库名"

5.Oracle 连接方法:

setadocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft odbc fororacle};server=oraclesever.world;uid=admin;pwd=pass;"


  6.Oracle OLE DB 连接方法:

setadocon=Server.Createobject("adodb.connection")
adocon.open"Provider=OraOLEDB.Oracle;data source=dbname;userid=admin;password=pass;"


  7.dBase 连接方法:

setadocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft dbasedriver(*.dbf)};driverid=277;dbq=------------;"


  8.mySQL 连接方法:

setadocon=Server.Createobject("adodb.connection")
adocon.open"Driver={mysql};database=yourdatabase;
uid=username;pwd=yourpassword;option=16386;"


  9.Visual Foxpro 连接方法:

setadocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft Visual Foxprodriver};sourcetype=DBC;sourceDB=*.dbc;Exclusive=No;"


  10.MS text 连接方法:

setadocon=Server.Createobject("adodb.connection")
adocon.open"Driver={microsoft text driver(*.txt;*.csv)};dbq=-----;"&_
"extensions=asc,csv,tab,txt;Persist SecurityInfo=false;"


  11.MS text OLE DB 连接方法:

setadocon=Server.Createobject("adodb.connection")
adocon.open"Provider=microsof.jet.oledb.4.0;datasource=your_path;"&_
"Extended Properties'text;FMT=Delimited'"


<二>常用的四种SQL命令

  1.查询数据记录(Select)
  语法:Select 字段串行 Fromtable Where 字段=内容
  例子:想从book表中找出作者为"cancer"的所有记录,SQL语句便如下:

select * from book where author=’cancer’


  "*"是取出book表所有的字段,如查询的字段值为数字,则其后的"内容"便无须加上单引号,如是日期,则在Access中用(#)包括,而在SQLserver中则用(’)包括,
如:

select * from book where id=1
select * from book where pub_date=#2002-1-7# (Access)
select * from book where pub_date=’2002-1-7’ (SQL Server)


  提示
  日期函数to_date不是标准sql文,不是所有的数据库适用,所以大家在使用的时候要参考数据库具体语法

  另外如果是查询传入的变量,则如下:

strau=request.form("author")
strsql="select * from book whereauthor=’"&strau&"’"


  如果查询的是数字,则:

intID=request.form("id")
strsql="select * from book where id="&intID


  在很多数据库中,如:oracle,上面的语句是可以写成:

strsql="select * from book whereid='"&intID&"'"


  但是字符型一定不能按照数字格式写,需要注意。
2.添加记录(Insert)
  语法:

Insert into table(field1,field2,....) Values(value1,value2,....)


  例子:添加一作者是"cancer"的记录入book表:

insert into book (bookno,author,bookname) values(’CF001’,’cancer’,’Cancer无组件上传程序’)


  同样,如果用到变量就如下:

strno=request.form("bookno")
strau=request.form("author")
strname=request.form("bookname")
strsql="insert into book (bookno,author,bookname) values(’"&strno&"’,’"&strau&"’,’"&strname&"’)"


  3.用Recordset对象的Addnew插入数据的方法:
  语法:

rs.addnew
rs("field1").value=value1
rs("field2").value=value2
...
rs.update


  4.修改数据记录(Update)
  语法:

update table setfield1=value1,field2=value2,...where fieldx=valuex


  例子:

update book set author=’babycrazy’ wherebookno=’CF001’


  如果用到变量就如下:

strno=request.form("bookno")
strau=request.form("author")
strsql="update book setauthor=’"&strau&"’ wherebookno=’"&strno"’"

5.Recordset对象的Update方法:
  语法:

rs("field1").value=value1
rs("field2").value=value2
...
rs.update


  注意:使用语法3和语法5的时候,一定要注意字段的类型(尤其是日期型)一致,否则出错的几率非常的高。

  例子:

strno=request.form("bookno")
strau=request.form("author")
set adocon=server.createobject("adodb.connection")
adocon.open "Driver={Microsoft Access Driver(*.mdb)};DBQ="& _
Server.Mappath=("/cancer/cancer.mdb")
strsql="select * from book wherebookno=’"&strno&"’"
set rs=server.createobject("adodb.recordset")
rs.open strsql,adconn,1,3
if not rs.eof then ’如果有此记录的话
rs("author").value=strau
rs.update
end if
rs.close
set rs=nothing
adocon.close
set adocon=nothing


0 0
原创粉丝点击