Снижение времени отклика

Есть вот такой маленький скриптик:

MainBot="Magus Eye"
Menu="-=Инфо=-\\"
ParentDir=frmHub:GetPtokaXLocation().."\\lib\\"

function Main()
	libinit=package.loadlib(ParentDir.."pxwsa_l51.dll","_libinit")
	libinit()
	local errorCode,errorStr=WSA.Init()
end

function OnExit()
	WSA.Dispose()
end

function OnError(error)
	OnExit()
	SendPmToNick("Berkut",MainBot,error)
end

function OpConnected(user)
	if user.iProfile==0 then
		user:SendData("$UserCommand 1 2 "..Menu.."Хост по IP$<%[mynick]> !HostFromIP %[line:Введите IP]||")
		user:SendData("$UserCommand 1 2 "..Menu.."Хост по нику$<%[mynick]> !HostFromNick %[nick]||")
		user:SendData("$UserCommand 1 2 "..Menu.."Пропинговать хаб$<%[mynick]> !HubPing %[line:Введите адрес хаба]||")
	end
end

function ChatArrival(user,data)
	local data=string.sub(data,1,-2)
	local s,e,cmd=string.find(data,"%b<>%s(%S+)")
	local s,e,arg=string.find(data,"%b<>%s%S+%s(%S+)")
	if cmd=="!HostFromIP" then
		if arg then
			local Host=WSA.GetHostByAddr(arg)
			if Host then
				user:SendData(MainBot,"Хост компьютера с IP ["..arg.."]: "..Host..".")
				else
				user:SendData(MainBot,"Хост не установлен.")
			end
			else
			user:SendData(MainBot,"Вы не указали IP.")
		end
		return 1
	end
	if cmd=="!HostFromNick" then
		if arg then
			User=GetItemByName(arg)
			if User then
				local Host=WSA.GetHostByAddr(User.sIP)
				if Host then
					user:SendData(MainBot,"Хост компьютера пользователя "..arg.." ["..User.sIP.."]: "..Host..".")
					else
					user:SendData(MainBot,"Хост не установлен.")
				end
				else
				user:SendData(MainBot,"Пользователь "..arg.." отсутствует на хабе или является ботом.")
			end
		end
		return 1
	end
	if cmd=="!HubPing" then
	    if arg then
	        _,_,Socket=WSA.NewSocket(0)
    	    errorCode,_=WSA.Connect(Socket,arg,411)
    	    if errorCode then
				user:SendData(MainBot,"Хаб "..arg.." отключён.")
				else
				user:SendData(MainBot,"Хаб "..arg.." работает.")
    	    end
    	    WSA.Close(Socket)
			return 1
		end
	end
end

Действует очень просто. По запросу обращается к библиотеке WSA. В зависимости от команды возвращает host по IP или пытается соединиться с определённым портом удалённого адреса.
Сам скрипт работает нормально. Но вот в чём загвоздка. Если соответствующий адрес не найден или IP не разрешается до host, происходит задержка отклика примерно на 5-10 секунд. Как понимаю, это связано с тем, что библиотека инициирует соединение в неком временном промежутке и выдаёт ошибку только по его окончании.
Вопрос, можно ли не меняя содержания библиотеки, снизить время отклика? Если да, то как?

Привет.
Выложи, плиз, этот скрипт полностью, или дай ссыль, где он есть.

This message was edited 1 time. Last update was at 16/11/2009 17:01:23

Система пытается твой адрес после облома по IP определить как DNS.
Соответственно задержка это ожидание ответа DNS-Сервера.