Question

各位大神！求问关于用vb windows做一个登入系统，输入用户名和密码，但是不用数据库做！！

不能用数据库！只能用txt文件存放用户名和密码。
当输入用户名和密码时，会和txt中的用户名和密码进行匹配，如果一致便可以登入！
我想问一下， 这个功能能实现吗？代码应该怎么写！
非常感谢！！！

Answer 1

调用txt中的内容就好了
dim L as string
Open "c:\a.txt" For Input As #1

Do While Not EOF(1)'循环读
Line Input #1, sline '读一行
L=L & sline & vbcrlf
loop
Close #1

这个L就与TXT一样了，自己分析下，用TXT放密码最好别放在显眼的地，不然与不设一样，你也可以调 用INI文件还方便些！

Answer 2

Public Declare Function GetPrivateProfileString Lib "kernel32" Alias "GetPrivateProfileStringA" (ByVal lpApplicationName As String, ByVal lpKeyName As Any, ByVal lpDefault As String, ByVal lpReturnedString As String, ByVal nSize As Long, ByVal lpFileName As String) As Long

Dim ii As Long
Dim loginid As String * 255 '系统连接ID
Dim loginpass As String * 255 '系统连接密码

ii = GetPrivateProfileString("DATABASE", "logid", " ", loginid, Len(loginid), inifilename)
loginid = Left(loginid, ii)
ii = GetPrivateProfileString("DATABASE", "logpass", " ", loginpass, Len(loginpass), inifilename)
loginpass = frompasswd(Left(loginpass, ii))

Answer 3

可以实现但是很烦
你还使用数据库简单些