本文整理匯總了PHP中ADODB_Session_Key函數的典型用法代碼示例。如果您正苦於以下問題：PHP ADODB_Session_Key函數的具體用法？PHP ADODB_Session_Key怎麽用？PHP ADODB_Session_Key使用的例子？那麽, 這裏精選的函數代碼示例或許可以為您提供幫助。
在下文中一共展示了ADODB_Session_Key函數的2個代碼示例，這些例子默認根據受歡迎程度排序。您可以為喜歡或者感覺有用的代碼點讚，您的評價將有助於係統推薦出更棒的PHP代碼示例。
示例1: adodb_sess_write
function adodb_sess_write($key, $val)
{
$Crypt = new MD5Crypt();
global $ADODB_SESS_INSERT, $ADODB_SESS_CONN, $ADODB_SESS_LIFE, $ADODB_SESSION_TBL, $ADODB_SESSION_EXPIRE_NOTIFY;
$expiry = time() + $ADODB_SESS_LIFE;
// encrypt session data..
$val = $Crypt->Encrypt(rawurlencode($val), ADODB_Session_Key());
$arr = array('sesskey' => $key, 'expiry' => $expiry, 'data' => $val);
if ($ADODB_SESSION_EXPIRE_NOTIFY) {
$var = reset($ADODB_SESSION_EXPIRE_NOTIFY);
global ${$var};
$arr['expireref'] = ${$var};
}
$rs = $ADODB_SESS_CONN->Replace($ADODB_SESSION_TBL, $arr, 'sesskey', $autoQuote = true);
if (!$rs) {
ADOConnection::outp('
-- Session Replace: ' . $ADODB_SESS_CONN->ErrorMsg() . '</p>', false);
} else {
// bug in access driver (could be odbc?) means that info is not commited
// properly unless select statement executed in Win2000
if ($ADODB_SESS_CONN->databaseType == 'access') {
$rs = $ADODB_SESS_CONN->Execute("select sesskey from {$ADODB_SESSION_TBL} WHERE sesskey='{$key}'");
}
}
return isset($rs);
}示例2: adodb_sess_write
function adodb_sess_write($key, $val)
{
$Crypt = new MD5Crypt();
global $ADODB_SESS_INSERT, $ADODB_SESS_CONN, $ADODB_SESS_LIFE, $ADODB_SESSION_TBL;
$expiry = time() + $ADODB_SESS_LIFE;
// encrypt session data..
$val = $Crypt->Encrypt(rawurlencode($val), ADODB_Session_Key());
$qry = "UPDATE {$ADODB_SESSION_TBL} SET expiry={$expiry},data='{$val}' WHERE sesskey='{$key}'";
$rs = $ADODB_SESS_CONN->Execute($qry);
if ($rs) {
$rs->Close();
} else {
print '<p>Session Update: ' . $ADODB_SESS_CONN->ErrorMsg() . '</p>';
}
if ($ADODB_SESS_INSERT || $rs === false) {
$qry = "INSERT INTO {$ADODB_SESSION_TBL}(sesskey,expiry,data) VALUES ('{$key}',{$expiry},'{$val}')";
$rs = $ADODB_SESS_CONN->Execute($qry);
if ($rs) {
$rs->Close();
} else {
print '<p>Session Insert: ' . $ADODB_SESS_CONN->ErrorMsg() . '</p>';
}
}
// bug in access driver (could be odbc?) means that info is not commited
// properly unless select statement executed in Win2000
if ($ADODB_SESS_CONN->databaseType == 'access') {
$rs = $ADODB_SESS_CONN->Execute("select sesskey from {$ADODB_SESSION_TBL} WHERE sesskey='{$key}'");
}
return isset($rs);
}