Print Page | Close Window

files exists on remote server

Printed From: Web Wiz Forums
Category: General Discussion
Forum Name: Classic ASP Discussion
Forum Description: Discussion on Active Server Pages (Classic ASP).
URL: https://forums.webwiz.net/forum_posts.asp?TID=4065
Printed Date: 30 March 2026 at 3:20am
Software Version: Web Wiz Forums 12.08 - https://www.webwizforums.com


Topic: files exists on remote server
Posted By: Mart
Subject: files exists on remote server
Date Posted: 04 July 2003 at 10:00am

Hi, I am making a script that checks if a download link is online before giving them a link. this is the script i currently use:

GotothisURL = rs("URL")

Set GetConnection = CreateObject("Microsoft.XMLHTTP")

GetConnection.Open "get", GotothisURL, False
on error resume next
GetConnection.Send

Data = GetConnection.responseText

Set GetConnection = Nothing

if not data="" Then

'content if the link is good

else

'content if link is bad

end if

It does work but it takes ages to load the page because the server downloads the file, is there a way to either just wait for the data variable to be populated then give the link is good content if after 10 secs it is not give the bad link content, or a totally differant method.

Thanks alot, Mart.




Replies:
Posted By: the boss
Date Posted: 04 July 2003 at 11:17am
well u r downloading the file . u have to make it so that it just pings the URL.. not writes the data found at the url


Posted By: Mart
Date Posted: 04 July 2003 at 2:03pm

Its alright now ive fixed it, if anyone wants the modified code here it is:

GotothisURL = rs("URL")

Set GetConnection = CreateObject("Microsoft.XMLHTTP")

GetConnection.Open "get", GotothisURL, False
on error resume next
GetConnection.Send

if not err.number <> 0 Then

'content if the link is good

else

'content if link is bad

end if

Set GetConnection = Nothing




Print Page | Close Window

Forum Software by Web Wiz Forums® version 12.08 - https://www.webwizforums.com
Copyright ©2001-2026 Web Wiz Ltd. - https://www.webwiz.net