|
Zaregistrování přípony (při prvním spuštění nebo ještě lépe při instalaci programu), příklad je pro příponu *.hello:
My.Computer.Registry.ClassesRoot.CreateSubKey(".Hello").SetValue("", "Hello", Microsoft.Win32.RegistryValueKind.String)
My.Computer.Registry.ClassesRoot.CreateSubKey("Hello\shell\open\command").SetValue("", Application.ExecutablePath & _
" ""%l"" ", Microsoft.Win32.RegistryValueKind.String)
Cestu k souboru, který pak máte otevřít, najdete v proměnné soubor, pokud se splní podmínka:
If My.Application.CommandlineArgs.Count > 0 Then
Dim soubor As String = My.Application.CommandlineArgs(0)
End If
|