Readygo技术搜索引擎 网络搜索 efish 2008-1-17 2:00:41

数据库添加问题

楼主followluo（为什么）2004-03-25 13:23:05 在 Web 开发 / ASP 提问

<%   name=Session("name")  
        gif=Session("gif")  
        color=Request("selcolor")  
        speak=Request("selspeak")  
        virtue=Request("selvirtue")  
        memo=Server.HTMLEncode(Request("txtmemo"))  
        //memo=Replace(memo,""",""")  
        Set   Conn=Server.CreateObject("ADODB.Connection")  
        Conn.Open"qly"  
      sqlcmd="Insert   Into   chat(A_Name,A_Gif,A_Color,A_Speak,A_Virtue,A_Memo)"  
      sqlcmd=sqlcmd&"Values(""&name&"",""&gif&"",""&color&"",""&speak&"",""&virtue&"",""&memo&"")"  
      Set   a=Conn.Execute(sqlcmd)    
      SQLcmd="Select   Top   1   *   from   chat   Order   By   A_Time"  
      Set   RS=Conn.Execute(SQLcmd)  
      SQLcmd="Delect   from   chat   where   A_ID="&RS("A_ID")  
      Set   a=Conn.Execute   (SQLcmd)  
      Response.Redirect"look_talk.asp"  
      %>  
           
         
  出错类型:Microsoft   OLE   DB   Provider   for   ODBC   Drivers   (0x80040E14)  
    无效的   SQL语句；期待   "DELETE"、"INSERT"、"PROCEDURE"、"SELECT"、或   "UPDATE"。  
   
   
   
  但却又完成了添加功能 问题点数：0、回复次数：0Top