I want validate URL comming from Form. What happen if url has no http://
or www?
<!-- Author: Adrian Forbes -->
<!-- Filename: ValidateURL.asp -->
<%
if len(trim(Request("txtURL"))) > 0 then
iStatus = 0
sURL = trim(Request("txtURL"))
if sURL is empty sURL = " http://www.fusionedv.com " ;
'Set obj = CreateObject("Microsoft.XMLHTTP")
Set obj = CreateObject("MSXML2.XMLHTTP")
on error resume next
obj.open "GET", sURL, False
obj.send
if err.number = 0 then
iStatus = obj.Status
end if
on error goto 0
if iStatus = 200 then
Response.write "<p>The URL is valid, status is " & iStatus & "</p>"
&
vbCRLF
else
Response.write "<p>The URL is invalid, status is " & iStatus & "</
p>" &
vbCRLF
end if
end if
%>
<form action="ValidateURL.asp">
URL: <input type=text name=txtURL><br>
<input type=submit value="Validate URL">
</form>
--
You received this message because you are subscribed to the Google
Groups "DotNetDevelopment, VB.NET, C# .NET, ADO.NET, ASP.NET, XML, XML
Web Services,.NET Remoting" group.
To post to this group, send email to [email protected]
To unsubscribe from this group, send email to
[email protected]
For more options, visit this group at
http://groups.google.com/group/dotnetdevelopment?hl=en?hl=en
or visit the group website at http://megasolutions.net
