自己写的一个asp+ajax投票代码,帮看看问题出在那里

admin 发表于 2011-03-04 17:47 浏览次数:

四个文件index.asp for.asp conn.asp ajax.as
index.asp
[code=V]B
<script type="text/javascript" src=http://topic.csdn.net/u/20110222/10/"ajax.js"> </script>

<!-- #include file = "conn.asp"-->

<% 
 
set rs = server.CreateObject("adodb.recordset")

sql= "select * from tongji "

rs.open sql,conn,1,1

%>

[/code]
[code=HTM]L
大汉帝国 <input type="submit" name="1" value=http://topic.csdn.net/u/20110222/10/"投票" onclick ="funphp100('book1')">  目前共有 <input name="book1" size="20" value=" <%= rs("book1")%>">人投票给此书!
[/code]

ajax.as

[code=JScrip]t

var xmlHttp;
function S_xmlhttprequest() {
if(window.ActiveXObject) {
xmlHttp = new ActiveXObject('Microsoft.XMLHTTP');
} else if(window.XMLHttpRequest) {
xmlHttp = new XMLHttpRequest();
}
}

function funphp100(url) {

S_xmlhttprequest();
alert(url);
xmlHttp.open("GET","for.asp?id="+url,true);
xmlHttp.onreadystatechange = byphp;
xmlHttp.setRequestHeader("If-Modified-Since","0");
xmlHttp.send(null);
}

function byphp() {

      var byphp100 =  xmlHttp.responseText;

          document.getElementById('book1').value = http://topic.csdn.net/u/20110222/10/byphp100;

}
[/code]

for.asp
[code=VBScrip]t
<!-- #include file = "conn.asp"-->

<%

dim n

n = request("id")

set rs = server.CreateObject("adodb.recordset")

sql = "update tongji set n = n+1 where id = 1 "

rs.open sql,conn,1,1

Response.write(rs("n"))

%>
[/code]
主要请大家帮忙看看for.asp文件,错误出在哪里,其余那三个文件应该是没问题,该程序我原来是用php写的,测试完全好用,我写这个asp主要就是改了for.asp文件

分类: ASP | 评论数: 3 | 阅读全文

ASP上传文件夹

admin 发表于 2011-03-04 17:46 浏览次数:

我想用ASP上传一个文件夹内的所有图片,请教该怎么写?????
最好是用ASPUPLOAD上传

分类: ASP | 评论数: 7 | 阅读全文

recordset能否传递到下一页面?

admin 发表于 2011-03-04 17:46 浏览次数:

最近在想这个问题,recordset能否传递的,这么大数据量估计是比较困难,假如只传某个字段呢?
现在做一个多条件查询的网页,要在下一页面继续使用查询结果,我都是把查询参数传到下一页,到下一页再后台检索一遍,感觉有点重复工作啊,假如能把查询结果的recordset直接传过去就好了,不知道asp能不能实现。

分类: ASP | 评论数: 7 | 阅读全文

求IP限制代码。

admin 发表于 2011-03-04 17:46 浏览次数:

求IP限制代码,从数据库A表中读取限制IP列表

IP列表内容为:

133.111.111.111 <—单IP限制
133.100.*.* <—IP段限制

检测用户IP,然后查询IP限制列表,如果用户IP存在与IP限制列表中,则无法访问网站。

求类似这样的代码。

分类: ASP | 评论数: 4 | 阅读全文

ASP如何截取URL中的地址

admin 发表于 2011-03-04 17:46 浏览次数:

url地址是动态的比如:
http://www.xxx.com/ao/ao1/hello.asp?id=3

http://www.xxx.com/ao/ao131/hao.asp?id=789

http://www.xxx.com/kk/ag11/yoo.asp?id=74234

如何提取出 ? 前的文件名hello.asp,hao.asp,yoo.asp
网高手指点

分类: ASP | 评论数: 14 | 阅读全文

access里 这话有错??

admin 发表于 2011-03-04 17:46 浏览次数:
VBScript code
SELECT Knowledge_Id,Knowledge_Title,Knowledge_EnTitle,Knowledge_Time,ChannelType_Name,ChannelType_EnName FROM Nxcb_KnowsType,Nxcb_Knowledge WHERE Nxcb_KnowsType.ChannelType_Id=Nxcb_Knowledge.Knowledge_sTypeId ORDER BY Knowledge_Px ASC,Knowledge_Time DESC
分类: ASP | 评论数: 10 | 阅读全文

请教:动易短信通 表单提交页面

admin 发表于 2011-03-04 17:46 浏览次数:

在网页上 需要经过两个页面才能发送短信 要把两个页面变成一个 总是提示校检失败 实在搞不定了 回娘家求助。。

数据提交到动易短信通提供的短信借口 需要UserName与 MD5String两个参数 

VBScript code
<%@language=vbscript codepage=936 %> <!--#include file="MD5_Code.asp"--> <% '******************************************************** '-------------------------------------------------------- '--------------动易短信通ASP接口开发示例----------------- '-------------------------------------------------------- '******************************************************** '******************************************************** '定义变量 Dim mSendNum '接收短信的手机号。可以同时向多人发送短信。每一行为一个手机号码一行中可使用逗号或空格分隔多个信息,分别对应内容中{$1} {$2} {$3} Dim mContent '短信内容,可以使用变量,{$2},{$3} Dim mSendTiming '是否定时发送,0为否(默认),1为定时 Dim mSendTime '定时发送时间 Dim mReserve '自定义字段 Dim ID '用户生成的ID,请保证唯一性,可以用用户名加日期时间来生成 Dim mUserName '用户在短信通申请的用户名 Dim mKey 'key 为用户在短信通注册时设置MD5私钥值。MD5私钥值可以登录短信通http://sms.powereasy.net/member更改。 Dim MD5String 'MD5校验字符。MD5字符是由上述几个字段加上用户密码,然后用MD5函数加密得到的字符串。字段顺序如下: 'ID & mUserName & mKey & mSendNum & mContent & mSendTiming & mSendTime Dim mURL '短信通提供的发送接口URL '******************************************************** '******************************************************** '函数名:GetNumString '作 用:获得项目随即数 '返回值:随机无重复的数字 '******************************************************** Function GetNumString() Dim v_ymd, v_hms, v_mmm v_ymd = Year(Now) & Right("0" & Month(Now), 2) & Right("0" & Day(Now), 2) v_hms = Right("0" & Hour(Now), 2) & Right("0" & Minute(Now), 2) & Right("0" & Second(Now), 2) Randomize v_mmm = Right("0" & CStr(CLng(99 * Rnd) + 1), 2) GetNumString = v_ymd & v_hms & v_mmm End Function '初始化变量,和从表单中获取变量值 mURL = "http://sms.powereasy.net/MessageGate/Message.aspx" ID = GetNumString() mContent = Trim(Request("Content")) mSendTiming = Trim(Request("SendTiming")) mSendNum = Trim(Request("SendNum")) mSendTime = Trim(Request("SendDate")) mReserve = Trim(Request("Reserve")) mUserName = "" '用户在短信通申请的用户名 mKey = "" '在短信通注册时的MD5私钥,请不要泄漏 '加密数据生成MD5String校验串 Dim MD5 Set MD5 = New Md5_Class MD5String = UCase(Trim(MD5.MD5(ID & mUserName & mKey & mSendNum & mContent & mSendTiming & mSendTime))) Set MD5 = Nothing %> <% If Trim(Request("Action")) <> "Send" Then '*************************************************** '下面是收集数据的表单 '*************************************************** %> <html> <head> <Title>发送手机短信</Title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> </head> <body> <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1"> <tr> <td height="22" colspan="10" align="center"><b>发 送 手 机 短 信</b></td> </tr> </table> <form name="myform" method="post" action="send.asp?Action=Send"> <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1"> <tr> <td align="right">接收人:</td> <td>可以同时向多人发送短信。每一行为一个手机号码<br>一行中可以使用逗号或空格分隔多个信息,分别对应内容中的{$1} {$2} {$3} ……<br> <textarea name="SendNum" id="SendNum" cols="50" rows="6">13800000000,张三,2380</textarea></td> </tr> <tr class="tdbg"> <td align="right">短信内容:</td> <td> <textarea name="Content" id="Content" cols="50" rows="8">{$2},你本月的工资为{$3}。工资已经存入你的银行帐户,请注意查收!----财务部 (请勿回复此短信)</textarea> <br>每70个字计算为一条短信发送 </td> </tr> <tr> <td align="right">发送时间:</td> <td><input type="radio" name="SendTiming" value="0" checked>立即发送&nbsp;&nbsp;<input type="radio" name="SendTiming" value="1" />定时 <input name="SendDate" type="text" size="16" maxlength="10" /> </td> </tr> <tr> <td align="right">自定义:</td> <td><input name="Reserve" type="text" size="16" maxlength="10" /></td> </tr> <tr> <td colspan=2 align="center"> <input name="Submit" type="submit" id="Submit" value=" 发 送 " /> </td> </tr> </table> </form> </body> </html> <% Else '*************************************************** '下面是提交到短信通服务器的表单 '*************************************************** %> <html> <head> <Title>短信发送</Title> <meta http-equiv="Content-Type" content="text/html; charset=gb2312" /> </head> <body> <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1"> <tr> <td height="22" colspan="10" align="center"><b>发 送 手 机 短 信</b></td> </tr> </table> <form name="message" method="post" action="<%= mURL %>"> <table width="100%" border="0" align="center" cellpadding="2" cellspacing="1"> <tr> <td colspan="2" align="center">预 览 短 信</td> </tr> <tr valign="top"> <td width="300">下面是根据您指定的条件查找到的接收人:<br><textarea name="SendNum" rows="20" cols="40" readonly><%= mSendNum %></textarea></td> <td><b>短信内容:</b><br><textarea name="Content" rows="5" cols="60" readonly><%= mContent %></textarea><br><br><br><br><br><br><b>说明:</b><br>因为每条短信不能超过70个字,所以短信数可能会大于号码数。<br>因为短信内容中的变量替换等原因,可能会导致实际发送的短信数会超过这里计算的短信数,最终结果以动易短信通平台上的实际发送数目为准。</td> </tr> <tr class="tdbg"> <td colspan="2" height="50" align="center"><input type="submit" name="submit" value="提交给短信服务器"> <input type="hidden" name="ID" value="<%= ID %>" /> <input type="hidden" name="UserName" value="<%= mUserName %>" /> <input type="hidden" name="SendTiming" value="<%= mSendTiming %>" /> <input type="hidden" name="SendTime" value="<%= mSendTime %>" /> <input type="hidden" name="MD5String" value="<%= MD5String %>" /> <input type="hidden" name="Reserve" value="<%= mReserve %>" /> </td> </tr> </table> </form> </body> </html> <% End If '*************************************************** %>
分类: ASP | 评论数: 0 | 阅读全文

关于万网的M3主机的rewrite伪静态问题,急.

admin 发表于 2011-03-04 17:45 浏览次数:

网站之前是G类型的,做了rewrite伪静态,但现在要把网站移到M3型类的主机,以前的规则就不能用了.

下载了M3的按例,但是实现不了,不知道是我写错了规则还是服务器问题,有哪位用过的,指点一下,谢谢..

<rewrite url="~/products.html" to="~/products/index.asp" processing="stop"/>

错误提示如下:

无法找到该页
您正在搜索的页面可能已经删除、更名或暂时不可用。
——————————————————————————–

请尝试以下操作:

确保浏览器的地址栏中显示的网站地址的拼写和格式正确无误。
如果通过单击链接而到达了该网页,请与网站管理员联系,通知他们该链接的格式不正确。
单击后退按钮尝试另一个链接。
HTTP 错误 404 – 文件或目录未找到。
Internet 信息服务 (IIS)

——————————————————————————–

技术信息(为技术支持人员提供)

转到 Microsoft 产品支持服务并搜索包括“HTTP”和“404”的标题。
打开“IIS 帮助”(可在 IIS 管理器 (inetmgr) 中访问),然后搜索标题为“网站设置”、“常规管理任务”和“关于自定义错误消息”的主题。

分类: ASP | 评论数: 4 | 阅读全文

咨询个调用地址参数的问题

admin 发表于 2011-03-04 17:26 浏览次数:

要做个接口,从其他服务上下载回复的短信内容 
http://webservice.10808.net/servlet/sms/getsms.xsms?type=C&name=***&pwd=****&dst= 可以再IE中显示如下结果
count=3||src=http://topic.csdn.net/u/20110224/10/18710*****8|dst=|msg=测试试|time=2011-02-23 19:08:29||src=15111******|dst=|msg=回诊地点在那里|time=2011-02-23 19:07:50||src=15193******|dst=|msg=|time=2011-02-23 18:13:17 

我如何才能获取在本地获取 SRC 和MSG得内容的好方便我导入数据库,以另外一种格式调用出来呢。。。。

分类: ASP | 评论数: 4 | 阅读全文

ISAPI_Rewrite3设置图片盗链?

admin 发表于 2011-03-04 17:26 浏览次数:

为什么我查看资料后这样配置:  
RewriteCond %{{HTTP:Host}#%{HTTP:Referer}} ^([^#]+)#(?!http://\1).+$  
RewriteRule ^.*\.(?:gif ¦jpg ¦png)$ /block.gif [NC,N,O]  
运行结果是连自己都阻止了? 
请问RewriteCond %{{HTTP:Host}#%{HTTP:Referer}} ^([^#]+)#(?!http://\1).+$要如何修改?请给答案的朋友不要直接给网站上的答案,那些我都试过了,不能用!另外我用的版本是3.1.0.34

分类: ASP | 评论数: 5 | 阅读全文

跳过编辑过程直接写入数据库

admin 发表于 2011-03-04 17:26 浏览次数:

建立一个修改页面,参数是 ?id=2&action=edit
点击之后直接显示 编辑成功, 直接省略了编辑过程就往数据库写完数据了(当然都是空)
有遇到这种情况的吗?
高手来指点一下啊
本来存在一个form表的,也已经在最顶端获取数据了

分类: ASP | 评论数: 7 | 阅读全文

谷歌和百度的个性主页是怎么实现的?

admin 发表于 2011-03-04 17:25 浏览次数:

看到了谷歌和百度都有个性主页,就是可以将各个板块进行拖到并保存,你下次登录还是那个样子!
像这样的功能要怎么去实现啊?用asp.net!

分类: ASP | 评论数: 3 | 阅读全文

求asp读取网站标题正则表达式

admin 发表于 2011-03-04 17:25 浏览次数:

用正则表达式读取网站的标题,关键字!!求 正则表达式

分类: ASP | 评论数: 1 | 阅读全文

asp中的“连接运算符 &” 问题

admin 发表于 2011-03-04 17:25 浏览次数:

1、正确的源代码为:

HTML code
<a href="/Search/scompanys.asp?sid=2_1_1&amp;subcatid=16&provinceid=<%=newcity%>" target="_blank">热轧薄板</a>

  2、为了实现多个网页下重复调用,我想将其改写成通用格式:

HTML code
<% dim wangzhi, qita,city addr=lcase(trim(request.ServerVariables("Path_Info"))) if instr(addr,"/seatch/") > 0 then wangzhi="/Search/scompanys.asp?sid=" qita="provinceid=" city="newcity" end if %> <a href="<%=wangzhi%>2_1_1&amp;subcatid=16&<%=qita%>&'<%'&<%=city%>&'%>'"& target="_blank">热轧薄板</a>

  3、但是,【=<%=newcity%>】我怎么也实现不了。恳请大师指点

分类: ASP | 评论数: 5 | 阅读全文

asp的rewriter伪静态原文档url写法

admin 发表于 2011-03-04 17:08 浏览次数:

高手帮忙

asp伪静态的原文档是要把所有的url都手动改成****.html连接,还是只要装了ISAPI_Rewrite原文档url按原来的写成*****.asp就可以?

如我写的下则是:
RewriteRule /news-([0-9,a-z]*).html /news.asp?id=$1

我原来的原文档里有个连接是<a href=http://topic.csdn.net/u/20110226/23/"news.asp?id=86">新闻</a>

问题:

1.我现在是要把原文档里的url改成<a href=http://topic.csdn.net/u/20110226/23/"news-86.html">新闻</a>,还是按原来的就可以了?

2.如果要改那我之前做的网站是不是要全部都要重新修改URL,这样太麻烦了.请问有没有其它方法不用更改原网站的源文档?

分类: ASP | 评论数: 5 | 阅读全文

在ASP.NET中用iframe调用的网页自动缩小

admin 发表于 2011-03-04 17:07 浏览次数:

我在ASP.NET中用iframe调用的网页自动缩小。(在index.aspx中用iframe调用homeLeftmenu.html)
如图:原始网页菜单

HTML code
<td width="200" height="500" rowspan="2" align="left" valign="top" bgcolor="#337ABB" ID="frmTitle"> <iframe id="frmleft" name="frmleft" src="homeLeftmenu.html" height="500" width="200" frameborder="0" scrolling="yes" allowtransparency="true"> </iframe> </td>

加入代码调用后变成以下图样:

请问这是为什么,有什么解决的方法吗?

分类: ASP | 评论数: 3 | 阅读全文

ASP中2个页面中IFRAME框架页传值?

admin 发表于 2011-03-04 17:07 浏览次数:

我做了2个ASP页面,每个页面内又用iframe引用1个asp页面,我如何将第1个ASP页面iframe内asp页面的值传递给第2个ASP页面内asp?

分类: ASP | 评论数: 1 | 阅读全文

WIN7,64位,IIS一直错误

admin 发表于 2011-03-04 17:07 浏览次数:

开启自带的IIS,可以用调试软件上,但用IIS一直显示
HTTP 错误 500.19 – Internal Server Error
web.config 文件的 system.webServer/httpErrors 节中不允许绝对物理路径“C:\inetpub\custerr”。请改用相对路径。

应该是服务器配置有错哪了,求解决。

分类: ASP | 评论数: 12 | 阅读全文

asp转码问题

admin 发表于 2011-03-04 17:07 浏览次数:

这个问题困扰我很久了,希望csdn的高手能够帮助解决。
我需要用URL来传值,这个值是UTF-8编码的,比如“%E6%88%91%E7%88%B1%E4%BD%A0”,汉字就是“我爱你”。
理论上来讲我们用Request接收到这个值之后,将它转换成gb2312就行了。可是问题就在这里了,我用Request接收%E6%88%91%E7%88%B1%E4%BD%A0这个值的时候结果就成了“鎴戠埍浣”,而我用一个utf-8转gb的代码转“%E6%88%91%E7%88%B1%E4%BD%A0”这个值,可以正常转换。但是如果转换接收到的这个“鎴戠埍浣”就无法转换,也是乱码。

问题说清楚了,我想常用asp的人应该知道这个问题。简单的讲就是我需要接受URL中一个UTF-8的值,接受之后转为gb2312。
(对了,不可以在传值之前先转码)

分类: ASP | 评论数: 12 | 阅读全文

找人帮帮忙,自己想了很久还是不会?

admin 发表于 2011-03-04 16:48 浏览次数:

评分功能和内容添加都已经有人实现了。但自己还想要再之间 加多个。 自我评定。

就是 多行文本框 写入 数据库里。我自己想了很久都没做到。可能是理解不了原来作者的数据库连接字符串。。。

呵呵。我也是小菜。所以想请大家帮帮忙。

大概就是图片那个样子的。

自己弄了4天,都想不到该怎么弄。。。

整体原文件打包下载:
http://down.qiannao.com/space/file/8sola/share/2011/2/28/bjpc.rar/.page

后台登陆:/admin 用户密码都是admin 

希望会的帮我弄下,我将十分感谢你,我也可以学习下新的数据库连接方式。我的E-mail:312170878@qq.com

这个是做来给班级弄评比的。。

接着一楼回复的

后台调用显示主题是:<%=rsTopic("Topic")%>
1楼显示评比分数。。。

分类: ASP | 评论数: 6 | 阅读全文

返回首页 | 关于我们 | 联系我们 | 广告合作 | 网站地图 | 友情链接 | 版权声明