Thank you ! :) This is what I am looking for.


>This will do what you want:
>

< %
>   Dim cName, oFS, cFile
>   Set oFS = Server.CreateObject("Scripting.FileSystemObject")
>   cName = "\\COMPUTER\ShareName\TextFile.TXT"
>   If oFS.FileExists(cName) = False Then
>      Response.write "The server is not available (Server IP Address file is missing).  Please try again."
>   Else
>      Set cFile = oFS.OpenTextFile(cName,1)
>      cAddress = cFile.Read(25)    ' Read 25 characters from file
>      Response.Redirect ("http://" & cAddress)
>      cFile.Close
>   end if
>% >
>

>Note: Remove the spaces from < % and % >
>
>-Ed
>