📄 modify_diary.asp

📁 日记本（多用户版）V3.0 主要功能： 1、日记本基本功能：添加、修改日记等。 2、日记加密：当日记添加时
💻 ASP
字号:
<!--#include file="top.asp"-->
<%
'=========================================================
' 随然日记本（多用户版） Version:3.0
' Date: 2004-11-15
' Script Written by 随然(dampure)
' 随然日记本演示地址：http://www.suiran.cn
'=========================================================
' Copyright (C) 2003,2004 真露无香. All rights reserved.
' Web: www.yongzi.com
' Diary:http://www.suiran.cn
'=========================================================

id=request.querystring("id")

set rs=server.CreateObject ("ADODB.Recordset")
    rs.open "select * from diary where id=" & id,conn,3
    if len(rs("title"))>12 then
       title=left(rs("title"),12)&"......"
    elseif rs("title")="" then
	   title=left(rs("content"),12)&"......"
	else
       title=rs("title")
    end if
    
if not rs("userid")=session("userid") then 
%>
<script language=vbscript>
  MsgBox "呵呵~~~！想干吗呢？登陆超时请重新登陆，或者此则日记不是你的吧！"
  location.href = "javascript:history.back()"
</script>
<%
response.end
end if
%>

<TABLE cellSpacing=0 cellPadding=0 width=617 align=center border=0>
  <TBODY>
  <TR>
    <TD vAlign=top bgColor=#ffffff height=16>
      <TABLE cellSpacing=0 cellPadding=0 width=617 align=center border=0>
        <TBODY>
        <TR>
          <TD>
            <TABLE cellSpacing=0 cellPadding=0 width=609 height=18 align=center 
            bgColor=#999999 border=0>
              <TBODY>
              <TR>
                <TD></TD></TR></TBODY></TABLE></TD></TR></TBODY></TABLE></TD></TR>
  <TR>
    <TD vAlign=top bgColor=#ffffff>
      <SCRIPT language=JavaScript><!--
function FrontPage_Form1_Validator(theForm)
{

if (theForm.title.value == "")
  {
    alert("请填写日记标题");
    theForm.title.focus();
    return (false);

  }
if (theForm.title.value.length > 20)
  {
    alert("标题不能大于20位，请重新输入！");
    theForm.title.focus();
    return (false);
  }

  if (theForm.content.value == "")
  {
    alert("请填写日记内容");
    theForm.content.focus();
    return (false);

  }
if (theForm.content.value.length < 15)
  {
    alert("日记内容不能少于15字，请重新输入！");
    theForm.content.focus();
    return (false);
  }

if (theForm.content.value.length > 5000)
  {
    alert("日记内容不能大于5000字，请重新输入！");
    theForm.content.focus();
    return (false);
  }


return (true);
}
//--></SCRIPT>

<script LANGUAGE=javascript>
<!--
var TIMEOUT_ALERT_STR = "您已经超时, 请立即保存信息";

var allminutes = 20;
setTimeout("Time()", 60000);

function Time() {
	allminutes--;

	if (document.layers)
	{
		document.layers.minpt.document.write(allminutes.toString());
		document.layers.minpt.document.close();
	}
	else if (document.all)
		minpt.innerHTML = allminutes.toString();


	if (allminutes > 0)
		setTimeout("Time()", 60000);
	else
		alert(TIMEOUT_ALERT_STR);
}

//-->
</script>

<script language=javascript>
<!--
var sec=0;var min=0;var flag=0;idt=window.setTimeout("update();",1000);
function update() {
	sec=sec+1;if(sec>=60){sec=0;min+=1;}
	document.FrontPage_Form1.twinput.value=min+"分"+sec+"秒";idt=window.setTimeout("update();",1000);
	if((min>=20)&&(flag==0)){window.alert("写信时间超过20分钟,请存原稿以免超时丢失");flag=1;}
}
//-->
</script>

      <FORM name=FrontPage_Form1 
      onsubmit="return FrontPage_Form1_Validator(this)" action=save_diary.asp?act=modify 
      method=post>
      <TABLE cellSpacing=0 cellPadding=6 width=609 align=center border=0>
        <TBODY>
        <TR>
          <TD width=89 clasee="td">&nbsp;</TD>
          <TD width=527>&nbsp;</TD></TR>
        <TR>
          <TD width=89 clasee="td">
            <DIV align=right><FONT color=#cc6600>标 题：</FONT></DIV></TD>
          <TD width=527><INPUT class=input size=70 value="<%=title%>" name=title> </TD></TR>
        <TR>
          <TD width=89 clasee="td">
            <DIV align=right><FONT color=#cc6600>天 气：</FONT></DIV></TD>
          <TD width=527><SELECT name=weather> <OPTION value=晴朗 
              <% if rs("weather")="晴朗" then response.write "selected"%>>晴朗</OPTION> <OPTION 
              value=温暖 <% if rs("weather")="温暖" then response.write "selected"%>>温暖</OPTION> <OPTION value=炎热 <% if rs("weather")="炎热" then response.write "selected"%>>炎热</OPTION> <OPTION 
              value=酷热 <% if rs("weather")="酷热" then response.write "selected"%>>酷热</OPTION> <OPTION value=阴天 <% if rs("weather")="阴天" then response.write "selected"%>>阴天</OPTION> <OPTION 
              value=雾   <% if rs("weather")="雾" then response.write "selected"%>>雾</OPTION> <OPTION value=大雾     <% if rs("weather")="大雾" then response.write "selected"%>>大雾</OPTION> <OPTION 
              value=小雨 <% if rs("weather")="小雨" then response.write "selected"%>>小雨</OPTION> <OPTION value=大雨 <% if rs("weather")="大雨" then response.write "selected"%>>大雨</OPTION> <OPTION 
              value=暴雨 <% if rs("weather")="暴雨" then response.write "selected"%>>暴雨</OPTION> <OPTION value=寒意 <% if rs("weather")="寒意" then response.write "selected"%>>寒意</OPTION> <OPTION 
              value=严寒 <% if rs("weather")="严寒" then response.write "selected"%>>严寒</OPTION> <OPTION value=微风 <% if rs("weather")="微风" then response.write "selected"%>>微风</OPTION> <OPTION 
              value=大风 <% if rs("weather")="大风" then response.write "selected"%>>大风</OPTION> <OPTION value=小雪 <% if rs("weather")="小雪" then response.write "selected"%>>小雪</OPTION> <OPTION 
              value=大雪 <% if rs("weather")="大雪" then response.write "selected"%>>大雪</OPTION> <OPTION value=暴风雪 <% if rs("weather")="暴风雪" then response.write "selected"%>>暴风雪</OPTION></SELECT> <INPUT 
            type=hidden value=<%=id%> name=id> &nbsp;&nbsp;<FONT 
            color=#cc6600>是否公开：</FONT> <FONT color=#cc6600><INPUT type=radio  <% if rs("lock")=1 then response.write "CHECKED"%>
            value=1 name=if_public> 公开　 <INPUT type=radio <% if rs("lock")=0 then response.write "CHECKED"%> value=0 
            name=if_public> 加锁</FONT> <FONT color=#cc6600>&nbsp;</FONT></TD></TR>
        <TR>
          <TD width=61 clasee="td">
            <DIV align=right><FONT color=#cc6600>提 醒：</FONT></DIV></TD>
          <TD width=523>系统无任何动作后超时时间为20分钟, 现在还剩<font color="#FF3333"><b><span id="minpt">20</span></b></font>分钟, 写信时间:<input class=input type=text name=twinput size=6 value="0分0秒"><br>请注意及时保存信息以免丢失，如果日记内容较多，请先提交，再打开日记修改。
                </TD>
              </TR>
        <TR>
          <TD width=61 clasee="td">
            <DIV align=right><FONT color=#cc6600>Ubb：</FONT></DIV></TD>
          <TD width=523>
            <script src=code.js></script>
            <div id="ubbDiv"></div>
            <IFRAME NAME="ubbFrame" width=0 height=0 marginwidth=0 marginheight=0 frameborder=0 scrolling=no SRC="ubb.htm" ></IFRAME>
                </TD>
              </TR>
        <TR>
        <TR>
          <TD vAlign=top width=89 clasee="td">
            <DIV align=right>
            <P>&nbsp;</P>
            <P><FONT color=#cc6600>内 容：</FONT></P></DIV></TD>
          <TD width=527><TEXTAREA class=input name=content rows=20 cols=70><%=rs("content")%></TEXTAREA> 
</TD></TR>
        <TR>
          <TD colSpan=2>
            <DIV align=center><INPUT type=image height=21 src="images/tijiao.gif" width=74 border=0>
            　　 <FONT face=宋体><B><A href="#" onclick=history.back()><IMG 
            height=21 src="images/fanhui.gif" width=74 border=0></A> </DIV></TD></TR>
        <TR>
          <TD colSpan=2>&nbsp;</TD></TR></TBODY></TABLE></FORM></TD></TR>
  <TR>
    <TD bgColor=#ffffff height=16>
      <TABLE cellSpacing=0 cellPadding=3 width=609 align=center bgColor=#9c9a9d 
      border=0>
        <TBODY>
<!--#include file="foot.asp"-->
</TR></TBODY></TABLE></TD></TR></TBODY></TABLE>
</BODY></HTML>

<% rs.close %>
💿 文件大小 2553 K
👤 上传用户 ahkid
📂 所属分类家庭/个人应用
🏷️ 相关标签

#3.0 #日记本 #多用 #修改
⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -