请教:如何利用SQL语句在插入记录的同时插入访问机器的网络标识或地址!

解决方案 »

  1.   

    if exists (select * from dbo.sysobjects where id = object_id(N'[dbo].[GetClientIP]') and OBJECTPROPERTY(id, N'IsProcedure') = 1)
    drop procedure [dbo].[GetClientIP]
    GO
    /********************************************************
    功能:获取当前客户端IP地址
    ********************************************************/
    /*调用过程:
    exec GetClientIP
    */
    Create Procedure GetClientIP
    as
    declare @ip varchar(20)
    declare @hst varchar(20)
    declare @sql varchar(100)
    declare @str varchar(100)
    set @str='PING '+Host_Name() + ' -n 1'
    create table #tmp(aa varchar(200))
    insert #tmp exec master..xp_cmdshell @str
    select top 1 @ip = replace(left(aa,charindex(':',aa)-1),'Reply from ','') 
    from #tmp where aa like 'reply from %:%'
    drop table #tmp
    select @ip
    return (0)
    Go 
    EXEC GetClientIP