Merhaba, @alpeki99 un da belirttiği gibi açıklamanız net değil.

Bahsettiğiniz "x" programın adı nedir bilmiyorum ama, vbs uzantılı dosyanın içeriğine

Dim iURL 

Dim objShell

iURL = "https://accesstr.net"

set objShell = CreateObject("Shell.Application")

objShell.ShellExecute "C:\Users\Public\Desktop\Google Chrome.lnk", iURL, "", "", 1

yazarsanız accesstr.net'i chrome üzerinden,

Dim iURL 

Dim objShell

iURL = "https://accesstr.net"

set objShell = CreateObject("Shell.Application")

objShell.ShellExecute "C:\Users\Public\Desktop\Mozilla Firefox.lnk", iURL, "", "", 1

Yazarsanız Mozilla Firefox üzerinden açar.

Dim iURL 

Dim objShell

iURL = "https://accesstr.net"

set objShell = CreateObject("Shell.Application")

objShell.ShellExecute "chrome.exe", iURL, "", "", 1

yazarsanız, masaüstü kısayolu karıştırmadan chromu ve web sitesini açar.