CODEWITHSUNDEEP
vb.net
C PWL
C PWL

Reputation: 519

How to set "always open by this program"

i want my program to ask user "Do u want to set .mp3 file type always default open by this program?" (for first time only) any example to do this?

Upvotes: 1

Views: 2264

Answers (3)

user7867845
user7867845

Reputation:

An error shows up again after importing and declaring it like

Dim rgText As Registry.ClassesRoot.OpenSubKey(".txt")

and the error looks like this:

Type 'Registry.ClassesRoot.OpenSubKey' is not defined.

Upvotes: 0

xfx
xfx

Reputation: 1358

First, you will need to familiarize yourself with the Windows Registry.

Associations between programs and extensions are handled inside the HKEY_CLASSES_ROOT key. Each extension appears as a sub-key.

As each key's default value you will find the associated key that handles most of the operations, currently supported, for that particular file type.

For example, you might find the .mp3's default value is set to "WMP11.AssocFile.MP3" or perhaps it set to "VLC.mp3", if you have installed VLC and configured it as the default MP3 player. So, now you need to locate that key, again, inside HKEY_CLASSES_ROOT.

Although this may vary, you should find that "VLC.mp3" (or whatever key was associated with the .mp3 extension) has a sub-key called "shell". Under "shell" you will find another sub-key called "Open". And, finally, under "Open" you will another sub-key called "Command".

The "Command" key is the one containing the information used by Windows (and other programs) to open/start whatever application is currently associated with the ".mp3" (or any other) extension.

Once you understand and feel comfortable with the way associations are handled in the Registry, you should then use .NET's Microsoft.Win32's Registry class to navigate and query the required keys and their values.

Here's a very basic illustration of how the code would look like:

Dim mp3 = Registry.ClassesRoot.OpenSubKey(".mp3")
Dim associatedValue = mp3.GetValue("")
Dim associatedKey = Registry.ClassesRoot.OpenSubKey(associatedValue)
Dim defaultProgram = associatedKey.OpenSubKey("Shell\Open\Command").GetValue("")

MsgBox("MP3 Files Are Opened Using: " + vbCrLf + defaultProgram)

Hope this helps...

Upvotes: 4

That Brazilian Guy
That Brazilian Guy

Reputation: 3521

You need to set file associations. See this article on Code Project on setting File Associations in VB.NET.

Upvotes: 1

Related Questions