| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
共有 681 人关注过本帖
标题:麻烦看看什么原因?谢谢!!!
取消只看楼主 加入收藏
fengmnll118
Rank: 1
等 级:新手上路
帖 子:10
专家分:0
注 册:2008-3-10
收藏
 问题点数:0 回复次数:2 
麻烦看看什么原因?谢谢!!!
<!--#include file="conn.asp"-->
<%  Diary_Title=request.Form("Diary_Title")
    Diary_Content=request.Form("Diary_Content")
    Diary_List_Title=request.Form("Diary_List_Title")
    Diary_List_Id=request.Form("Diary_List_Id")
    set rsn=server.CreateObject("ADODB.Recordset")
    sqn="select * from Diary_List where Diary_List_Id="&request("Diary_List_Id")
    rsn.open sqn,conn,1,1
    Diary_List_Title=rsn("Diary_List_Title")
    sql="insert into Diary(Diary_Title,Diary_Content,Diary_List_Title,Diary_List_Id,People_Id) values('"&Diary_Title&"','"&Diary_Content&"','"&Diary_List_Title&"','"&Diary_List_Id&"','"&session("People_Id")&"')"
   response.Write sql
   conn.execute(sql)
   response.write "<script language=JavaScript>" & chr(13) & "alert('添加日志文章成功.!');"&"window.location.href = 'liuyan.asp'"&"</script>"
   'sqll="insert into system_diary(people_name) values('"&people_name&"')
%>   
Microsoft JET Database Engine (0x80040E14)
语法错误 (操作符丢失) 在查询表达式 'Diary_List_Id=' 中。
2008-03-12 20:08
fengmnll118
Rank: 1
等 级:新手上路
帖 子:10
专家分:0
注 册:2008-3-10
收藏
得分:0 
回复 2# 的帖子
就是按你的方法做了之后,没有错误提示也没有值输出应该怎么改呢?谢谢
2008-03-17 09:41
fengmnll118
Rank: 1
等 级:新手上路
帖 子:10
专家分:0
注 册:2008-3-10
收藏
得分:0 
回复 5# 的帖子
<form name="form1" method="post" action="add_user_article.asp">
          <table width="100%"  border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td height="40">文章的标题:
                <input name="Diary_Title" type="text" id="Diary_Title" size="25" maxlength="25"></td>
            </tr>
            <tr>
              <td height="40"><div align="center">
                  <textarea name="Diary_Conten" cols="74" rows="20" id="Diary_Content"></textarea>
                    
              </div></td>
            </tr>
            <tr>
              <td height="40">选择添加目录:
                <select name="Diary_List_Title" id="Diary_List_Title">
                    <% set rsn=server.CreateObject("ADODB.Recordset")
                     sqn="select * from Diary_List"
                     rsn.open sqn,conn,1,1
                     do while not rsn.eof
                        response.Write "<option value="&rsn("Diary_List_Id")
                     response.Write ">"&rsn("Diary_List_Title")&"</option>"
                     rsn.movenext
                     loop
                 %>
                </select></td>
            </tr>
            <tr>
              <td height="40"><div align="center">
                  <input type="submit" name="Submit" value="添加">
              </div></td>
            </tr>
          </table>
      </form></td>
麻烦看一下我找不出什么地方错了呢?谢谢!!
2008-03-18 22:07
快速回复:麻烦看看什么原因?谢谢!!!
数据加载中...
 
   



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

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.019741 second(s), 10 queries.
Copyright©2004-2025, BC-CN.NET, All Rights Reserved