代码如下:
Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
'向临时文件中传数据
Dim comm As New OleDbCommand
'定义Member参数和File参数
FpSpread1.Visible = False
parmIntn = "" & Session("name") & ""
...
end sub
----------------------------------------------------------------------------------------
Protected Sub ImageButton1_Click(ByVal sender As Object, ByVal e As System.Web.UI.ImageClickEventArgs) Handles ImageButton1.Click
If RadioButton2.Checked Then
'明细
FpSpread2.Visible = False
FpSpread1.Visible = True
...
end sub |