使用sqlserver进行网页连接（端口扫描）

create proc scanIpPort
@ServiceUrl as varchar(1000) 
as
DECLARE @data varchar(max);
set @data=''                  
Declare @Object as Int
Declare @ResponseText AS  nvarchar(max)
Exec sp_OACreate 'Msxml2.ServerXMLHTTP.3.0', @Object OUT;
Exec sp_OAMethod @Object, 'open', NULL, 'GET',@ServiceUrl,'false'
Exec sp_OAMethod @Object, 'send'</