某个客户端提交不执行后台代码
用VS2003写的asp.net网站,前台有三个地方会调用后台代码,现碰到一台客户端在点击后,后台服务器不执行代码,类似没有提交到后台,全公司也就这一台客户端有此问题,客户端IE为6.0,初步怀疑客户端问题,但是这个怎么查啊,烦请大侠们帮忙,具体前后台代码如下:
前台调用的地方:1、<asp:ButtonColumn HeaderText="考核状态" CommandName="confirm" HeaderStyle-Font-Names="helvetica,arial,sans serif" HeaderStyle-Font-Size="8pt" HeaderStyle-ForeColor="Blue"></asp:ButtonColumn>
2、<asp:checkbox id="ckAll" runat="server" AutoPostBack="True" Text="全选"></asp:checkbox>
3、<asp:imagebutton id="bt_confirm" runat="server" imageUrl="../Images/btn_batchconfirm.gif"> </asp:imagebutton>
后台对应代码1、
Private Sub DataGrid1_ItemCommand(ByVal source As Object, ByVal e As System.Web.UI.WebControls.DataGridCommandEventArgs) Handles DataGrid1.ItemCommand
Dim tmpSQL As String
Dim tmpComm As New CommonDB
Dim tempDataset As DataSet
If e.CommandName = "confirm" Then
Dim tmpResult As Integer
tmpSQL = "update exa_usertotal set STATUS='10',OP_NO='" & Session("UserID") & "',AppDate='" & Get_Date_YYYYMMDD(Now) & "',AppTime='" & Get_Date_HHMMSS(Now) & "' where StaffID ='" & DataGrid1.DataKeys(CInt(e.Item.ItemIndex)) & "' AND aplterm='" & Session("aplterm") & "'"
tmpResult = tmpComm.ExecuteCmd_noCheck(tmpSQL)
If tmpResult = 1 Then
InsertExaData_to_HR_DB(DataGrid1.DataKeys(CInt(e.Item.ItemIndex)), Session("aplterm"))
Response.Write("<Script language='JavaScript'>window.location.href=window.location.href;</script>")
GenLog(Session("UserID"), "M000004", "为【" & DataGrid1.DataKeys(CInt(e.Item.ItemIndex)) & "】[" & Session("aplterm") & "]确认考核!", Page.Request.UserHostAddress)
End If
End If
End Sub
2、
Private Sub ckAll_CheckedChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ckAll.CheckedChanged
Dim i As Integer
Dim grdItem As DataGridItem
Dim chkboxRow As System.Web.UI.WebControls.CheckBox
Dim intSelectCount As Integer
Dim intSelectIndex
intSelectCount = 0
For Each grdItem In Me.DataGrid1.Items
chkboxRow = grdItem.FindControl("chkRow")
chkboxRow.Checked = Me.ckAll.Checked
Next
End Sub
3、
Private Sub bt_confirm_Click(ByVal sender As System.Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles bt_confirm.Click
Dim i, Result As Integer
Dim grdItem As DataGridItem
Dim chkboxRow As System.Web.UI.WebControls.CheckBox
Dim intSelectCount As Integer
Dim tmpComm As New CommonFunction
Dim tmpCommDB As New CommonDB
Dim tmpSql As String
Dim SQLArr(10000) As String
Dim ArrNum As Integer = 0
Dim intSelectIndex
intSelectCount = 0
For Each grdItem In Me.DataGrid1.Items
chkboxRow = grdItem.FindControl("chkRow")
If chkboxRow.