info from file

hello,
I have this in Accounts.txt
name@mail.com;temp123

and this in my VB6
WebBrowser.Document.Forms("MailForm").All("email").Value = App.Path & "\Accounts.ini"
WebBrowser.Document.Forms("MailForm").All("password").Value = App.Path & "\Accounts.ini"

but how do I make it so it reads email and password?
apleloisAsked:
Who is Participating?
 
EDDYKTCommented:
Dim ff As Integer, Filename As String, s As String
   
Filename = "yourfullpathfilename.txt"
ff = FreeFile
Open Filename For Binary Access Read Lock Read Write As #ff
s = Space$(LOF(ff))
Get #ff, , s
Close ff

username = split(s, ";")(0)
password = split(s, ";")(1)
0
 
apleloisAuthor Commented:
because is not the same question is it?
0
Cloud Class® Course: MCSA MCSE Windows Server 2012

This course teaches how to install and configure Windows Server 2012 R2.  It is the first step on your path to becoming a Microsoft Certified Solutions Expert (MCSE).

 
apleloisAuthor Commented:
readin from a .ini file that contains

[UserNames]
Text_Email=name@mail.com
Text_Password=temp123

and here reading from a .txt file that contains
name@mail.com;temp123
0
 
apleloisAuthor Commented:
instead of investigating my questions why dont you try helping me better?
0
 
apleloisAuthor Commented:
no, is not working!!
0
 
EDDYKTCommented:
it works for me what doesn't work?

debug.print split(s, ";")(0)
debug.print split(s, ";")(1)
0
Question has a verified solution.

Are you are experiencing a similar issue? Get a personalized answer when you ask a related question.

Have a better answer? Share it in a comment.

All Courses

From novice to tech pro — start learning today.