回 帖 发 新 帖 刷新版面

主题:[原创]Asp建立MYSQL数据库的连接-------补充ASP中各种数据库连接代码

如何建立MYSQL数据库的连接?
在安装好MYSQL ODBD的驱动程序后,应如何建立ASP文件连接数据库?

我们有两种方法:

一种是在ODBC数据源中建立一个DSN。具体方法是:
1、打开控制面板中的ODBD数据源;
2、选择系统DSN,添加一个新的DSN驱动程序;
3、选择MyODBD,出现一个对话框供输入MySQL:
(1)Windows DSN name:所要建立DSN的名称;
(2)MySQL Host (name or ip):MySQL服务器的名称或IP地址。一般填LocalHost ;
(3) MySQL database name:需要使用数据库的名称。
4、在MySQL管理程序中建立数据库。以数据库chunfeng为例,内有user数据表,两个字段分别是:username和password,我们可以试着加入几个记录:
   (1)user:连接数据库的用户名。可填root超级用户;
(2)password:连接数据库用户口令。可不填;
(3)Port(if not 3306):MySQL在服务器的端口。填默认为3306;
(4)SQL command on connect:使用SQL命令连接数据库。可不填。
全部填完后按OK保存。

好了,我们来连接数据库,ASP代码如下:            
<%
strConnection = "dsn=chunfeng;driver={myodbd driver};server=localhost;uid=root;pwd=; database=chunfeng"
Set adoDataConn = Server.CreateObject("ADODB.Connection")
adoDataConn.Open strConnection

strQuery = "SELECT * FROM user"
Set rs = adoDataConn.Execute(strQuery)
If Not rs.BOF Then
%>
<TABLE>
<TR>
<TD<b>用户名</b></TD>
<TD><b>口令</b></TD>
</TR>
<%
Do While Not rs.EOF
%>
<TR>
<TD><%=rs("username")%></TD>
<TD><%=rs("password")%></TD>
</TR>
<%
rs.MoveNext
Loop
%>
</TABLE>
<%
Else
Response.Write("Sorry, no data found.")
End If

rs.Close
adoDataConn.Close
Set adoDataConn = Nothing
Set rsEmailData = Nothing
%>



    另一种方法就是把上面ASP代码第二行代码改为:

strconnection="DefaultDir=;Driver={myodbc driver};database=chunfeng"
并且无需建立系统DSN,也不需要用户名和口令。不过不推荐使用这种方法。

回复列表 (共5个回复)

沙发

好东西
!!!!!!!!

板凳

不错

3 楼

呀,圪圪来了呀.

呵呵.

4 楼

我照你的方法做了,可是网页显示的都是?不能显示汉字,请问如何解决?

5 楼

Do While not rs.Eof 建议改成: For i = 1 to Rs.RecordCount
<%=Rs("username")%> 建议
Dim strUserName
strUserName=Rs("username")
再:<%=strUserName%>
rs.Close 再加上 Set Rs=Nothing
----------------------------------------------------->>>>>>
www.xycode.com 我找到的直接生成源代码的好地方,不用再手写代码了哦

我来回复

您尚未登录,请登录后再回复。点此登录或注册