ASP提示不正付与の解決方法

分析は:aspのいくつかの保留フィールドのせいかもしれませんが、具体的には、この文章を参考にすることができます:ASPのよくある保留字整理
通常コードは大丈夫``IDにも値がありますがライブラリがSQL SERVERライブラリに変更されました长くはありませんので、このエラーはどこが问题なのか教えてください
Microsoft VBScript実行時エラー'800 a 01 f 5'
不正な割り当て:'SqlStr'
/admin/list/savedate.asp,行60
エラー行コードSQLstr="delete d_31 where id="&id&""

 
  
  '       
  
 sub delbuy() 
  
 id=clng(Request.QueryString("id")) 
  
 Set book=server.createobject("adodb.recordset") 
  
         SQLstr="delete d_31 where id="&id&"" 
  
         conn.Execute SQLstr 
  
         set book=nothing 
  
         conn.close 
  
         set conn=nothing 
  
 %> 
  
  
  <br> <!-- 
  <br> msgbox("    !") 
  <br> window.location.href="buySoScan.asp" 
  <br> --> 
  <br>  
  
  end sub 
  
 %> 
  
 
 

解決方法:SQLstrをsqlssqlsに変更
変数名を変えてみて、SQL文を変更します

 
  
 SQLstr="delete d_31 where id="&id&"" 
  
 conn.Execute 
  
 
 

SQLstrを

 
  
 dim sqlssqls = "delete from d_31 where id=" & clng(id) 
  
 conn.Execute(sqls)