请问如何在VB程序中将登陆用户记录到SQLvb连接oracle数据库库?

vs2010做网站,vb.net 网站后台登陆程序如何读取数据库sql server 2005?_百度知道&&问题详情
VB中如何把从sql数据库中查询出来的数据显示到控件中
VB中如何把从sql数据库中查询出来的数据显示到控件中
您的回答过短,请将答案描述得更清楚一些
需要你把控件和ADODC绑定
手机动态登录
请输入用户名/邮箱/手机号码!
请输入密码!
Copyright &
Shang Hai Jing Rong Xin Xi Ke Ji You Xian Gong Si
上海旌荣信息科技有限公司 版权所有
客服电话: 400-850-8888 违法和不良信息举报电话: 010- 举报邮箱:Imports&System&&&&&&&&&&&&&&&&&&&&&&&&&&&‘&引入数据库操作类命名空间Imports&System.DataImports&System.Data.SqlClientPublic&Class&登录Dim&i&As&Integer&&&&&&&&&&&&&&&&&&&&&&&&&&‘&声明计数器i,用来记录登录次数‘&取消按钮事件,当单击取消按钮,清除输入信息Private&Sub&Button2_Click(ByVal&sender&As&System.Object,&ByVal&e&As&System.EventArgs)&Handles&Button2.ClickTextBox1.Text&=&““TextBox2.Text&=&““TextBox1.Focus()End&Sub‘&计时器事件,控制登录时间,使用标签来模拟计时器显示Private&Sub&Timer1_Tick(ByVal&sender&As&System.Object,&ByVal&e&As&System.EventArgs)&Handles&Timer1.TickLabel5.Text&=&Val(Label5.Text)&-&1If&Val(Label5.Text)&=&0&Then&&&&&&&&&&&&&&&&‘&当标签显示文本为0时&&&&&&&Timer1.Enabled&=&False&&&&&&&&&&&&&&&&&‘&计时器不再使用&&&MessageBox.Show(“登录时间到,退出该系统!“,&“系统提示“,&MessageBoxButtons.OK,&MessageBoxIcon.Hand)&&&Me.Close()End&IfEnd&Sub‘&登录按钮事件,控制登录Private&Sub&Button1_Click(ByVal&sender&As&System.Object,&ByVal&e&As&System.EventArgs)&Handles&Button1.ClickDim&f&As&New&主窗体Dim&strsql&As&StringDim&strconn&As&StringDim&objcommand&As&SqlClient.SqlCommand&&&&&&&&&‘&声明一个SqlCommand变量Dim&objdr&As&SqlClient.SqlDataReader&&&&&&&&&&&&&&‘&声明一个SqlDataReader变量Dim&str1,&str2&As&Stringi&=&i&–&1&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&‘&每次单击登录,计数器减1If&i&=&0&Then&&&&&&&&&&&&&&&&&&&&&‘&如果登录失败次数超过3次&&&MessageBox.Show(“您已经没有登录机会了,再见!“,&“系统提示“,&MessageBoxButtons.OK,&MessageBoxIcon.Hand)&&&Me.Close()Else&&&&&&&&&&&&&&&&&&&&&&&&&&&‘&如果失败小于3次,则与数据库连接&&&strconn&=&“data&source=initial&catalog=学生成绩管理系统;user&id=password=123456;“&&&strsql&=&“select&用户名,密码&from&用户表“&&&objcommand&=&New&SqlClient.SqlCommand(strsql,&New&SqlClient.SqlConnection(strconn))&&&objcommand.Connection.Open()&&&objdr&=&objcommand.ExecuteReader(CommandBehavior.CloseConnection)&&&With&objdr&&&&&&Do&While&.Read&=&True&&&&&&&&&str1&=&.GetString(0)&&&&&&&&&str2&=&.GetString(1)
附近的朋友等待您的帮助
包打听移动版用vb.net开发一个程序,因为数据每天都改新变化,最后需进行月、年汇总,而且量较大,所以想实现每天从excel中导入非空的数据,请帮助指点一下,如果实现?谢谢!
回复讨论(解决方案)
方法很多。看你的链接方法了。.Net操作Excel和SQl的方法网上一搜一堆
想进行差异备份恢复的话,要预先设立快照进行对比,发现差异之后就开始恢复,而不要一次性全部都恢复
读本地数据还是很容易的啊!
/dukejoe/archive//764425.aspx
/dukejoe/archive//764425.aspx
using&System.Data.OleDb;
给你个方法
&&&&private&string&sqlXlsShip&=&&select&*&from&[{0}$AV3:AZ]&;//?定??在Excel?的范?,?AV3:AZ,不指定AP行号
public&DataTable&TransferDs(string&excelFile,&string&sheetName,&string&connectionString,&string&sqlExl)
&&&&&&&&string&strConn&=&&Provider=Microsoft.Jet.OLEDB.4.0;&&+&&Data&Source=&&+&excelFile&+&&;&&+&&Extended&Properties=Excel&8.0;&;
&&&&&&&&OleDbConnection&conn&=&new&OleDbConnection(strConn);
&&&&&&&&DataSet&ds&=&new&DataSet();
&&&&&&&&try
&&&&&&&&&&&&//获取全部数据&&
&&&&&&&&&&&&conn.Open();
&&&&&&&&&&&&string&strExcel&=&&&;
&&&&&&&&&&&&OleDbDataAdapter&myCommand&=&
&&&&&&&&&&&&strExcel&=&string.Format(sqlExl,&sheetName);
&&&&&&&&&&&&myCommand&=&new&OleDbDataAdapter(strExcel,&strConn);
&&&&&&&&&&&&myCommand.Fill(ds,&sheetName);
&&&&&&&&catch&(Exception&e)
&&&&&&&&&&&&throw&e;
&&&&&&&&finally
&&&&&&&&&&&&conn.Close();
&&&&&&&&return&ds.Tables[0];}

我要回帖

更多关于 vb连接oracle数据库 的文章

更多推荐

版权声明:文章内容来源于网络,版权归原作者所有,如有侵权请点击这里与我们联系,我们将及时删除。

点击添加站长微信