根据版主提供的资料,我现在已经可以使用buttoncommand事件来代替cellclick事件了。但是遇到一个问题,我要实现的功能中有一个是跳转到另一个画面。大致的代码如下:
Dim col As Integer
Dim row As Integer
row = e.SheetView.ActiveRow
col = e.SheetView.ActiveColumn
If col = 1 Then
Dim request As String
request = FpSpread1.sheets(0).cells(row,1).value
Session("request") = request
Response.Write("......")
Exit Sub
End If
现在遇到的问题是无法跳转页面,我将
Response.WriteResponse.Write("......")
换成
Page.ClientScript.RegisterStartupScript(Me.GetType,"",要跳转的页面)
Page.ClientScript.RegisterStartupScript(Me.GetType,"",关闭当前的页面)
也无效果。另外,我将整个工程发布后,发现buttoncommand事件整个就无效果了,无论是跳转页面还是弹出对话框进行数据添加,都失效了。 |