全國最多中醫師線上諮詢網站-台灣中醫網
發文 回覆 瀏覽次數:1383
推到 Plurk!
推到 Facebook!

判断linkedserver 是否存在

尚未結案
luowy651
高階會員


發表:257
回覆:313
積分:114
註冊:2003-04-09

發送簡訊給我
#1 引用回覆 回覆 發表時間:2004-02-17 08:17:56 IP:218.72.xxx.xxx 未訂閱
各位大大: 我用delphi和sql server想实现如下功能,请问该如何实现,为便于理解,我用了以下的描述: if client computer在网路上 then begin if not exist linkedserver(name设为ls) then begin 建立该 linkedserver end end 不胜感激!
deity
尊榮會員


發表:90
回覆:876
積分:678
註冊:2003-05-09

發送簡訊給我
#2 引用回覆 回覆 發表時間:2004-02-17 10:20:40 IP:218.15.xxx.xxx 未訂閱
luowy651您好:在讨论区找了篇文章,看下对您能有所帮助 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=29963 http://delphi.ktop.com.tw/topic.php?topic_id=19003 http://delphi.ktop.com.tw/topic.php?topic_id=30773 http://delphi.ktop.com.tw/topic.php?TOPIC_ID=29149 http://delphi.ktop.com.tw/topic.php?topic_id=21995 用KTOP查找SQL SERVER,会有很多收获。 相关摘录了一点: uses ComObj,    var SQLServer, ServerList:Variant; i:integer; begin SQLServer := CreateOleObject('SQLDMO.Application'); ServerList:= SQLServer.ListAvailableSQLServers; if serverlist.count<1 then begin //如果服务器不存在,则退出系统 showmessage('服务器不存在,请检测服务器是否已经开机或者服务是否打开了'); application.Terminate; end; SQLServer:=NULL; serverList:=NULL; end; ——行径窄处,留一步与人行—— 發表人 - deity 於 2004/02/17 10:42:53 發表人 - deity 於 2004/02/17 10:44:46
luowy651
高階會員


發表:257
回覆:313
積分:114
註冊:2003-04-09

發送簡訊給我
#3 引用回覆 回覆 發表時間:2004-02-17 11:11:20 IP:218.72.xxx.xxx 未訂閱
感谢Deity大大,只是我想我可能没说清楚,我指的linkedserver是指sql server中security中的linkedserver,需要用sp_addlinkedserver @server = 'ls' 来建立。因为我发现如果我在client软体上操作server上的sql,必须用linkedserver.换句话说,我想实现的功能就是:首先判断当前的电脑是否在公司内部网路上,如果在,那么再判断该网路上server是否被设为了链接服务器,如果没设,就sp_add linkedserver,如果已被设了,那就什么也不做。那么将网路上的server设为 另外,不知链接服务器和远程服务器(从没用过)在使用中有何区别,谢谢! 發表人 - luowy651 於 2004/02/17 11:16:38 發表人 - luowy651 於 2004/02/17 11:20:27 發表人 - luowy651 於 2004/02/17 12:57:21
luowy651
高階會員


發表:257
回覆:313
積分:114
註冊:2003-04-09

發送簡訊給我
#4 引用回覆 回覆 發表時間:2004-02-17 19:02:37 IP:61.164.xxx.xxx 未訂閱
各位大大: 小弟写了如下的sql command 但不知错在哪儿,请高手指点: IF EXISTS (SELECT datasource FROM master.dbo.sysservers WHERE datasource = N'test') PRINT 'linkedserver test exists' ELSE BEGIN PRINT 'linkedserver test not exists' sp_addlinkedserver 'test' END 不胜感激!
terrychen
尊榮會員


發表:90
回覆:794
積分:501
註冊:2003-05-01

發送簡訊給我
#5 引用回覆 回覆 發表時間:2004-02-17 19:47:23 IP:211.76.xxx.xxx 未訂閱
您好:  
 IF EXISTS (SELECT datasource  FROM  master.dbo.sysservers WHERE  datasource = N'test') 
  PRINT 'linkedserver test exists' 
ELSE BEGIN
  PRINT 'linkedserver test not exists' 
  EXEC sp_addlinkedserver 'test' 
END
~~應無所住而生其心~~
系統時間:2024-05-19 5:18:46
聯絡我們 | Delphi K.Top討論版
本站聲明
1. 本論壇為無營利行為之開放平台,所有文章都是由網友自行張貼,如牽涉到法律糾紛一切與本站無關。
2. 假如網友發表之內容涉及侵權,而損及您的利益,請立即通知版主刪除。
3. 請勿批評中華民國元首及政府或批評各政黨,是藍是綠本站無權干涉,但這裡不是政治性論壇!