📄 xtglyrk_left.aspx.vb
字号:
Imports System
Imports System.Object
Imports System.Data
Imports System.Data.SqlClient
Namespace wsbgxt
Partial Class xtglyrk_left
Inherits System.Web.UI.Page
#Region " Web 窗体设计器生成的代码 "
'该调用是 Web 窗体设计器所必需的。
<System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
End Sub
Private Sub Page_Init(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Init
'CODEGEN: 此方法调用是 Web 窗体设计器所必需的
'不要使用代码编辑器修改它。
InitializeComponent()
End Sub
#End Region
Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
If Session("dqxbh") Is Nothing Then
Response.Redirect("../NotLogin.aspx?FromPageName=fbxt/xtglyrk_left")
ElseIf CInt(Session("dqxbh")) < 10 Then
Response.Redirect("../NotLogin.aspx?FromPageName=fbxt/xtglyrk_left")
Return
End If
End Sub
End Class
End Namespace
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -