13518219792
需要连接数据库，你可以用access做个小型数据库
创新互联公司-专业网站定制、快速模板网站建设、高性价比灌云网站开发、企业建站全套包干低至880元,成熟完善的模板库,直接使用。一站式灌云网站制作公司更省心,省钱,快速模板网站建设找我们，业务覆盖灌云地区。费用合理售后完善，十载实体公司更值得信赖。
每次系统登录的时候，根据用户名去数据库查询密码
/// summary
/// 是否存在该记录
/// /summary
public bool Exists(string user_id)
{
StringBuilder Sql = new StringBuilder();
Sql.Append("select count(1) from USER_INFO");
Sql.Append(" where USER_ID=:user_id");
OracleParameter[] parameters = {
new OracleParameter(":user_id", OracleType.VarChar,20)
};
parameters[0].Value = user_id;
object obj = cn.Runsa.Data.OracleHelper.ExecuteScalar(ConfigurationManager.ConnectionStrings["oraclethree"].ToString(), CommandType.Text, Sql.ToString(), parameters);
if (obj == null || obj.ToString() == "0")
{
return false;
}
else
{
return true;
}
1：Access，建立数据库，数据库命名为Database1.mdb。
（注意：这里的后缀是MDB,如果Access是2007版本的，保存的时候要另存为2003版本的才行，因为，VB不直接支持07版的accdb后缀格式！）
2：数据库建立后就进入了数据表界面，可以输入数据了，输完以后CRRL+S保存，输入表名，这里表名为test，ok，准备工作搞定。
菜单中找到工程→部件→勾选 ，
Microsoft ADO Data Control 6.0
Microsoft Hierarchical Flexgrid Control 6.0
勾选后左侧工具栏里就多了两个控件即 ADODC控件和MSHFlexGrid控件。
选择 ADODC控件和MSHFlexGrid控件，放在窗体的合适位置
设置ADODC控件的属性：
右键窗体内ADODC1控件
1：ADODC属性页→通用→选择使用连接字符串→点击生成→选择Microsoft Jet 4.0 OLE DB Provider 点击下一步→选择之前准备好的数据库→点击测试连接，显示测试成功则ok，确定。
2：ADODC属性页→记录源→命令类型选择2-adcmdtable，表或存储过程名称选择之前建立的数据表test，点击确定，ADODC属性设置完成。
设置MSHFlexGrid控件的属性：
VB右侧属性表里，找到datasource，选择adodc1
就完事了
做不到，access数据库是本地数据库，不支持网络访问，建议你换成sql server或者mysql之类的数据库。
注：如果一定要远程访问access也不是不行，有两种办法，一个是服务器如果跟你在同一个局域网，可以把数据库文件夹共享出来，当做共享文件访问。另一种是在那台服务器上装个sql server数据库，sql server可以创建出链接数据库链接到那个access.
有这样的?我没见过,孤陋寡闻了.试试"控制面板-用户帐户-选择登陆和注销选项",把"使用欢迎屏幕"的"勾"去掉...
你每次取出的是表中的首条记录，当然只能用首条记录登陆了！
Dim name, password As String
name = TextBox1.Text
Dim com As New OleDb.OleDbCommand("select * from denglu where name='" name "'", conn)
Dim dr As OleDb.OleDbDataReader
conn.Open()
dr = com.ExecuteReader
dr.Read()
password = dr.GetString(1)
If TextBox3.Text = password Then
mesbox("成功!")
Else
msgbox("失败")
End If
dr.Close()
conn.Close()
这种情况下，效率极不好！你能理解什么意思就行了！否则将你的程序改完了！
