<[ // Virtual Name Server - User Modification // (c) 1997-98 SmartDesk, Inc., All Rights Reserved FUNCTION webUserDirOpen( session, path ) local dbname, dbindex, db dbname = fileFixPath( path + '\userdir.db' ) if ( ! fileExists( dbname ) ) session.error( "Unable to open " + dbname + " data file.", "FFFFFF", "000000" ) return(0) end db = dbuse( dbname, "users", 1 ) if ( ! db ) session.error( "Unable to open " + dbname + " data file.", "FFFFFF", "000000" ) return(0) end dbindex = fileFixPath( path + '\userdir.dx' ) if ( ! fileExists( dbindex ) ) users->dbClose( ) session.error( "Unable to open " + dbindex + " index file.", "FFFFFF", "000000" ) return(0) end users->dbOpenIndex( dbindex ) users->dbOrder( 1 ) return( db ) END // Main code _apGenerate( ) websrvr = 0 + param( 1 ) sessionId = 0 + param( 2 ) session = new( "session", websrvr, sessionId ) if ( ! session.secure( "UserDir.Admin" ) ) return( 0 ) end data = session.var( "USERID" ) if ( strempty( data ) ) session.error( "No Record Provided!" ) return( 0 ) end rec = ( 0 + data ) - 16384 if ( rec < 1 ) session.error( "Invalid Record Specified!" ) return( 0 ) end if ( ! webUserDirOpen( session, webServerBaseDir( websrvr ) ) ) return( 0 ) end if ( ! users->dbGoto( rec ) ) session.error( "Invalid Record Specified!" ) return( 0 ) end ]> Virtual Name Server - User Modify
User Modify

Directory | Home
.
Use this screen to modify user information:
">


First Name
Middle Name:
Last Name:
.
Street Address:
City:
State/Province:
Zip/Postal Code:
Country:
.
Company Name:
Company Title:
.
Phone 1:
Phone 2:
Phone 3:
Phone 4:
.
Email Address:
.
Message:


Search | Directory