+ -
当前位置:首页 → 问答吧 → ASP连接SQL的问题

ASP连接SQL的问题

时间:2011-07-21

来源:互联网

东西其实很简单,但对于我初学的很难,希望有些大侠不要鄙视我的问题过于简单。
做一个登陆页面,只需要验证用户名和密码,数据库是MYSQL,数据库名叫PARA,表名是user,里面有两个字段,name和password.具体应该怎么做呀?大概理论我懂,请不要说理论了,贴点具体的代码,谢谢~~~

作者: wanglijunshuaige   发布时间: 2011-07-21

VB code

Dim SqlDatabaseName,SqlPassword,SqlUsername,SqlLocalName,ConnStr,Conn 
SqlDatabaseName = "PARA"      'SQL数据库名 
SqlUsername = "sa"              'SQL数据库用户名    
SqlPassword = "sa"              'SQL数据库用户密码 
SqlLocalName = "(local)"    'SQL主机IP地址(本地可用“127.0.0.1”或“(local)”,非本机请用真实IP) 
ConnStr = "Provider = SQLOLEDB; User ID = " & SqlUsername & "; Password = " & SqlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source = " & SqlLocalName & ";" 
Set Conn = Server.CreateObject("ADODB.Connection") 
Conn.open ConnStr 
set Rs=server.createobject("adodb.recordset")



作者: myGenny0801   发布时间: 2011-07-21

引用 1 楼 mygenny0801 的回复:

VB code

Dim SqlDatabaseName,SqlPassword,SqlUsername,SqlLocalName,ConnStr,Conn
SqlDatabaseName = "PARA" 'SQL数据库名
SqlUsername = "sa" 'SQL数据库用户名
SqlPassword = "sa" ……

怎么样判断是和MYSQL连接成功呢?

作者: wanglijunshuaige   发布时间: 2011-07-21

VBScript code

Dim SqlDatabaseName,SqlPassword,SqlUsername,SqlLocalName,ConnStr,Conn 
    SqlDatabaseName = "PARA"      'SQL数据库名 
    SqlUsername = "sa"              'SQL数据库用户名    
    SqlPassword = "sa"              'SQL数据库用户密码 
    SqlLocalName = "(local)"    'SQL主机IP地址(本地可用“127.0.0.1”或“(local)”,非本机请用真实IP) 
    ConnStr = "Provider = SQLOLEDB; User ID = " & SqlUsername & "; Password = " & SqlPassword & "; Initial Catalog = " & SqlDatabaseName & "; Data Source = " & SqlLocalName & ";" 
    Set Conn = Server.CreateObject("ADODB.Connection") 
    conn.Open ConnStr
        If Err.Number<>0 Then
        Err.Clear
        Response.Write("数据库连接失败!")
        Response.End()
    End If
    set Rs=server.createobject("adodb.recordset")



整个是这样的

作者: myGenny0801   发布时间: 2011-07-21

引用 3 楼 mygenny0801 的回复:

VBScript code

Dim SqlDatabaseName,SqlPassword,SqlUsername,SqlLocalName,ConnStr,Conn
SqlDatabaseName = "PARA" 'SQL数据库名
SqlUsername = "sa" 'SQL数据库用户名
SqlPassword =……

能不能把这个连接数据库的文件整个贴出来呀,我第一次玩asp,谢谢了~~~

作者: wanglijunshuaige   发布时间: 2011-07-21

都已经贴出来了呀

作者: myGenny0801   发布时间: 2011-07-21

<%
on error resume next
set conn=Server.CreateObject("adodb.connection")
strDSNLess="dsn=para;driver={MySQL ODBC 3.51 Driver};uid=root;pwd=123;database=PARA"
conn.open strDSNLess
if conn.state=1 then
Response.Write "conn与数据库连接成功"
sql="select * from user"
set rs=Server.CreateObject("adodb.RecordSet")
rs.Open sql,conn,1,1
do while not rs.eof 
Response.Write "<p>用户名:"&rs("name")&" 密码:"&rs("password")&"</p>"
rs.MoveNext
loop
rs.Close
set rs=nothing
else
Response.Write "conn与数据库连接失败"
end if
conn.close
set conn=nothing
%>
我是这个样子写的,但是网页上输出conn与数据库连接失败,是什么原因呀?

作者: wanglijunshuaige   发布时间: 2011-07-21