在线短消息收发的程序,不用数据库

时间:2010-01-18 08:58:50   来源:第二电脑网  作者:第二电脑网

  第二电脑网导读:uot;location:hframe.php");   }?>   <form name=form1 action="login.php" method="post">   <input type=text name="name">   <input type=submit name=submit value="进入">   </form>   hframe.php
  正文:

 login.PHP
  <?if(isset($submit)){
   session_start();
  
   $nickname=$name;
   session_register("nickname");
   header("location:hframe.php");
  }?>
  <form name=form1 action="login.php" method="post">
  <input type=text name="name">
  <input type=submit name=submit value="进入">
  </form>
  hframe.php
  <frameset cols="0,*">
   <frame name="contents" src="autosend.php">
   <frame name="main" src="smessage.php">
   <noframes>
   <body>
  
   <p>此网页使用了框架,但您的浏览器不支持框架。</p>
  
   </body>
   </noframes>
  </frameset>
  smessage.php
  <?session_start();
  if(isset($submit)){
   $fp=fopen("test.txt","a+");
   $temp="rn".$rmessage."|".$content."|".$nickname."|0";
   fputs($fp,$temp);
   exit;
  }
  ?>
  :<form name=form1 action="smessage.php" method="post">
  接收方<input type=text name=rmessage><br>
  内容:<br><textarea name=content rows=20 cols=30>
  </textarea><br>
  <input type=submit name=submit value=submit>
  </form>
  <? session_start();
  echo "<meta http-equiv='refresh' content='6;url=autosend.php'>";
  $fl=file("test.txt");
  $temp="";
  for($i=0;$i<count($fl);$i++){
   $sflag=explode("|",$fl[$i]);
   if(($sflag[3]==0)&&$sflag[0]==$nickname){
  
   echo"<script>window.open('list.php?Smessage=$sflag[2]&Content=$sflag[1]','newwin','toolbar=no location=no')</script>";
   }else{
   $temp.=$fl[$i];
   }
  }
  $fp=fopen("test.txt","w");
   fputs($fp,$temp);
   ?>
  这只是个简单的例子,更多的修饰就靠你自己了!


来源:http://www.002pc.com/master/College/Programming/PHP/12010.html

收藏到:

关于《在线短消息收发的程序,不用数据库》文章的评论

共有 0 位网友发表了评论 此处只显示部分留言 点击查看完整评论页面

随机文章

    SQL Error: select * from ***_ecms_article where classid='86' and checked=1 order by rand() limit 10

顶出来的热门

    SQL Error: select * from ***_ecms_article where classid='86' and checked=1 order by diggtop desc,id desc limit 10
站内搜索: 高级搜索

热门搜索: Windows style 系统 tr IP QQ CPU 安装 function 注册 if td