| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 832 人关注过本帖
标题:[求助]我怎么隐藏不掉源代码?
只看楼主 加入收藏
pyzheng
Rank: 1
等 级:新手上路
帖 子:102
专家分:0
注 册:2004-12-5
收藏
 问题点数:0 回复次数:2 
[求助]我怎么隐藏不掉源代码?

我的源代码是: ============================================= <!--#include file="conn.inc"--> <html>

<head> <meta http-equiv="Content-Type" content="text/html; charset=gb2312"> <title>笑红尘</title> </head>

<body bgcolor="#ffffff"> <% If Request("UID")<>"" AND Request("PWD")<>"" Then sql="SELECT * FROM current_user WHERE UID='" & Request("UID") & "'" Set current_userRs=conn.Execute(sql) If current_userRs.Bof or current_userRs.Eof Then '当前用户集中没有此人 LogTime=Now() SerialNum=Cstr(Hour(LogTime)) & Cstr(Minute(LogTime)) & Cstr(Second(LogTime))& Cstr(Int(Rnd*10000)) sql="INSERT INTO current_user (UID,Email,LastLogon,IPAddress,SerialNum) VALUES ('" sql=sql & Request("UID") & "','" & Request("Email") & "','" & Now() & "','" & Request("REMOTE_ADDR") & "','" & SerialNum & "')" conn.Execute (sql) Else SerialNum=current_userRs("SerialNum") End If current_userRs.Close Set current_userRs=Nothing End If '以上处理当前用户集,无论是登陆还是注册新用户,都要执行。

LogonSytle=Request("LogonSytle") If LogonSytle="登录" Then sql="SELECT * FROM ever_user WHERE UID='" & Request("UID") & "'" Set LogUserRs=conn.Execute(sql) If LogUserRs.Bof OR LogUserRs.Eof Then Response.Write "请检查是否输错,登陆失败。<br>" Else If Request("PWD")<>LogUserRs("PWD") Then Response.Write "口令出错,请检查是否大小写不对。<br>" Else Response.Redirect "main.asp?SerialNum=" & SerialNum End If End If ElseIf LogonSytle="新用户注册" OR LogonSytle="完成" Then sql="SELECT * FROM ever_user WHERE UID='" & Request("UID") & "'" Set LogUserRs=conn.Execute(sql) If Not (LogUserRs.Eof AND LogUserRs.Bof ) Then Response.Write "这个用户名已经被注册了,请选用其他的用户名。<br>" Else If LogonSytle="完成" Then sql="INSERT INTO ever_user (UID,PWD,Email,HomePage) VALUES ('" sql=sql & Request("UID") & "','" & Request("PWD") & "','" & Request("Email") & "','" & Request("HomePage") & "')" conn.Execute (sql) sql="UPDATE current_user SET Email='" & Request("Email") & "' WHERE UID='" & Request("UID") & "'" conn.Execute (sql) Response.Redirect "main.asp?SerialNum=" & SerialNum End If End If End If '程序处理完成,下面根据情况输出

%>

<form method="POST" action="default.asp"> <% If LogonSytle="" OR LogonSytle="登录" OR LogonSytle="完成" Then %> <div align="center"><center><p><font face="华文楷体"><big><big><font color="#FF0080">如果您是第一次进入本论坛,请选择新用户注册!</font></big></big><br> </font> </p> </center></div><div align="center"><center><p><font color="#FF0080" face="华文楷体"><big><big>你的姓名:</big></big></font><input type=text name=UID size=20 value="<% =Request("UID") %>" style="background-color: rgb(192,192,192); color: rgb(128,0,0)"> <br> <font color="#FF0080" face="华文楷体"><big><big>你的口令:</big></big></font><input type="password" name="PWD" size="20" style="background-color: rgb(192,192,192); color: rgb(128,0,0)"></p> </center></div><div align="center"><center><p><input type="submit" value="登录" name="LogonSytle"> <input type="submit" value="新用户注册" name="LogonSytle"> <% Else %> </p> </center></div><div align="center"><center><p><font color="#FF0080" face="华文楷体"><big><big>欢迎你来到这里,你可以在这里展现你的风采!</big></big></font></p> </center></div><div align="center"><center><p><font color="#FF0080" face="华文楷体"><big><big>你的姓名:</big></big></font><input type="text" name="UID" value=<% =Request("UID") %> size="20" style="background-color: rgb(192,192,192); color: rgb(128,0,0)"> </p> </center></div><div align="center"><center><p><font color="#FF0080" face="华文楷体"><big><big>你的密码:</big></big></font><input type="text" name="PWD" value="<% request("PWD") %>" size="20" style="background-color: rgb(192,192,192); color: rgb(128,0,0)"> </p> </center></div><div align="center"><center><p><font color="#FF0080" face="华文楷体"><big><big>电子邮件:</big></big></font><input type="text" name="Email" size="20" style="background-color: rgb(192,192,192); color: rgb(128,0,0)"></p> </center></div><div align="center"><center><p><font color="#FF0080" face="华文楷体"><big><big>个人主页:<input type="text" name="HomePage" size="20" style="background-color: rgb(192,192,192); color: rgb(128,0,0)"></big></big></font></p> </center></div><div align="center"><center><p><input type="submit" value="完成" name="LogonSytle"> <% End If%> </p> </center></div> </form> </body> </html> ============================================= 我的源代码写错了什么地方?见http://www.xnasp.net/home/pyzheng/(这个地方也可以看见源代码啊?) 才项下面的这个页面显示如图: 就是怎么不能在页面上隐藏掉不应该出现的代码?

比如:<font color="#FF0080" face="华文楷体"><big><big>你的姓名:</big></big></font><input type=text name=UID size=20 value="<% =Request("UID") %>" style="background-color: rgb(192,192,192); color: rgb(128,0,0)"> 有问题?有什么问题?value="<% =Request("UID") %>" 有什么问题?
搜索更多相关主题的帖子: 源代码 隐藏 
2005-01-06 23:02
regedit
Rank: 5Rank: 5
等 级:贵宾
威 望:19
帖 子:950
专家分:0
注 册:2004-6-8
收藏
得分:0 
汗,你的扩展名还是html
如果页面中含有代码的话还是要把页面的扩展名改为.asp这样子才能正常显示~

最新作品:百货品牌商品资讯第一门户([url]http://www./[/url]),欢迎交流
2005-01-07 09:33
suyongtao
Rank: 16Rank: 16Rank: 16Rank: 16
等 级:版主
威 望:33
帖 子:8674
专家分:127
注 册:2004-11-6
收藏
得分:0 
html

[此贴子已经被作者于2005-1-7 12:00:25编辑过]


面朝大海,春暖花开!
2005-01-07 11:58
快速回复:[求助]我怎么隐藏不掉源代码?
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.018417 second(s), 8 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved