亲，您未登录哦！ 登录 | 注册
首页  |  社区  |  工具箱  |  代码库  |  博客  |  招聘  |  文章  |  新闻  |  下载  |  读书
回 帖 发 新 帖 刷新版面

主题：帮我改改呀,谢谢HTTP 错误 405 - 禁止访问资源

zjp520 [专家分：0] 发布于 2007-06-03 16:36:00

<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN" "http://www.w3.org/TR/html4/loose.dtd">
<%
'==================================
'=文 件 名：showart.asp
'=功    能：文章内容
'==================================
%>
<% Response.Buffer=True %> 
<iframe src="../admin_top.htm" align="center" width="775" height=240 marginheight="0" hspace="0" vspace="0" frameborder="0" scrolling="no"> 
</iframe>

<html>

<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<title>¤一路♂追♀风¤_精彩文章</title>
<!--
BODY{cursor: url(images/mouse5.ani);}
a{cursor: url(images/mouse1.ani);}
-->
<script language"javascript">
var currentpos,timer; 
function initialize() 
{ 
timer=setInterval("scrollwindow()",10);
} 
function sc(){
clearInterval(timer); 
}
function scrollwindow() 
{ 
currentpos=document.body.scrollTop; 
window.scroll(0,++currentpos); 
if (currentpos != document.body.scrollTop) 
sc();
} 
document.onmousedown=sc
document.ondblclick=initialize
</script>


</head>
<body>
<div align="center">
  <center>
  <!--#include file="conn.asp"-->
<% dim rs,sql1,sql2
set rs=server.createobject("adodb.recordset")
'sql1="update art set count=count+1 where id="&request("id")
'rs.open sql1,zjp,1,1
sql2="select * from art where id="&request("id")
rs.open sql2,zjp,1,1
%> 

    <table width="775" height="100%" border="1">
      <tr align="left" valign="top">
        <td width="171"> 导向</td>
        <td width="588" height="100%" rowspan="2">
        <table width="100%" border="1" align="right" cellpadding="0" cellspacing="0" bordercolor="#D2DED2">
          <tr>
          <TD colSpan=5 align="center">  &nbsp;导航栏</TD>
          </tr>
          <tr>
            <TD colSpan=5 align="center"  background="../images/lang.gif"><div align="center" class="style2"><span class="style3">精彩文章</span>　</div></TD>
            </tr>
          <% while (not rs.eof) %>
          <tr>
          <Td width="35%" background="../images/lang.gif" align="center"><div align="center">来&nbsp;&nbsp;&nbsp;&nbsp;源：</div></Td>
          <TD width="65%" colspan="4"><div align="left"><%= rs("from") %></div></TD>
          </tr>
          <tr>
          <TD width="35%" background="../images/lang.gif" align="center"><div align="center">作&nbsp;&nbsp;&nbsp;&nbsp;者：　</div></TD>
          <TD colspan="4"><div align="left"><%=  rs("zuoz") %></div></TD>
          </tr>
          <tr>
          <TD width="35%" background="../images/lang.gif" align="center"><div align="center">文章标题：</div></TD>
          <TD colspan="4"><div align="left"><font color="#FF0000" size="+2"><%=  rs("title")  %></font></div></TD>
          </tr>
          <tr>
          <TD background="../images/lang.gif" width="35%" align="center"><div align="center">阅读次数：　</div></TD>
          <TD colspan="4"><div align="left"><%= rs("count") %></div></TD>
          </tr>
          <tr>
          <TD background="../images/lang.gif" width="35%" align="center"><div align="center">发表日期：　</div></TD>
          <TD colspan="4">  <div align="left"><%=  rs("date") %></div></TD>
          </tr>
          <tr>
          <TD background="../images/lang.gif" width="35%" align="center"><div align="center">查看权限：</div></TD>
          <TD colspan="4"> <div align="left">普通文章</div></TD>
          </tr>
          <tr>
          <TD background="../images/lang.gif" width="35%" align="center"><div align="center">查看方式：　</div></TD>
          <TD colspan="4"><div align="left">查看：
                <STYLE>.A_font_change_big {
    FONT-SIZE: 16px; LINE-HEIGHT: 27px
}
.A_font_change_big A {
    FONT-SIZE: 16px; LINE-HEIGHT: 27px
}
.A_font_change_mid {
    FONT-SIZE: 14px; LINE-HEIGHT: 24px
}
.A_font_change_mid A {
    FONT-SIZE: 14px; LINE-HEIGHT: 24px
}
.A_font_change_sml {
    FONT-SIZE: 12px; LINE-HEIGHT: 21px
}
.A_font_change_sml A {
    FONT-SIZE: 12px; LINE-HEIGHT: 21px
}
</STYLE>
                        <A 
                        onclick="addClass('articleText4ac5afa4010006mk','A_font_change_big')" 
                        href="javascript:;">大</A><A 
                        onclick="addClass('articleText4ac5afa4010006mk','A_font_change_mid')" 
                        href="javascript:;">中</A><A 
                        onclick="addClass('articleText4ac5afa4010006mk','A_font_change_sml')" 
                        href="javascript:;">小</A>

 [双击滚屏] 　</div></TD>
          </tr>
           <tr>
          <TD height="100%" colSpan=5><div class="sysBr500 text"  id=articleText4ac5afa4010006mk align=left><%=rs("content")  %> </div></TD>
          </tr>
      <% rs.movenext
             wend
              
 %>   
          <tr align="left">
            <td colspan="5">上一篇：  <input name="button" type="button" onClick="javascript:history.go(-1)"  value="返回目录">
              <BR>
              下一篇：</td>
          </tr>     

               <%
                exec="select * from art_text where id="&request("id")                     
                set rs = server.CreateObject ("adodb.recordset")
                rs.open exec,zjp,1,1
        
        %>  
        <% 
            if  rs.EOF AND rs.BOF then %>
                            <tr>
            <td colspan="5"><%response.Write ("暂时还没有评论…………") %></td>
          </tr> 
               <% Else 
                   do while not rs.eof
            %>
            <tr>
            <td colspan="5">【评论者：<span class="style2"><%= rs("name") %></span>】&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;评论时间：<%= rs("date") %>&nbsp;&nbsp;<%= rs("now") %></td>
          </tr>
          <tr>
            <td colspan="5"><%= rs("text") %></td>
          </tr>
                 
                    <%                          
          rs.movenext                                  
          loop  
           end if                              
          rs.close                            
          set rs=nothing                            
          zjp.close                            
          set zjp=nothing %>           
          <tr align="left" valign="top" >
            <td colspan="5" > 
              </td>
          </tr> 
          <tr align="right" valign="top">
            <td colspan="5">第0页，共0页，共<span class=key_font>0</span>条评论</td>
          </tr>
          <tr align="left" valign="top">
            <td colspan="5">【发表评论】</td>
          </tr>
          <tr align="center" valign="top">
            <td colspan="5"><form name=form1 method=post action="action?save">
              <p>您的称呼
                  <input name="name" type="text" id="name" size="10" >
                  <span class="style5"> * </span>验 证 码
                  <input name="textfield" type="text" value="无" size="10">
                  <br>
  您的评论：最多100字 <span class="style5">*</span> <br>
                <textarea name="text" cols="80" rows="5" id="text" onFocus="this.value=''">在此发表评论~~~</textarea>
                <br>
                  <input type="submit" name="Submit" value="发表">
&nbsp;&nbsp;
    <input type="hidden" name="savetext" value="true">
    <input type="reset" name="Submit" value="重写">
                  </p>
              </form></td>
          </tr>
        
        </table>
        ?</td>
      </tr>
      <tr align="left" valign="top">
        <td>&nbsp;</td>
      </tr>
  
    </table>
  </center>
</div>
<iframe src="../admin_footer.htm" align="center" width="775" height=240 marginheight="0" hspace="0" vspace="0" frameborder="0" scrolling="no"> 
</iframe>
</body>
</html>
<%
  if request("action")="save" then    '发表评论
    dim name,date,now,text
    name=request.form("name")
   text=request.form("text")
       else 
    Response.End 
 end if
    sql="select * from art_text where id="&request("id")
    set rs=server.createobject("adodb.recordset")
    rs.open sql,zjp,1,3
    rs.addnew
    rs("id")=request("id")
    if name="" then 
      Response.Write " <script> window.alert('您的大名都不写，这么懒！'); history.back();</script>"
        Response.End 
        else
        rs("name")=name
    end if
    if text=""or len(text)>300 then 
       Response.Write " <script> window.alert('评论内容不能为空或者超过了300字符！'); history.back();</script>"
        Response.End
       else
       rs("text")=text
    end if
    rs("date")=date() 
    rs("now")=now()
    rs.update
    Response.Write ("<script>alert('回复留言成功！');window.location.href='gbook.asp';</script>")    
      rs.close:set rs=nothing
%>
本帖地址：  http://bbs.pfan.cn/post/236065.html

回复列表 （共6个回复）

沙发

yaozheng [专家分：28410] 发布于 2007-06-03 18:00:00

<form name=form1 method=post action="action?save">
你这个是打算提交到哪个文件？？？

板凳

zjp520 [专家分：0] 发布于 2007-06-21 10:28:00


就是提交给本页尾部的ASP代码呀
请帮我改改

3 楼

longlong16 [专家分：10670] 发布于 2007-06-21 10:58:00

<form name=form1 method=post action="action?save">
action?是个页面吗?

4 楼

hcn008 [专家分：380] 发布于 2007-06-21 15:23:00


如果是想action=save提交到本页的话,应该改成这样:
<form name=form1 method=post action="?action=save">

5 楼

zjp520 [专家分：0] 发布于 2007-06-21 18:13:00

是的就是这个

6 楼

zjp520 [专家分：0] 发布于 2007-06-21 18:19:00


我是这样写的呀，你有没有相关的代码，让我看看呀，就是在本页写评论，在本就显示评论，并且最是在针对每一篇不同的文章，

我这个是做的查看文章的全部内容，并对这篇文章进行的评论！！

我来回复

您尚未登录，请登录后再回复。点此登录或注册

程序员工具箱 new

  • 更多工具

    • 代码片段

  • 模拟键盘（不可按）
  • 碰撞的唐三
  • 精彩奥运热点赛事的实时采集
  • 获取天气动态信息
  • 文件查找
  • python大数据抓取京东电脑销量数据
  • 爬虫技术不仅仅支持数据采集
  • 抓取脉脉APP上的职业信息
  • 爬虫中多线程的运用
  • 四则运算以及一元二次方程
  • 欢迎来共享你的NB代码

    • 本版新帖

  • 送段代码给大家
  • 禁用浏览器后退按钮
  • 各位？在ASP中什么样编写上传图形的程序？
  • 一些网页代码奉献
  • 服务器完全安装手册［绝对经典］
  • 小问题，只要2分钟就可。请教数据库排序的三种方式哪种好。
  • [原创]如何在自己的电脑上建立Web服务器。
  • 总结对于主页调用TOP10的一些经验.
  • 用ADODB.Stream做上传下载
  • [转载]ASP技巧28则(权威版)
  • [转载]数据库查询语言
  • 和大家一起研究探讨一个问题！！ 
  • 请问Replace函数怎么用啊？各位高手，可否举例说明？
  • 圪圪请进，有事请教～希望您能帮忙
  • 给大家收集了一些很实用的参考手册下载！（新）