<% '******************************************************* '* * VT-Auth v1.0 '* * '* * Release Date: February 15, 2005 '* * '* * Copyright © 2005 Vlad Titarenko '* * '* * Please direct all inquiries to vtsupport@rovno.info '* * '* * Or visit: http://vt.rovno.info '* * '******************************************************* %> <% function ValidateLogin(xuserID,xpassword) Dim FSObject Dim LoginFile Set FSObject = Server.CreateObject("Scripting.FileSystemObject") Set LoginFile = FSObject.OpenTextFile(Server.MapPath(txtName),1) ValidateLogin = False While Not LoginFile.AtEndOfStream line=LoginFile.ReadLine lines_txt = Split(line,"|") c_xuserID = lines_txt(0) c_xpassword = lines_txt(1) redirectpath = lines_txt(2) if xuserID=c_xuserID and c_xpassword=xpassword Then Session("userlogin")=c_xuserID response.redirect siteroot & "/" & vt_auth_folder & "/" & redirectpath End if Wend LoginFile.Close Set LoginFile = Nothing Set FSObject = Nothing End function Dim xError If Request.form("Login").Count <> 0 Then user=Request.Form("userid") pass=Request.Form("userpass") if ValidateLogin(user,pass) = False Then xError = "Wrong User ID or Password" End if End if %>

 

 

 
Ex KB3KGP
  
Randy George
Washington County
Canonsburg, PA
Grid Locator EN90
 

 

Get your CUSTOM Ham Radio Decals made from N3ZK!! Hundreds and hundreds sold WORLD WIDE!! If you purchase from my EBay store, there are special offers! Click the EBay link below to get yours today!!

 

 

The N3ZK Tower & Ham Shack Project COMPLETED!!

Click HERE for Details!!
Check out my lightning strike photo in the August edition of QST. "Got Lightning Protection?"
 

QRZ Callsign Lookup
 
Copyright 2007 Randy George N3ZK - All Rights Reserved.