欧米茄星座男表报价:关于在一台服务器上操作另外一台服务器上的数据库问题?急。。。

来源:百度文库 编辑:查人人中国名人网 时间:2024/05/04 20:42:42
能不能在一台服务器上操作另外一台服务器上的数据库?比如修改,删除数据等。用ASP和SQL等。如果可以的话,那不是可以在自己的服务器上操作别人的网站数据库吗????那不是不得了了???

当然可以用asp操作别的机子sql数据库,但不是你说的随便可以在自己的服务器上操作别人的网站数据库,因为你不知道别人机子数据库的用户和密码,你怎么连????还有一个端口,ip,权限问题~~

如果满足上述,当然可以操作别人机子上的数据库拉~~
asp连接mssql代码:

dim conn, conntol

conntol = "driver={SQL Server};server=服务器名字;uid=登陆帐号;pwd=登陆密码;database=数据库名字"

set conn=server.createobject("adodb.connection")

conn.open conntol

以下为全功能代码:
'解决了ACCESS数据库路径的问题!
'采用DBType=0或DBType=1来区分AC库还是MSSQL库
'具体采用AC库时应注意的事项,请看程序说明

-----------------------------------------------
Dim DBType,Conn,StrConn
DBType=0 '0为Access数据库,1为MSSQL数据库

If(DBType=0) Then
'****************ACCESS数据库******************
Dim DbFolderName,DbFolder_Path,SiteFolder
DbFolderName="ArticleData" '数据库所在文件夹名称
DbFolder_Path = Server.MapPath(DbFolderName) '数据库所在路径
SiteFolder="Article" '系统所在根目录名称

If Session("RootDir") = "" Then
Session("RootDir") = Mid(DbFolder_Path, 1, InStr(1,DbFolder_Path,SiteFolder,1) -1) & SiteFolder
End if
Set Conn = Server.CreateObject("Adodb.Connection")
StrConn = "Driver={Microsoft Access Driver (*.mdb)};DBQ=" & Session("RootDir") & "\"& DbFolderName & "\Data.mdb" '连接到数据库
Conn.Open StrConn
'**************************************************
ElseIf(DBType=1) Then
'*****************MSSQL SERVER数据库******
Dim DBUserID,DBPassWord,DBName,DBIP
'修改以下信息以适合你的网站
DBUserID="sa" '数据库登陆名
DBPassWord="" '数据库密码
DBName="dbname" '数据库名称
DBIP="local" '数据库所在地址,如果是本地数据库则为:(local)

Set Conn=Server.CreateObject("Adodb.Connection")
StrConn = "PROVIDER=SQLOLEDB.1;Data Source="&DBIP&";Initial Catalog="&DBName&";Persist Security Info=True;User ID="&DBUserID&";Password="&DBPassWord&";Connect Timeout=30"
Conn.Open StrConn
'******************************************************
Else
'***********************数据库设置错误*****************
Response.Write"数据库设置错误,请联系管理员!"
Response.End
End If
'Response.Write StrConn

可以的
SQL就可以
ASP我不是很清楚