Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
AddJsFile("../js/jquery-1.3.2.js")
AddJsFile("../js/jquery.simplemodal.1.4.1.min.js")
AddJsFile("../js/netassign/netassign_login.js")
If Not Page.IsPostBack Then
aLogin.Attributes.Add("onclick", "showLoginWin();")
BindData()
BindComData()
End If
End Sub
Protected Sub AddJsFile(ByVal filepath As String)
Dim ctrl As HtmlGenericControl = New HtmlGenericControl("script")
ctrl.Attributes.Add("type", "text/javascript")
ctrl.Attributes.Add("src", filepath)
Me.Page.Header.Controls.Add(ctrl)
End Sub