asp网站连接sql数据库

① 如何用ASP连接sqlSERVER数据库

连接方法有三种分别为通过ODBC DSN建立连接，通过oledb建立连接 通过driver建立连接三种，下面我们来看看第一种。

通过driver建立连接
代码如下
<%
Const DataBaseType=1
If DataBaseType=0 then
DBPath="/jb51/news.asp"
SqlNowString = "Now()"
ystr=true
nstr=false
suiji="rnd(id)"
Else
'如果是SQL数据库，请认真修改好以下数据库选项
DataServer = "www111cnnet" '数据库服务器IP
DataUser = "jb51net" '访问数据库用户名
DataBaseName = "jb51net" '数据库名称
DataBasePsw = "密码" '访问数据库密码
SqlNowString = "getdate()"
ystr=1
nstr=0
suiji="newid()"
End if
On Error Resume Next
If DataBaseType = 1 Then
ConnStr="driver={SQL Server};server="&dataserver&";UID="&datauser&";PWD="&databasepsw&";Database="&databasename
Else
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DBPath)
End If
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnStr
If Err Then Err.Clear:Set conn = Nothing:Response.Write "数据库连接出错，请检查Conn.asp文件中的数据库参数设置。":Response.End
%>
通过driver建立连接
通过driver建立页面与数据库的连接，同样不需要创建ODBC DSN数据源，但必须知道实际的数据库文件路径或者数据源名(例如,SQLserver的数据库)。
代码如下
Set conn=Server.CreateObject("ADODB.Connection")
conn.Open"driver={SQL Server};server=abc;DataSource=(test);uid=;pwd=;database=UserDB"

编写脚本和数据库源建立连接
ADO（ActiveX Data Objects ） 提供 Connection 对象，可以使用该对象建立和管理应用程序和 ODBC 数据库之间的连接。Connection 对象具有各种属性和方法，可以使用它们打开和关闭数据库连接。编写数据库连接脚本，首先应创建 Connection 对象的实例，接着打开数据库连接

代码如下
'********************************************************************
' 与SQL Server2000有关的连接
' 可以参照它建立您的数据库连接
'********************************************************************
'敬请注意：
'请根据情况配置StrServer,StrUid,StrSapwd,StrDbName四个参数
Dim StrServer,StrUid,StrSaPwd,StrDbName
StrServer="(local)" '数据库服务器名
StrUid="testuser" '您的登录帐号
StrSaPwd="12345" '您的登录密码
StrDbName="db_test_com" '您的数据库名称
Dim Conn '数据库连接
Dim StrDSN '数据库连接字符串
Dim Rs '命令字符串
StrDSN="driver={SQL server};server="&StrServer&";uid="&StrUid&";pwd="&StrSaPwd&";database="&StrDbName
'建立和数据库master的连接
set Conn = Server.CreateObject("ADODB.Connection")
set Rs=Server.CreateObject("ADODB.RecordSet")
Conn.Open StrDSN

② ASP 怎么连接SQL数据库

asp连接数据库的代码为：

Set conn = Server.CreateObject(ADODB.Connection)；

conn，Opendriver{SQLServer}；server=202.108.32.94；uid=wu77445；pwd=p780522；database=w。

SQL Server数据库包括Microsoft SQL Server以及Sybase SQL Server两个子数据库，该数据库能否正常运行直接关系着整个计算机系统的运行安全。

(2)asp网站连接sql数据库扩展阅读：

这些数据库管理系统在世界上占据了绝大部分的数据库市场，其中属Oracle占有市场的份 额最大。Sybase是一种多媒体数据库，由于其优良的性能，使其处在上升期。国内开始使用Sybase的用户越来越多，使用的范围也越来越广。

在选择数据库时应注意一个问 题，即必须与网络操作系统相匹配，根据这些分布式数据库的性能，在选用Netware网络 操作系统时，一般应使用Sybase或Oracle数据库，若选用Windows NT Advanced Server 网络操作系统时。

应选用微软公司的产品MS SQL Server，因为微软公司的这个数据库其 核心就是Sybase，是一个分布式多媒体数据库。这样选择数据库，很容易建立起Client/ Server结构，使整个网络数据的公布和利用更加合理。

③ asp网页如何连接万网sql数据库

ASP链接万网SQL数据库示例代码

<%
dimconn
setconn=server.createobject("ADODB.connection")
con.open"PROVIDER=SQLOLEDB;DATASOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称
%>

链接参数说明

DATA SOURCE：SQL服务器名称或IP地址

UID：SQL用户名

PWD：SQL用户密码

DATABASE：要链接的数据库名称

延伸的ASP操作数据库数据知识：

建立记录集对象：

Setrs=server.createobject("adodb.recordset")
rs.openSQL语句,conn,3,1

3. SQL常用命令使用方法：

(1) 数据记录筛选：

sql="select*from数据表where字段名=字段值orderby字段名"
sql="select*from数据表where字段名like‘%字段值%‘orderby字段名"
sql="selecttop10*from数据表where字段名orderby字段名"
sql="select*from数据表where字段名in(‘值1‘,‘值2‘,‘值3‘)"
sql="select*from数据表where字段名between值1and值2"

(2) 更新数据记录：

sql="update数据表set字段名=字段值where条件表达式"
sql="update数据表set字段1=值1,字段2=值2……字段n=值nwhere条件表达式"

(3) 删除数据记录：

sql="deletefrom数据表where条件表达式"
sql="deletefrom数据表"(将数据表所有记录删除)

(4) 添加数据记录：

sql="insertinto数据表(字段1,字段2,字段3…)valuess(值1,值2,值3…)"
sql="insertinto目标数据表select*from源数据表"(把源数据表的记录添加到目标数据表)

(5) 数据记录统计函数：

AVG(字段名) 得出一个表格栏平均值

COUNT(*|字段名) 对数据行数的统计或对某一栏有值的数据行数统计

MAX(字段名) 取得一个表格栏最大的值

MIN(字段名) 取得一个表格栏最小的值

SUM(字段名) 把数据栏的值相加

引用以上函数的方法：

sql="selectsum(字段名)as别名from数据表where条件表达式"
setrs=conn.excute(sql)

用 rs("别名") 获取统的计值，其它函数运用同上。

(6) 对记录集操作的相关方法：

rs.movenext'将记录指针从当前的位置向下移一行
rs.moveprevious'将记录指针从当前的位置向上移一行
rs.movefirst'将记录指针移到数据表第一行
rs.movelast'将记录指针移到数据表最后一行
rs.absoluteposition=N'将记录指针移到数据表第N行
rs.absolutepage=N'将记录指针移到第N页的第一行
rs.pagesize=N'设置每页为N条记录
rs.pagecount'根据pagesize的设置返回总页数
rs.recordcount'返回记录总数
rs.bof'返回记录指针是否超出数据表首端，true表示是，false为否
rs.eof'返回记录指针是否超出数据表末端，true表示是，false为否
rs.delete'删除当前记录，但记录指针不会向下移动
rs.addnew'添加记录到数据表末端
rs.update'更新数据表记录

(7)判断所填数据是数字型

ifnotisNumeric(request("字段名称"))then
response.write"不是数字"
else
response.write"数字"
endif

备注：

ASP页面使用完数据库后，要记得关闭数据库连接对象

conn.close'关闭数据库连接对象CONN
setconn=nothing'将CONN对象从内存中清除

④ 如何用asp连接SQL Server 数据库

<%
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!<a href=javascript:history.go(-1)>try again</a>":response.end
age=clng(age)
end if
"********************************************************************
" 与SQL Server2000有关的连接
" 可以参照它建立您的数据库连接
"********************************************************************
"敬请注意：
"请根据情况配置StrServer,StrUid,StrSapwd,StrDbName四个参数
Dim StrServer,StrUid,StrSaPwd,StrDbName
StrServer="(local)" "数据库服务器名
StrUid="testuser" "您的登录帐号
StrSaPwd="12345" "您的登录密码
StrDbName="db_test_com" "您的数据库名称
Dim Conn "数据库连接
Dim StrDSN "数据库连接字符串
Dim Rs "命令字符串
StrDSN="driver={SQL server};server="&StrServer&";uid="&StrUid&";pwd="&StrSaPwd&";database="&StrDbName
"建立和数据库master的连接
set Conn = Server.CreateObject("ADODB.Connection")
set Rs=Server.CreateObject("ADODB.RecordSet")
Conn.Open StrDSN
"********************************************************************
"********************************************************************

Dim strsql
"********************************************************************
" 读数据库的相关操作
sub readdb()
strsql="select * from test"
rs.open strsql,conn,1,1
if rs.EOF then response.write "no record at all":exit sub
response.write "<table border=1>"
response.write "<tr>"
for i=0 to rs.Fields.Count-1
response.write "<td><font color=blue>"&rs.Fields(i).Name&"</font></td>"
next
response.write "</tr>"
while not rs.EOF
response.write "<tr>"
for i=0 to rs.Fields.Count-1
response.write "<td>"&rs.Fields(i).Value&"</td>"
next
response.write "</tr>"
rs.MoveNext
wend
response.write "</table>"
rs.Close
end sub
"********************************************************************

"********************************************************************
" 写数据库的相关操作
sub insertdata()
strsql="INSERT INTO test(name,age,addr) VALUES(""&name&"","&age&",""&addr&"")"
rs.Open strsql,conn,1,3
end sub
"********************************************************************
if mode=1 then
call insertdata()
response.write "insert ok!"
elseif mode=2 then
call readdb()
end if
"释放数据库连接对象
set rs=nothing
set conn=nothing
%>
<HTML>
<HEAD>
<TITLE></TITLE>
<script language=javascript>
function clickit(flag){
var form1=document.form2
form1.text4.value=flag;
if (flag==1){
if (form1.text1.value==""){
alert("name cant empty!");
return false;
}
if (form1.text2.value==""){
alert("age cant empty!");
return false;
}
if (form1.text3.value==""){
alert("addr cant empty!");
return false;
}
}
form1.submit();
return true;
}
</script>
</HEAD>
<BODY>
<form method=post name=form2>
name:<INPUT type="text" id=text1 name=text1 size=12>
age:<INPUT type="text" id=text2 name=text2 size=12>
city:<INPUT type="text" id=text3 name=text3 size=12><br>
<INPUT type="hidden" id=text4 name=text4>
<INPUT type="button" value="write" id=button1 name=button1 onclick="clickit(1)">
<INPUT type="button" value="read" id=button2 name=button2 onclick="clickit(2)">
</form>
</BODY>
</HTML>

⑤ asp中怎么连接sql数据库哦拜托了各位 谢谢

1. ASP与Access数据库连接： <% dim conn,mdbfile mdbfile=server.mappath("数据库名称.mdb") set conn=server.createobject("adodb.connection") conn.open "driver={microsoft access driver (*.mdb)};uid=admin;pwd=数据库密码;dbq="&mdbfile %> 2. ASP与SQL数据库连接： <% dim conn set conn=server.createobject("ADODB.connection") con.open "PROVIDER=SQLOLEDB;DATA SOURCE=SQL服务器名称或IP地址;UID=sa;PWD=数据库密码;DATABASE=数据库名称 %> 建立记录集对象： set rs=server.createobject("adodb.recordset") rs.open SQL语句,conn,3,2 3. SQL常用命令使用方法： (1) 数据记录筛选： sql="select * from 数据表 where 字段名=字段值 order by 字段名 " sql="select * from 数据表 where 字段名 like ‘%字段值%‘ order by 字段名 " sql="select top 10 * from 数据表 where 字段名 order by 字段名 " sql="select * from 数据表 where 字段名 in (‘值1‘,‘值2‘,‘值3‘)" sql="select * from 数据表 where 字段名 between 值1 and 值2" (2) 更新数据记录： sql="update 数据表 set 字段名=字段值 where 条件表达式" sql="update 数据表 set 字段1=值1,字段2=值2 …… 字段n=值n where 条件表达式" (3) 删除数据记录： sql="delete from 数据表 where 条件表达式" sql="delete from 数据表" (将数据表所有记录删除) (4) 添加数据记录： sql="insert into 数据表 (字段1,字段2,字段3 …) valuess (值1,值2,值3 …)" sql="insert into 目标数据表 select * from 源数据表" (把源数据表的记录添加到目标数据表) (5) 数据记录统计函数： AVG(字段名) 得出一个表格栏平均值 COUNT(*|字段名) 对数据行数的统计或对某一栏有值的数据行数统计 MAX(字段名) 取得一个表格栏最大的值 MIN(字段名) 取得一个表格栏最小的值 SUM(字段名) 把数据栏的值相加 引用以上函数的方法： sql="select sum(字段名) as 别名 from 数据表 where 条件表达式" set rs=conn.excute(sql) 用rs("别名") 获取统的计值，其它函数运用同上。 (5) 数据表的建立和删除： CREATE TABLE 数据表名称(字段1 类型1(长度),字段2 类型2(长度) …… ) 例：CREATE TABLE tab01(name varchar(50),datetime default now()) DROP TABLE 数据表名称 (永久性删除一个数据表) (6) 记录集对象的方法： rs.movenext 将记录指针从当前的位置向下移一行 rs.moveprevious 将记录指针从当前的位置向上移一行 rs.movefirst 将记录指针移到数据表第一行 rs.movelast 将记录指针移到数据表最后一行 rs.absoluteposition=N 将记录指针移到数据表第N行 rs.absolutepage=N 将记录指针移到第N页的第一行 rs.pagesize=N 设置每页为N条记录 rs.pagecount 根据 pagesize 的设置返回总页数 rs.recordcount 返回记录总数 rs.bof 返回记录指针是否超出数据表首端，true表示是，false为否 rs.eof 返回记录指针是否超出数据表末端，true表示是，false为否 rs.delete 删除当前记录，但记录指针不会向下移动 rs.addnew 添加记录到数据表末端 rs.update 更新数据表记录 判断所填数据是数字型 if not isNumeric(request("字段名称")) then response.write "不是数字" else response.write "数字" end if

⑥ asp网页怎样连接SQL数据库

asp连接数据库的代码为：
Set
conn
=
Server.CreateObject(ADODB.Connection);
conn.Opendriver={SQLServer};server=202.108.32.94;uid=wu77445;pwd=p780522;database=w
ww_panwei_com;conn
open其中/Set
conn
=
Server.CreateObject(ADODB.Connection)为设置一个数据库的连接对象
driver=（）告诉连接的设备名是SQL-SERVER
server是连接的服务器的ip地址，Uid是指用户的用户名，pwd是指的用户的password，
database是用户数据库在服务器端的数据库的名称

⑦ asp如何连接SQL数据库

一、ASP的对象存取数据库方法
在ASP中，用来存取数据库的对象统称ADO（Active Data Objects），主要含有三种对象：
Connection、Recordset 、Command
Connection：负责打开或连接数据
Recordset：负责存取数据表
Command：负责对数据库执行行动查询命令
二、连接各数据库的驱动程序
连接各数据库可以使用驱动程序，也可以使用数据源，不过我建议大家使用驱动程序，因为使用驱动程序非常
方便、简单，而使用数据源比较麻烦。
ODBC链接
适合数据库类型 链接方式
access "Driver={microsoft access driver(*.mdb)};dbq=*.mdb;uid=admin;
pwd=pass;"
dBase "Driver={microsoft dbase driver(*.dbf)};driverid=277;dbq=------------;"
Oracle "Driver={microsoft odbc for oracle};server=oraclesever.world;uid=admin;
pwd=pass;"
MSSQL server "Driver={sql server};server=servername;database=dbname;uid=sa;
pwd=pass;"
MS text "Driver={microsoft text driver(*.txt; *.csv)};dbq=-----;extensions=asc,csv,tab,txt;Persist SecurityInfo=false;"
Visual Foxpro "Driver={microsoft Visual Foxpro driver};sourcetype=DBC;sourceDB=*.dbc;
Exclusive=No;"
MySQL "Driver={mysql};database=yourdatabase;uid=username;pwd=yourpassword;
option=16386;"
OLEDB链接
适合的数据库类型 链接方式
access "Provider=microsoft.jet.oledb.4.0;data source=your_database_path;user id=admin;
password=pass;"
Oracle "Provider=OraOLEDB.Oracle;data source=dbname;user id=admin;password=pass;"
MS SQL Server "Provider=SQLOLEDB;data source=machinename;initial catalog=dbname;
userid=sa;password=pass;"
MS text "Provider=microsof.jet.oledb.4.0;data source=your_path;Extended Properties′text;
FMT=Delimited′"

⑧ ASP 怎么连接SQL数据库

ASP与SQL数据库连接语句具体如下：

Set conn = Server.CreateObject("ADODB.Connection")
connstr = "provider=Sqloledb;server=服务器名;uid=用户名;pwd=密码;database=数据库名"
conn.Open connstr
If Err Then
err.Clear
Set conn = Nothing
Response.Write "数据库连接出错，请检查连接字串"
Response.End

(8)asp网站连接sql数据库扩展阅读：

SQL常用命令使用方法：

(1) 数据记录筛选：

sql="select * from 数据表 where 字段名=字段值 order by 字段名 "

sql="select * from 数据表 where 字段名 like ‘%字段值%‘ order by 字段名 "

sql="select top 10 * from 数据表 where 字段名 order by 字段名 "

sql="select * from 数据表 where 字段名 in (‘值1‘,‘值2‘,‘值3‘)"

sql="select * from 数据表 where 字段名 between 值1 and 值2"

(2) 更新数据记录：

sql="update 数据表 set 字段名=字段值 where 条件表达式"

sql="update 数据表 set 字段1=值1,字段2=值2 …… 字段n=值n where 条件表达式"

(3) 删除数据记录：

sql="delete from 数据表 where 条件表达式"

sql="delete from 数据表" (将数据表所有记录删除)

⑨ asp怎么和MSSQL数据库连接啊

asp连接mysql的核心代码如下：
Set Conn=Server.CreateObject("ADODB.Connection") //采用ADO方式连接
servername="XINZHI-SERVER" //连接server名
dbname="User_info" //连接数据库
StrConn="Driver={ mysql odbc 3.51 driver};Server=(localhost);DataBase=hr;Uid=root;Pwd=root" //配置驱动
Conn.open strConn //打开连接
if err then //如果连接出错的处理
err.Clear
Set Conn = Nothing
Response.Write "数据库正在调整中，请稍候再试。"
Response.End
end if