交友中心安装说明

CMS1.2交友中心
修改说明：
1、把数据库jy.mdb导入你的数据库。
2、在后台的执行SQL中执行以下语句：
alter TABLE user_data ADD ml INTEGER
3、拷贝文件至你的文件夹
4、修改user_put.asp文件添加以下内容：
sub gga
dim found_err,drname,drsex,drqq,dremail,drurl,drwhe,drtopic,dricon,drface,drword,drremark,drhidden,valcode
  if joekoe_cms.chk() then
    drname=trim(request.form("wrname"))
    drname=joekoe_cms.code_form(drname)
     drword=request.form("wrword")
      
    'found_err=""
    if not post_tim() then
      found_err=found_err&"+对不起，留言的间隔时间为 <font class=red>"&int(dim_num(28))&"</font> 秒！<br>"
    end if    
    if symbol_name(drname)="no" then
      found_err=found_err & "+请输入您的 <font class=red>用户名</font>（长度不能大于20）<br>"
    end if
        if drword="" or isnull(drword) then
      found_err=found_err & "+留言的 <font class=red>留言内容</font> 是必需要的！请输入。<br>"
    end if
        if found_err<>"" then
      response.write "<tr class=bg_td><td align=center height=300 colspan=3>"&found_error(found_err,260)&"</td></tr>"
      exit sub
    end if
    sql="select * from gg where (id is null)"
    call joekoe_cms.exec("",-1)
    rs.open sql,conn,1,3
    rs.addnew
    rs("name")=drname
    rs("word")=drword
    rs("time")=joekoe_cms.now_time
       rs.update
    rs.close
%>
<tr class=bg_td><td align=center height=300 colspan=3>
！！<font class=red>你和征友公告已成成功发布</font>！！！<br><br>
（系统将在 <font class=red><%response.write dim_num(21)%></font> 秒钟后自动返回）
<meta http-equiv='refresh' content='<%response.write dim_num(21)%>; url=jy.asp'>
</td></tr>
<%
    'call val_chk_end(index_url)
    exit sub
  end if
%>
<tr class=bg_td>
<td height=25>你的名字：</td>
<td><input type=text name=wrname value='<%response.write login_username%>' size=27 maxlength=20></td>
</tr>
<tr class=bg_td>
<td valign=top><br>你的留言：<br><250个字<br><%response.write web_frm_word%></td>
<td colspan=2><textarea rows=7 name=wrword cols=65 maxlength=1000 onkeydown="javascript:frm_quicksubmit();"></textarea></td>
</tr>
<% call submit_add()
end sub
5、打开include/admin_config_edit.asp文件找到下面这一段代码
<td>推荐网站：</td>
<td><input type=radio name=web_setup_25 value='1'<% if int(tmp1)=1 then response.write " checked" %>> 开放 <input type=radio name=web_setup_25 value='0'<% if int(tmp1)=0 then response.write " checked" %>> 关闭</td>
<td class=gray></td>
</tr>
添加以下代码：
<% tmp1=format_mid_num(31) %>
<tr>
<td>发布聚会信息：</td>
<td><input type=radio name=web_setup_31 value='1'<% if int(tmp1)=1 then response.write " checked" %>> 开放 <input type=radio name=web_setup_31 value='0'<% if int(tmp1)=0 then response.write " checked" %>> 关闭</td>
<td class=gray></td>
</tr>

文章来自: Original
引用通告: 查看所有引用 | 我要引用此文章
Tags:
相关日志: