PHP+DBM的同学录程序(3)

程序

6、登出文件logout.php3
<?
setcookie("login",false,time()+31536000);
header("location:login.php3");
?>

7、修改信息文件modify.php3
<?
require("common.php3");
$id=$login;
if($submit){
if($name=="")error("请填写您的名字!");
elseif($mail=="")error("请填写您的邮件地址!");
else{
$dbm=dbmopen("class","w");
$intro=nl2br($intro);
$data="$name|!:!|$nickname|!:!|$mail|!:!|$home|!:!|$oicq|!:!|$icq|!:!|$add|!:!|$tel|!:!|$birth|!:!|$job|!:!|$intro|!:!|$sex";
dbmreplace($dbm,$id,$data);
dbmclose($dbm);
header("Location:index.php3");
}
}else{
$dbm=dbmopen("class","r");
$data=dbmfetch($dbm,$login);
$info=explode("|!:!|",$data);
dbmclose($dbm);
?>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<HTML><HEAD><TITLE>同学录用户修改信息</TITLE>
<META content="text/html; charset=gb2312" http-equiv=Content-Type>
<link rel="stylesheet" href="style.css">
</HEAD><BODY bgcolor="#FFFFFF" topMargin=0>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="100%"><BR>
<DIV align=center></DIV><CENTER><TBODY></TBODY></center>
</TABLE>
<TABLE border=0 cellPadding=0 cellSpacing=0 width="60%" align="center">
<TBODY> <TR vAlign=top>
<TD bgColor=#000000 width="100%" height="336">
<DIV align=center>
<TABLE border=0 cellPadding=4 cellSpacing=1 height=390 width=586>
<TBODY>
<TR>
<TD align=middle bgColor=#2f5e8c colSpan=2 height=14 vAlign=top><form method="POST" action="modify.php3"> <FONT color=#ffffff>修改信息-同学录<?echo$login;?></FONT></TD>
</TR>
<tr>
<td align=middle bgcolor=#ffffff height=25 width=121>NickName: </td>
<td align=left bgcolor=#ffffff height=25 width=486>
<input class=stedit maxlength=20 name=nickname size=23 value=<?echo$info[1];?>>
</td>
</tr>
<TR>
<TD align=middle bgColor=#ffffff height=25 width=121>电子邮件: </TD>
<TD align=left bgColor=#ffffff height=25 width=486>
<INPUT class=stedit maxLength=30 name=mail size=23 value=<?echo$info[2];?>>
*必须填写 </TD>
</TR>
<tr>
<td align=middle bgcolor=#ffffff height=25 width=121>您的OICQ: </td>
<td align=left bgcolor=#ffffff height=25 width=486>
<input class=stedit maxlength=9 name=oicq size=23 value=<?echo$info[4];?>>
</td>
</tr>
<tr>
<td align=middle bgcolor=#ffffff height=25 width=121>您的主页: </td>
<td align=left bgcolor=#ffffff height=25 width=486>
<input class=stedit maxlength=50 name=home size=23 value="<?echo$info[3];?>">
</td>
</tr>
<tr>
<td align=middle bgcolor=#ffffff height=25 width=121>您的 ICQ: </td>
<td align=left bgcolor=#ffffff height=25 width=486>
<input class=stedit maxlength=10 name=icq size=23 value=<?echo$info[5];?>>
</td>
</tr>
<tr>
<td align=middle bgcolor=#ffffff height=25 width=121>您的名字: </td>
<td align=left bgcolor=#ffffff height=25 width=486>
<input class=stedit maxlength=10 name=name size=23 value=<?echo$info[0];?>>
*必须填写 </td>
</tr>
<tr>
<td align=middle bgcolor=#ffffff height=25 width=121>您的电话: </td>
<td align=left bgcolor=#ffffff height=25 width=486>
<input class=stedit maxlength=20 name=tel size=23 value=<?echo$info[7];?>>
</td>
</tr>
<tr>
<td align=middle bgcolor=#ffffff height=25 width=121>出生日期: </td>
<td align=left bgcolor=#ffffff height=25 width=486>
<input class=stedit maxlength=11 name=birth size=23 value=<?echo$info[8];?>>
*类似2000-10-10 </td>
</tr>
<tr>
<td align=middle bgcolor=#ffffff height=25 width=121>联系地址: </td>
<td align=left bgcolor=#ffffff height=25 width=486>
<input class=stedit maxlength=50 name=add size=23 value=<?echo$info[6];?>>
</td>
</tr>
<tr>
<td align=middle bgcolor=#ffffff height=25 width=121>您的职业: </td>
<td align=left bgcolor=#ffffff height=25 width=486>
<select name="job">
<option value="学 生">学 生</option>
<option value="老 师">老 师</option>
<option value="其 他">其 他</option>
</select>
</td>
</tr>
<tr>
<td align=middle bgcolor=#ffffff height=25 width=121>您的性别: </td>
<td align=left bgcolor=#ffffff height=25 width=486>
<select name="sex">
<option value="俊 男">俊 男</option>
<option value="靓 女">靓 女</option>
<option value="其 他">其 他</option>
</select>
</td>
</tr>
<tr>
<td align=middle bgcolor=#ffffff height=25 width=121>个人简介: </td>
<td align=left bgcolor=#ffffff height=25 width=486>
<textarea class="stedit" name="intro" cols="40" rows="4"><?echo$info[10];?></textarea>
</td>
</tr>
<TR bgColor=#ffedc8>
<TD bgColor=#ffffff colSpan=2>
<div align="center">
<input type="submit" name="submit" value="确认修改" class="stbtm">
???
<input type="reset" name="reset" value="重置信息" class="stbtm">
</div></form>
</TD>
</TR>
</TBODY>
</TABLE>
</DIV></TR></TBODY></TABLE><BR><TR><TD></TD></TR>
</BODY>
</HTML>
<?
}
?>

时间: 2024-09-20 00:05:22

PHP+DBM的同学录程序(3)的相关文章

PHP+DBM的同学录程序(4)

程序 8.注册文件reg.php3 <? require("common.php3"); require("mail.php3"); if($submit){ if($id=="")error("请填写您的注册用户名!"); elseif(!eregi("^[0-9a-zA_Z]+$",$id))error("你的用户名不能含有其他字符!"); elseif($password==

PHP+DBM的同学录程序(2)

程序 3.删除成员del.php3 <? require("common.php3"); $id=chop($id); if(!isset($id))error("请输入要删除的用户ID !"); elseif($pwd<>$adminpass)error("管理员密码错误!"); else{ $data=dbmopen("class","w"); dbmdelete($data,$id)

PHP+DBM的同学录程序(1)

程序 这个同学录原来给我们班级用的,因为服务器没有mysql支持,就选择了dbm 国内还没有什么dbm程序,国外也几乎没有 花了一个晚上,在几乎没有任何参考的情况下写了出来 现在公布出来 是一个非常好的dbm使用范例 1.index.php3 <? if($login){ ?> <HTML> <HEAD> <TITLE>深圳中学2000届高中(12)班同学录</TITLE> <style type="text/css"&

PHP+DBM的同学录程序(1)_php基础

这个同学录原来给我们班级用的,因为服务器没有mysql支持,就选择了dbm 国内还没有什么dbm程序,国外也几乎没有 花了一个晚上,在几乎没有任何参考的情况下写了出来 现在公布出来 是一个非常好的dbm使用范例 1.index.php3 <? if($login){ ?> <HTML> <HEAD> <TITLE>深圳中学2000届高中(12)班同学录</TITLE> <style type="text/css">

PHP+DBM的同学录程序(5)

程序 10.会员信息显示文件show.php3 <? if($login){ require("common.php3"); if(!isset($id))error("怎么没有填写用户的ID?"); else{ $id=chop($id); $dbm=dbmopen("class","r"); if(!dbmexists($dbm,$id))error("没有这个用户ID!"); else{ $da

PHP+DBM的同学录程序(3)_php基础

6.登出文件logout.php3 <? setcookie("login",false,time()+31536000); header("location:login.php3"); ?> 7.修改信息文件modify.php3 <? require("common.php3"); $id=$login; if($submit){   if($name=="")error("请填写您的名字!&q

PHP+DBM的同学录程序(4)_php基础

8.注册文件reg.php3 <? require("common.php3"); require("mail.php3"); if($submit){   if($id=="")error("请填写您的注册用户名!");   elseif(!eregi("^[0-9a-zA_Z]+$",$id))error("你的用户名不能含有其他字符!");   elseif($passwor

PHP+DBM的同学录程序(5)_php基础

10.会员信息显示文件show.php3 <? if($login){ require("common.php3"); if(!isset($id))error("怎么没有填写用户的ID?"); else{   $id=chop($id);   $dbm=dbmopen("class","r");   if(!dbmexists($dbm,$id))error("没有这个用户ID!");   else

校友录及同学录程序评价

中介交易 SEO诊断 淘宝客 云主机 技术大厅 大学毕业了,在网上找一些同学录程序,架个好做个同学们之间交流,我还记得我第一个同学录是用CC程序架,很不错,编的很复杂,很不容易看懂点,其实同学录程序不是很多,而且基本上都是asp的版本,php,jsp,.NET的基本上没有,为什么会出现这样的情况,我猜想主要是没有钱赚,毕竟同学录是公益性质的,而且访问流量也仅限于同学,不象论坛,社区,分类信息,SNS那样可以找到商业盈利点,以下是我收集同学录程序,以后再添加 1. 风华同学录 (http://ww