怎样才能知道局域网中服务器的IP地址呀？

Question

我用ADOConection连接数据库，动态创建，但是怎样得到服务器的IP呢？

Answer 1

--用SQL的话：
declare @sname sysname,@ip varchar(15),@sql varchar(1000)--得到计算机名
set @sname=case when charindex('\',@@servername)=0 then @@servername
else left(@@servername,charindex('\',@@servername)-1) end
--得到ip地址
create table #ip(a varchar(200))
set @sql='ping '+@sname+' -a -n 1 -l 1'
insert into #ip exec master..xp_cmdshell @sqlselect @ip=left(a,patindex('%:%',a)-1) from(
select a=substring(a,patindex('Ping statistics for %:%',a)+20,20)
from #ip where a like 'Ping statistics for %:%') a--显示结果
select 计算机名=@sname,ip地址=@ipgo
drop table #ip