大力说这样:(不含本机,得到所有访问的IP)create table #a (a varchar(8000))
insert #a exec xp_cmdshell 'arp -a'select left(ltrim( a ),charindex(' ',ltrim( a ))) ip
from #a
where a like '%-__-__-%'
and exists(select 1
from sysprocesses
where replace(#a.a,'-','') like '%'+net_address+'%')go
drop table #a
insert #a exec xp_cmdshell 'arp -a'select left(ltrim( a ),charindex(' ',ltrim( a ))) ip
from #a
where a like '%-__-__-%'
and exists(select 1
from sysprocesses
where replace(#a.a,'-','') like '%'+net_address+'%')go
drop table #a
我刚刚试过了,这样可以。。
spid smallint 系统进程 ID。
ecid smallint 与指定 SPID 相关联的给定线程的执行上下文 ID。
ECID = {0, 1, 2, 3, ...n},其中 0 始终表示主或父线程,并且 {1, 2, 3, ...n} 表示子线程。
status nchar(30) 进程状态。
loginame nchar(128) 与特定进程相关联的登录名。
hostname nchar(128) 每个进程的主机或计算机名。
blk char(5) 如果存在阻塞进程,则是该阻塞进程的系统进程 ID。否则该列为零。
当与给定的 spid 相关联的事务受到孤立分布式事务的阻塞时,该列将对阻塞孤立事务返回 '-2'。
dbname nchar(128) 进程使用的数据库。
cmd nchar(16) 为此进程执行的 SQL Server 命令(Transact-SQL 语句、SQL Server 内部引擎处理等)。
返回工作站名称。语法
HOST_NAME ( )返回类型
nchar注释
当该参数对系统函数可选时,则系统采用当前数据库、主机、服务器用户或数据库用户。内置函数后面必须跟圆括号。系统函数可以在选择列表、WHERE 子句和任何允许使用表达式的地方使用。示例
下面的示例创建一个表,该表在 DEFAULT 定义中使用 HOST_NAME() 来记录那些向记录订单的表中插入行的计算机工作站名称。CREATE TABLE Orders
(OrderID INT PRIMARY KEY,
CustomerID NCHAR(5) REFERENCES Customers(CustomerID),
Workstation NCHAR(30) NOT NULL DEFAULT HOST_NAME(),
OrderDate DATETIME NOT NULL,
ShipDate DATETIME NULL,
ShipperID INT NULL REFERENCES Shippers(ShipperID))
--邹建 2003.11--*//*--调用示例
--显示所有本机的连接信息
exec p_getlinkinfo --显示所有本机的连接信息,包含ip地址
exec p_getlinkinfo @includeip=1 --显示连接指定数据库的信息
exec p_getlinkinfo '客户资料'
--*/
if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[p_getlinkinfo]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
drop procedure [dbo].[p_getlinkinfo]
GOcreate proc p_getlinkinfo
@dbname sysname=null, --要查询的数据库名,默认查询所有数据库的连接信息
@includeip bit=0 --是否显示IP地址,因为查询IP地址比较费时,所以增加此控制
as
declare @dbid int
set @dbid=db_id(@dbname)create table #tb(id int identity(1,1),dbname sysname,hostname nchar(128),loginname nchar(128),net_address nchar(12),net_ip nvarchar(15))
insert into #tb(hostname,dbname,net_address,loginname)
select distinct hostname,db_name(dbid),net_address,loginame from master..sysprocesses
where hostname<>'' and (@dbid is null or dbid=@dbid)if @includeip=0 goto lb_show --如果不显示IP地址,就直接显示declare @sql varchar(500),@hostname nchar(128),@id int
create table #ip(hostname nchar(128),a varchar(200))
declare tb cursor local for select distinct hostname from #tb
open tb
fetch next from tb into @hostname
while @@fetch_status=0
begin
set @sql='ping '+@hostname+' -a -n 1 -l 1'
insert #ip(a) exec master..xp_cmdshell @sql
update #ip set hostname=@hostname where hostname is null
fetch next from tb into @hostname
endupdate #tb set net_ip=left(a,patindex('%:%',a)-1)
from #tb a inner join (
select hostname,a=substring(a,patindex('Ping statistics for %:%',a)+20,20) from #ip
where a like 'Ping statistics for %:%') b on a.hostname=b.hostnamelb_show:
select id,数据库名=dbname,客户机名=hostname,用户名=loginname
,网卡物理地址=net_address,IP地址=net_ip from #tbgo
我有好些用户都没有显示出来呀?
就显示了我操作的两台机???
其它的都是用EXE连接来操作的。。