Description: Private Sub cmdOK_Click()
Dim txtSQL As String
Dim ID As String
Dim rstLogin As New ADODB.Recordset
Dim flag As String
Dim conn As New ADODB.Connection
Dim miCount As Integer
gUserName = ""
gUserKind = ""
ID = Trim(txtUserName.Text)
To Search:
File list (Check if you may need any files):
王寅-论文初稿正文（修改后）.doc
Download