modtongxuelu.asp

mlm双轨制直销系统V8.0免费版 可用于： 1、直拨、回拨电话卡公司。 2、保健品、药品公司。 3、在线销售商品等等。 4、其他类型用到双轨制模式的线上开盘公司。

<!-- #include file="include/adovbs.inc" -->
<!-- #include file="include/dataconn.asp" -->
<!-- #include file="include/checkHy.asp" -->
<!-- #include file="common.asp" -->
<style type="text/css">
<!--
.style1 {font-size: 16px}
.style2 {
	color: #FFFFFF;
	font-weight: bold;
	
}
body,td,th {
	font-size: 12px;
}
a:link {
	color: #000000;
}
a:visited {
	color: #000000;
}
body {
	margin-left: 0px;
	margin-top: 0px;
	margin-right: 0px;
	margin-bottom: 0px;
}
-->
</style>
<% 
if request.QueryString="mod" then
fname=Trim(request.form("fname"))
mobile=Trim(request.form("mobile"))
email=Trim(request.form("email"))
company=Trim(request.form("company"))
hometell=Trim(request.form("hometell"))
addr=Trim(request.form("addr"))
comtell=Trim(request.form("comtell"))
homepage=Trim(request.form("homepage"))
content=request.form("content")
id=request.Form("id")	
'HTML支持
function htmlencode(str)
htmlencode=server.htmlencode(str)
htmlencode=replace(replace(htmlencode,chr(13),"<br>"),"'","’")
end function
set rs=server.createobject("adodb.recordset")
sqltext="select * from tongxunlu where id="& id
rs.open sqltext,conn,3,3
   rs("fname")=fname
	  rs("mobile")=mobile
	  rs("email")=email
	 rs("company")=company
	  rs("hometell")=hometell
	  rs("addr")=addr
	  rs("comtell")=comtell
	  rs("homepage")=homepage
	 rs("content")=content	
rs.update
rs.close

response.write "<script>alert(""修改成功，确认！"");location.href=""tongxunlu.asp"";</script>"

 else
id=request.QueryString("id")
userid=session("HyID")
if  not IsNumeric(id) then
 response.write "<script>alert('非法参数');history.back()</script>"
 response.end
end if
set rs=server.createobject("adodb.recordset")
sql="select * from tongxunlu where id="& id
rs.open sql,conn,1,1 
if rs.bof and rs.eof then
 response.write "<script>alert('非法参数!');history.back()</script>"
 response.end
else 
   if userid<>rs("uid") then
      response.write "<script>alert('非个人数据，出错！');history.back()</script>"
      response.end
   else
      fname=rs("fname")
	  mobile=rs("mobile")
	  email=rs("email")
	  company=rs("company")
	  hometell=rs("hometell")
	  addr=rs("addr")
	  comtell=rs("comtell")
	  homepage=rs("homepage")
	  content=rs("content")	
	  showform  
   end  if 
end if
rs.close
set rs=nothing


sub showform
%>
<br><br>
<form name="form1" action="modtongxuelu.asp?mod" method="post">
<table width="400" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#999999">
  <tr>
    <td width="60" height="25" align="center" bgcolor="#FFFFFF">姓名</td>
    <td width="242" bgcolor="#FFFFFF">
      <input name="fname" type="text" value="<%=fname%>" size="30"></td>
  </tr>
  <tr>
    <td height="25" align="center" bgcolor="#FFFFFF">公司名称</td>
    <td bgcolor="#FFFFFF">
      <input name="company" type="text" value="<%=company%>" size="30"></td>
  </tr>
  <tr>
    <td height="25" align="center" bgcolor="#FFFFFF">手机</td>
    <td bgcolor="#FFFFFF">
      <input name="mobile" type="text" value="<%=mobile%>" size="30"></td>
  </tr>
  <tr>
    <td height="25" align="center" bgcolor="#FFFFFF">住宅电话</td>
    <td bgcolor="#FFFFFF">
      <input name="hometell" type="text" value="<%=hometell%>" size="30"></td>
  </tr>
  <tr>
    <td height="25" align="center" bgcolor="#FFFFFF">办公电话</td>
    <td bgcolor="#FFFFFF">
      <input name="comtell" type="text" value="<%=comtell%>" size="30"></td>
  </tr>
  <tr>
    <td height="25" align="center" bgcolor="#FFFFFF">现居地址</td>
    <td bgcolor="#FFFFFF">
      <input name="addr" type="text" value="<%=addr%>" size="30"></td>
  </tr>
  <tr>
    <td height="25" align="center" bgcolor="#FFFFFF">电子信箱</td>
    <td bgcolor="#FFFFFF">
      <input name="email" type="text" value="<%=email%>" size="30"></td>
  </tr>
  <tr>
    <td height="25" align="center" bgcolor="#FFFFFF">个人主页</td>
    <td bgcolor="#FFFFFF">
      <input name="homepage" type="text" value="<%=homepage%>" size="30"></td>
  </tr>
  <tr>
    <td height="25" align="center" valign="middle" bgcolor="#FFFFFF">简单描述</td>
    <td bgcolor="#FFFFFF"><textarea name="content" cols="30" rows="6"><%=content%></textarea></td>
  </tr>
</table>
<div align="center">
  <input type="hidden" name="id" value="<%=id%>" >
  <input type="submit" name="Submit" value="提交">&nbsp;
  <input type="reset" name="Submit2" value="重置">
</div>
</form>
<%end sub%>
<%End if
%>