asp连接sql server2000数据库的代码
这是一个教师调停课系统,不知道怎么连接数据库虽然我没有财富,但是我真的很需要,高手指点下,谢谢...
这是一个教师调停课系统,不知道怎么连接数据库
虽然我没有财富,但是我真的很需要,高手指点下,谢谢 展开
虽然我没有财富,但是我真的很需要,高手指点下,谢谢 展开
5个回答
展开全部
connstr="driver={sql server};server="&SQL服务器IP地址&";uid="&sql帐号用户名&";pwd="&SQL帐号密码&";database="&数据库名称
Set conn = Server.CreateObject("ADODB.Connection")
conn.open connstr
If Err Then
err.Clear
Set Conn = Nothing
response.Redirect("/err.html")
Response.End
End If
Set conn = Server.CreateObject("ADODB.Connection")
conn.open connstr
If Err Then
err.Clear
Set Conn = Nothing
response.Redirect("/err.html")
Response.End
End If
展开全部
<%
dim conn
dim connstr
connstr="Driver={SQL Server};server=(local);uid=sa;pwd=sa;database=test"
set conn=Server.CreateObject("ADODB.Connection")
conn.open connstr
sql="select * from table "
conn.Execute(sql)
%>
dim conn
dim connstr
connstr="Driver={SQL Server};server=(local);uid=sa;pwd=sa;database=test"
set conn=Server.CreateObject("ADODB.Connection")
conn.open connstr
sql="select * from table "
conn.Execute(sql)
%>
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
首要要引入SQL
Imports System.Data.SqlClient
Imports System.Data
Imports System
连接
Dim conn As New SqlConnection
Dim sqlcom As New SqlCommand
Dim dset As New Data.DataSet
conn.ConnectionString = "Data Source=服务器名称或IP地址;Initial Catalog=数据库名称;Persist Security Info=True;User ID=账号;Password=密码"
sqlcom.Connection = conn
sqlcom.CommandType = Data.CommandType.Text
sqlcom.CommandText = "SQL查询语句"
Dim da As New SqlDataAdapter(sqlcom)
da.Fill(dset)
Imports System.Data.SqlClient
Imports System.Data
Imports System
连接
Dim conn As New SqlConnection
Dim sqlcom As New SqlCommand
Dim dset As New Data.DataSet
conn.ConnectionString = "Data Source=服务器名称或IP地址;Initial Catalog=数据库名称;Persist Security Info=True;User ID=账号;Password=密码"
sqlcom.Connection = conn
sqlcom.CommandType = Data.CommandType.Text
sqlcom.CommandText = "SQL查询语句"
Dim da As New SqlDataAdapter(sqlcom)
da.Fill(dset)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
你想要用什么方法什么语言连接呢,种类太多 下面给个
vb ado的吧
VB code dim conn as new adodb.connection With conn If .State = adStateOpen Then .Close .ConnectionString = "driver=SQL Server;server=计算机名或IP地址;uid=sa;pwd=;database=数据库名" .CommandTimeout = 0 .Open End With
vb ado的吧
VB code dim conn as new adodb.connection With conn If .State = adStateOpen Then .Close .ConnectionString = "driver=SQL Server;server=计算机名或IP地址;uid=sa;pwd=;database=数据库名" .CommandTimeout = 0 .Open End With
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询