function newsession($REMOTE_ADDR)
{
$sessionid=str_replace(" ","",substr(microtime(),2));
// setcookie("ASPSESSIONID",$sessionid,time()+3600,"/",$HOSTNAME,0);
setcookie("ASPSESSIONID",$sessionid,0,"/",$HOSTNAME,0);
//$sess_dbm=dbmopen("/usr/local/apache/htdocs/SESSIONS/".$sessionid.".dbm","n");
$sess_dbm=dbmopen("/usr/local/apache/htdocs/".$sessionid.".dbm","n");
dbminsert($sess_dbm,"session_time",time());
dbminsert($sess_dbm,"asp2php_timeout","1200");
dbminsert($sess_dbm,"remote_addr",$REMOTE_ADDR);
dbmclose($sess_dbm);
return $sessionid;
}
function get_session($dbmvar,$name)
{
$name=strtolower($name);
if (dbmexists($dbmvar,$name))
{ return dbmfetch($dbmvar,$name); }
else
{ return ""; }
}
function set_session($dbmvar,$name,$value)
{
$name=strtolower($name);
if (dbmexists($dbmvar,$name))
{ dbmreplace($dbmvar,$name,$value); }
else
{ dbminsert($dbmvar,$name,$value); }
}
$sessionid=$HTTP_COOKIE_VARS["ASPSESSIONID"];
if (empty($sessionid) || !file_exists("/usr/local/apache/htdocs/SESSIONS/".$sessionid.".dbm"))
{
$sessionid=newsession($REMOTE_ADDR);
//$sess_dbm=dbmopen("/usr/local/apache/htdocs/SESSIONS/".$sessionid.".dbm","w");
$sess_dbm=dbmopen("/usr/local/apache/htdocs/".$sessionid.".dbm","w");
}
else
{
$sess_dbm=dbmopen("/usr/local/apache/htdocs/SESSIONS/".$sessionid.".dbm","w");
$asp2php_timeout=dbmfetch($sess_dbm,"asp2php_timeout");
if (time()-dbmfetch($sess_dbm,"session_time")>$asp2php_timeout)
{
dbmclose($sess_dbm);
$sessionid=newsession($REMOTE_ADDR);
$sess_dbm=dbmopen("/usr/local/apache/htdocs/SESSIONS/".$sessionid.".dbm","w");
}
else
if (dbmfetch($sess_dbm,"remote_addr")!=$REMOTE_ADDR)
{
dbmclose($sess_dbm);
$sessionid=newsession($REMOTE_ADDR);
$sess_dbm=dbmopen("/usr/local/apache/htdocs/SESSIONS/".$sessionid.".dbm","w");
}
}
dbmreplace($sess_dbm,"session_time",time());
?>
// LANGUAGE = asp2php converted
?>
// $InterShop is of type "ADODB.Connection"
// $InterShop is of type "ADODB.Connection"
echo get_session($sess_dbm,"InterShop_ConnectionTimeout");
// $InterShop is of type "ADODB.Connection"
echo get_session($sess_dbm,"InterShop_CommandTimeout");
$Intershop=mysql_connect("","web","brydon");
mysql_select_db("intershop",$Intershop);
// $cmdTemp is of type "ADODB.Command"
?>
if ((empty($HTTP_GET_VARS["Action"]) ? $HTTP_POST_VARS["Action"] : $HTTP_GET_VARS["Action"])=="Process")
{
$err_msg="";
if (strlen((empty($HTTP_GET_VARS["fname"]) ? $HTTP_POST_VARS["fname"] : $HTTP_GET_VARS["fname"]))==0)
{
$err_msg=$err_msg."First Name Cannot Be Empty"."
";
}
if (strlen((empty($HTTP_GET_VARS["lname"]) ? $HTTP_POST_VARS["lname"] : $HTTP_GET_VARS["lname"]))==0)
{
$err_msg=$err_msg."Last Name Cannot Be Empty"."
";
}
if (strlen((empty($HTTP_GET_VARS["email"]) ? $HTTP_POST_VARS["email"] : $HTTP_GET_VARS["email"]))==0)
{
$err_msg=$err_msg."E-Mail Address Cannot Be Empty"."
";
}
else
{
// if ((strpos(1,(empty($HTTP_GET_VARS["email"]) ? $HTTP_POST_VARS["email"] : $HTTP_GET_VARS["email"]),"@") ? strpos(1,(empty($HTTP_GET_VARS["email"]) ? $HTTP_POST_VARS["email"] : $HTTP_GET_VARS["email"]),"@")+1 : 0)==0)
// {
//
// $err_msg=$err_msg."Invalid E-Mail address"."
";
// }
}
if (strlen((empty($HTTP_GET_VARS["telephone"]) ? $HTTP_POST_VARS["telephone"] : $HTTP_GET_VARS["telephone"]))==0)
{
$err_msg=$err_msg."Telephone Number Cannot Be Empty"."
";
}
if (strlen((empty($HTTP_GET_VARS["country"]) ? $HTTP_POST_VARS["country"] : $HTTP_GET_VARS["country"]))==0)
{
$err_msg=$err_msg."Country Cannot Be Empty"."
";
}
if (strlen((empty($HTTP_GET_VARS["short"]) ? $HTTP_POST_VARS["short"] : $HTTP_GET_VARS["short"]))==0)
{
$err_msg=$err_msg."Short Description Cannot Be Empty"."
";
}
if (strlen($err_msg)==0)
{
$sqlcmd="INSERT INTO lci_customers ".
" VALUES('".(empty($HTTP_GET_VARS["fname"]) ? $HTTP_POST_VARS["fname"] : $HTTP_GET_VARS["fname"])."','".(empty($HTTP_GET_VARS["lname"]) ? $HTTP_POST_VARS["lname"] : $HTTP_GET_VARS["lname"])."','".
(empty($HTTP_GET_VARS["company"]) ? $HTTP_POST_VARS["company"] : $HTTP_GET_VARS["company"])."','".(empty($HTTP_GET_VARS["telephone"]) ? $HTTP_POST_VARS["telephone"] : $HTTP_GET_VARS["telephone"])."','".
(empty($HTTP_GET_VARS["email"]) ? $HTTP_POST_VARS["email"] : $HTTP_GET_VARS["email"])."','".(empty($HTTP_GET_VARS["address"]) ? $HTTP_POST_VARS["address"] : $HTTP_GET_VARS["address"])."','".(empty($HTTP_GET_VARS["city"]) ? $HTTP_POST_VARS["city"] : $HTTP_GET_VARS["city"])."','".
(empty($HTTP_GET_VARS["province"]) ? $HTTP_POST_VARS["province"] : $HTTP_GET_VARS["province"])."','".(empty($HTTP_GET_VARS["postal"]) ? $HTTP_POST_VARS["postal"] : $HTTP_GET_VARS["postal"])."','".(empty($HTTP_GET_VARS["country"]) ? $HTTP_POST_VARS["country"] : $HTTP_GET_VARS["country"]).
"','".(empty($HTTP_GET_VARS["comment"]) ? $HTTP_POST_VARS["comment"] : $HTTP_GET_VARS["comment"])."','".date("Y/m/d")."','')";
//echo $sqlcmd;
mysql_query($sqlcmd,$Intershop);
header("Location: "."register.html");
exit;
}
else
{
}
}
?>
|
|
|
|
|
|
|
|
|||
|
News Focus on Linux Web Mail Contact us Register |
if (strlen($err_msg)>0)
{
echo "".$err_msg." "; } ?> |
|
|
Home | Profile | Services | Consultants | Press | Jobs | Links Copyright © 1996-1999 LeadSource Consultants Inc. Last Updated on Sep 16, 1999 |
||