[VB.NET] Entering Mozilla Firefox's Profiles Folder? [XP]

[Ryoushi.]

I'm having difficulty leading my VB.NET program to the Profiles folder in Firefox.

For me, this is at...

C:\Documents and Settings\username\Application Data\Mozilla\Firefox\Profiles\e4lp4t1f.default\

... So my question is, how can I change the "username" folder to currentuser, and how can I enter the "e4lp4t1f.default" folder without knowing the folders name? It's different to everyone. I suppose I could get the directory name and use that, but I'd rather just skip it.


I can provide any required information or part(s) of my code.
Thankyou.

[ReidE96]

HKEY_LOCAL_MACHINE\Software\Microsoft\Windows NT\CurrentVersion\WinLogon\DefaultUserName

You can read the currently logged on user's username from that registry entry. In the

C:\Documents and Settings\username\Application Data\Mozilla\Firefox

folder, you'll find the Profiles.ini file. Read it into your programs memory. They always start more or less like this:

[General]

StartWithLastProfile=1

[Profile0]
Name=default
IsRelative=1
Path=Profiles/qioxtndq.default

Just read by line until you get the "Name=default" line, read the next line, if it says "IsRelative=1" then read the next line and strip the leftmost 5 characters, and add it to the end of the Firefox folder, if it says "IsRelative=0" (less likely), just read the next line, strip the leftmost 5, and you have the default profile folder.

[Apoc]

Private Function GetFirefoxUserDir() As String
    Dim appDataDir As String = Environment.GetFolderPath(Environment.SpecialFolder.ApplicationData) & "\Mozilla\Firefox\Profiles\"
    Dim firstClientDir As String = Directory.GetDirectories(appDataDir)(0)
    Return firstClientDir
End Function

Enjoy. L2.NET Reid