Javascript Ext.Ajax.request未正确传递参数

我试图将param传递给服务器以删除请求，但它不起作用。 这是我的Ext.Ajax.request，使用URL:deluserHistorygrid.asp

功能（btn）{ 如果（btn=‘是’）{

在我的deluserHistoryGrid.asp中

我的变量设置如下：

       Dim vntPostedData, lngCount
       Dim record, strSQL
       Dim varFlxId

       varFlxId =  Request("id")

       lngCount = Request.TotalBytes
       vntPostedData = SimpleBinaryToString(Request.BinaryRead(lngCount))
       'Response.BinaryWrite vntPostedData

       'Set record = JSON.parse(vntPostedData)  

       sSQL = "DELETE FROM VacationCalendar WHERE RecordID = " & varFlxId
       Response.write sSQL & "</br>"

       Set oRS = dbConn.Execute( sSQL ) 

       Function SimpleBinaryToString(Binary)
       'SimpleBinaryToString converts binary data (VT_UI1 | VT_ARRAY Or MultiByte string)
      'to a string (BSTR) using MultiByte VBS functions
      Dim I, S

      For I = 1 To LenB(Binary)
      S = S & Chr(AscB(MidB(Binary, I, 1)))
      Next

      SimpleBinaryToString = S
      End Function

Dim vntPostedData，lngCount
Dim记录
Dim varFlxId
varFlxId=请求（“id”）
lngCount=Request.TotalBytes
vntPostedData=SimpleBinaryToString（Request.BinaryRead（lngCount））
'Response.BinaryWrite vntPostedData
'Set record=JSON.parse（vntPostedData）
sSQL=“从休假日历中删除，其中RecordID=“&varFlxId
Response.write sSQL&“
”
设置oRS=dbConn.Execute（sSQL）
函数SimpleBinaryToString（二进制）
'SimpleBinaryToString转换二进制数据（VT_UI1 | VT_数组或多字节字符串）
'到使用多字节VBS函数的字符串（BSTR）
暗I，S
对于I=1到LenB（二进制）
S=S&Chr（AscB（MidB（二进制，I，1）））
下一个
SimpleBinaryToString=S
端函数

我试图传递参数Ext.Ajax.Request（{params:{id:id}}）来删除requestID，但它不起作用，请帮助我。我是新手

---

谢谢！

您是否试图通过发送请求来删除网格中的记录？如果是这种情况，通常不会这样做

如果使用代理和写入程序配置网格存储，就足够了。如果然后从本地存储中删除记录，然后调用

store.sync（）

，Ext会将请求发送到服务器，因此您只需要实现服务器端逻辑

---

如果您想看到一个实现了所有CRUD操作的网格，请转到。

我试图删除网格表上的记录，但不知何故，它不是通过Ext.ajax.request（{}）从我的数据库中删除的。它只是从浏览器中删除的。我厌倦了重写一些方法，通过ADODB查询在单独的文件中传递参数{id:'id'}（deluserHistoryGrid.asp）通过上面的查询语句删除。它仍然没有传递参数。如何根据我上面的问题编写代码来正确传递参数。删除过程分为两步：1.从本地存储中删除，2.调用

store.sync（）

-第二步发送请求；您只需在服务器上处理请求并从服务器数据库中删除记录。

       Dim vntPostedData, lngCount
       Dim record, strSQL
       Dim varFlxId

       varFlxId =  Request("id")

       lngCount = Request.TotalBytes
       vntPostedData = SimpleBinaryToString(Request.BinaryRead(lngCount))
       'Response.BinaryWrite vntPostedData

       'Set record = JSON.parse(vntPostedData)  

       sSQL = "DELETE FROM VacationCalendar WHERE RecordID = " & varFlxId
       Response.write sSQL & "</br>"

       Set oRS = dbConn.Execute( sSQL ) 

       Function SimpleBinaryToString(Binary)
       'SimpleBinaryToString converts binary data (VT_UI1 | VT_ARRAY Or MultiByte string)
      'to a string (BSTR) using MultiByte VBS functions
      Dim I, S

      For I = 1 To LenB(Binary)
      S = S & Chr(AscB(MidB(Binary, I, 1)))
      Next

      SimpleBinaryToString = S
      End Function