毕业论文论文范文课程设计实践报告法律论文英语论文教学论文医学论文农学论文艺术论文行政论文管理论文计算机安全
您现在的位置: 毕业论文 >> 论文 >> 正文

.NET+SQL SERVER 2000图书管理系统流程图+功能图+ER+全套设计论文 第12页

更新时间:2007-9-25:  来源:毕业论文

 If myConn.State = ConnectionState.Closed Then

            myConn.Open()

        End If

        Dim sqlstr As String

        If Pwdstr = "" Then

            sqlstr = "select * from manage where manageid='" + Userstr.Trim + "' and Pass is null"

        Else

            sqlstr = "select * from manage where manageid='" + Userstr.Trim + "' and Pass='" + Pwdstr + "'"

        End If

 

        Fill(sqlstr)

        If ds.Tables(0).Rows.Count = 0 Then

            Close()

            Return -1

        End If

        ds.Clear()

        Close()

        Return 1

    End Function

    Public Sub Open()

        myConn.Open()

    End Sub

    Public Sub Close()

        myConn.Close()

    End Sub

    Public Sub Fill(ByVal sqlstr As String)

        myAdapter = New SqlDataAdapter(sqlstr, myConn)

        ds = New DataSet

        myAdapter.Fill(ds)

    End Sub

 

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

        If CheckUserberInfo(TextBox1.Text, TextBox2.Text) = 1 Then

            Session("UserID") = TextBox1.Text.ToString

            Response.Redirect("delete.aspx")

        Else

            Response.Write("<script>javascript:alert('登陆失败!!!');</script>")

            Response.Write("javascript:window.location='user.aspx'")

        End If

    End Sub

End Class

 << 上一页  [11] [12] [13] [14] [15] [16] [17] [18] [19] [20]  ... 下一页  >> 

.NET+SQL SERVER 2000图书管理系统流程图+功能图+ER+全套设计论文 第12页下载如图片无法显示或论文不完整,请联系qq752018766
设为首页 | 联系站长 | 友情链接 | 网站地图 |

copyright©751com.cn 辣文论文网 严禁转载
如果本毕业论文网损害了您的利益或者侵犯了您的权利,请及时联系,我们一定会及时改正。