找回密码
 注册
搜索
热搜: 回贴
  • 前程无忧官网首页 有什么好的平台可以
  • 最新的销售平台 互联网营销的平台有哪
  • 制作网页的基本流程 网页制作和网页设
  • 【帝国CMS】输出带序号的列表(数字排
  • 网站建设公司 三一,中联,极东泵车的
  • 织梦 建站 织梦网站模版后台怎么更改
  • 云服务官网 哪些网站有免费的简历模板
  • 如何建网站要什么条件 建网站要用什么
  • 吉林市移动公司电话 吉林省退休人员网
  • 设计类毕业论文 网站设计与实现毕业论
查看: 540|回复: 9

[求助] 怎么连接后台

[复制链接]
发表于 2009-10-29 01:15:28 | 显示全部楼层 |阅读模式 IP:江苏扬州
我想要输入用户名,密码,权限 然后点确定 进入另外一个窗口..
怎么办?怎么办?
怎么办?怎么办?怎么办?怎么办?怎么办?怎么办?怎么办?怎么办?
急啊.. 附件: 只有本站会员才能下载或查看附件,请您 登录 或 注册
发表于 2009-10-29 01:15:29 | 显示全部楼层 IP:江苏扬州
如认证信息正确就关闭该窗口,就显示另一个窗口
回复

使用道具 举报

发表于 2009-10-29 01:15:30 | 显示全部楼层 IP:江苏扬州
你要先建立数据库 不知你的数据库是accsess 还是 sql server 还是。。。。
然后你要去判断用户的合法性 如果正确就进入另一个界面 如果不正确你要提示一下
建议你看一下书 尤其是与数据库的连接
回复

使用道具 举报

发表于 2009-10-29 01:15:30 | 显示全部楼层 IP:江苏扬州
C# 和 VB 有很多地方是相似的,呵呵.所以我觉得是应该可以看懂的.
回复

使用道具 举报

发表于 2009-10-29 01:15:31 | 显示全部楼层 IP:江苏扬州
前面也有人问过这样的问题,你找找看.应该可以找到你所需要的东西.
回复

使用道具 举报

发表于 2009-10-29 01:15:32 | 显示全部楼层 IP:江苏扬州
数据库建好了.是SQL SERVER
我不会写代码,不知道怎么连接起来..
回复

使用道具 举报

发表于 2009-10-29 01:15:33 | 显示全部楼层 IP:江苏扬州
非常感谢你们的帮助,太谢谢了,
回复

使用道具 举报

发表于 2009-10-29 01:15:34 | 显示全部楼层 IP:江苏扬州
登陆按钮:
  1. Private Sub btn_Submit_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btn_Submit.Click
  2. Dim mycon As New ConnClass()
  3. Dim userName As String
  4. Dim pass As String
  5. userName = Me.txt_UserName.Text.Trim().Replace("'", "_")
  6. pass = Me.txt_PassWord.Text.Trim().Replace("'", "_")
  7. Dim SqlStr = "select id from tbUser where uid='" & userName & "' and pwd='" & pass & "'"
  8. Dim ds As New DataSet
  9. ds = mycon.myDataSet(SqlStr)
  10. If ds.Tables.Item(0).Rows.Count > 0 Then
  11. Dim nMain As New MainRun()
  12. nMain.Main(userName)
  13. Me.Hide()
  14. nMain.ShowDialog()
  15. Else
  16. MessageBox.Show("Login Failure ")
  17. Me.txt_UserName.Text = ""
  18. Me.txt_PassWord.Text = ""
  19. Me.txt_UserName.Focus()
  20. End If
  21. End Sub
复制代码


ConnClass 类:
  1. Public Class ConnClass
  2. Public Function myDataSet(ByVal SqlStr As String) As DataSet
  3. Dim myconn As New System.Data.SqlClient.SqlConnection("server=.;database=test;uid=sa;pwd=;")
  4. Dim da As New System.Data.SqlClient.SqlDataAdapter(SqlStr, myconn)
  5. Dim ds As New DataSet
  6. da.Fill(ds)
  7. Return ds
  8. End Function
  9. End Class
复制代码
回复

使用道具 举报

发表于 2009-10-29 01:15:35 | 显示全部楼层 IP:江苏扬州
差点写C#的代码了,不知道楼主是否熟悉C#的
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 注册

本版积分规则

QQ|小黑屋|最新主题|手机版|微赢网络技术论坛 ( 苏ICP备08020429号 )

GMT+8, 2024-9-29 11:29 , Processed in 0.255112 second(s), 13 queries , Gzip On, MemCache On.

Powered by Discuz! X3.5

© 2001-2023 Discuz! Team.

快速回复 返回顶部 返回列表