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

　2001-02-05 16:32:52　来源：WEB开发网　　　

核心提示：6、登出文件logout.php3 <? setcookie("login",false,time()+31536000); header("location:login.php3"); ?> 7、修改信息文件modify.php3 <? require(&qu

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>
<?
}
?>