编程开发

PHP与MySQL连接

<?php
//连接MySQL
$db=mysql_connect(‘主机名，本地主机用localhost,远程用IP地址’,’帐号’,’密码’);
mysql_select_db(data);//选择数据库
mysql_query(“set names ‘utf8’”);//设置编码，若中文乱码建议加上
?>

<?php
//关闭连接
mysql_close($db);
?>

编程开发

ASP与MySQL数据处理

首先连接数据库，方法：http://www.xefan.com/archives/66045.html。以下语句为示例语句，请根据实际情况修改
查询数据：

Set RS = conn.Execute(“SELECT * FROM user”)
While Not RS.EOF ‘while…wend循环，用于读取所有的信息
Response.Write RS.Fields(“username”) & “, “ & RS.Fields(“password”) & “<br>”
RS.MoveNext ‘记录集指针下移
Wend

插入数据：

Set rs = Conn.Execute(“insert into user (nm,pw) values (test’,’test’)”)

更新数据：

Set rs = Conn.Execute(“update user set nm=’用户ASPupdate’,pw=’pwaspupdate’ where id=24”)

删除数据：

Set rs = Conn.Execute(“delete from user where id=25”)

编程开发

ASP与MySQL连接

首先你的服务器得安装有MySQL ODBC驱动，下载地址：http://cn.ziddu.com/download/370567/mysql-connector-odbc-noinstall-5.1.5-win32.zip.html

数据库链接

Dim connstr, conn , rs
‘SERVER为数据库主机名（本地主机用localhost,远程用IP地址）；DATABASE为数据库名；UID为用户名；PASSWORD为密码
connstr = “DRIVER={MySQL ODBC 5.1 Driver}; SERVER=localhost; DATABASE=data; UID=root;PASSWORD=root; OPTION=3”
Set conn = Server.CreateObject(“ADODB.Connection”)
conn.Open(connstr)

关闭数据库链接

Conn.Close ‘关闭数据库链接
Set Conn = Nothing ‘清空数据库链接，释放内存

编程开发

ASP往ACCESS插入数据

首先连接数据库，方法：http://www.xefan.com/archives/65914.html。往数据库的test表中字段名为username、password插入数据。

法一：

1
2
3
4
5
6
7
8
9
username = "www.xefan.cn"
password = "xefan.cn"
sql="select * from test" 
rs.open sql,conn,1,3
rs.addnew
rs("username")=username
rs("password")=password
rs.update
rs.close

法二：

1
2
3
4
username = "www.xefan.cn"
password = "xefan.cn"
sql="insert into test (username,password) values ('"&username"','"&password"')"
conn.execute(sql)
编程开发

ASP与ACCESS连接

连接数据库
法一：

1
2
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="&Server.MapPath("data.mdb此为数据库名")

法二：

1
2
3
4
5
dim db,conn,myconn
db="data.mdb此为数据库名"
Set Conn = Server.CreateObject("ADODB.Connection")
myconn="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(db)
Conn.Open MyConn

关闭连接

1
2
conn.Close
Set conn = Nothing