Buton İle Kısayol Program Actırmak

(09/05/2022, 20:17)zorosx5 yazdı:

(09/05/2022, 18:51)userx yazdı: Dener misiniz?

Call Shell("C:\Users\mehmet\AppData\Local\Yandex\YandexBrowser\Application\browser.exe --profile-directory=""Profile 1""")

hocam yandex açılıyor kod hata vermedi ama profil oturumu acılmadı boş açılıyor oturumsuz

hocam sizi de yordum şimdi oldu çözüldü . elinize sağlık hocam hata buton numaralarından kaynaklı olmuş silip bir daha baştan denedim şuan calışıyor allah razı olsun kolay gelsin.

Private Sub Komut0_Click()
Sub TestNetworkPaths4()
strFolderPath = "C:\Users\mehmet\AppData\Local\Yandex\YandexBrowser\User Data\Profile 1"
Shell "C:\Users\mehmet\AppData\Local\Yandex\YandexBrowser\Application\browser.exe """ &--profile-directory="Profile 1 & """, vbNormalFocus
End Sub

Private Sub Komut0_Click()
Call Shell("C:\Users\mehmet\AppData\Local\Yandex\YandexBrowser\Application\browser.exe --profile-directory=""Profile 1""")
End Sub

tek butona 2 olay yüklemişim
bu şekil oldugu için oturumlar açılmıyordu diğerini silince sorun çözüldü.

Yandexi profille açmanızın sebebi nedir? Bir bilgisayarda neden 50 tane ayrı profil hesabı olur birincisi network mantığı olarak yanlış, ikincisi güvenlik açığı yönünden yanlış. Siz bir forma 50 farklı buton ekleyip her bir profili ayrı ayrı çalıştırmak istiyorsunuz ancak her kulllanıcı bir başkasının profili üzerinden giriş yapabilir riskini gözardı ediyorsunuz. Sizin yapmanız gereken tek bir buton ile yandexi çağırmak, o sırada kullanıcı kim ise onun profili üzerinden default açılacaktır zaten. Mantığını anlamadığım iş için de çok kafa patlatmaktan hoşlanmam açıkçası.

(10/05/2022, 04:26)zorosx5 yazdı:

(09/05/2022, 20:17)zorosx5 yazdı:

(09/05/2022, 18:51)userx yazdı: Dener misiniz?

Call Shell("C:\Users\mehmet\AppData\Local\Yandex\YandexBrowser\Application\browser.exe --profile-directory=""Profile 1""")

hocam yandex açılıyor kod hata vermedi ama profil oturumu acılmadı boş açılıyor oturumsuz

hocam sizi de yordum şimdi oldu çözüldü . elinize sağlık hocam hata buton numaralarından kaynaklı olmuş silip bir daha baştan denedim şuan calışıyor allah razı olsun kolay gelsin.

Private Sub Komut0_Click()
Sub TestNetworkPaths4()
strFolderPath = "C:\Users\mehmet\AppData\Local\Yandex\YandexBrowser\User Data\Profile 1"
Shell "C:\Users\mehmet\AppData\Local\Yandex\YandexBrowser\Application\browser.exe """ &--profile-directory="Profile 1 & """, vbNormalFocus
End Sub

Private Sub Komut0_Click()
Call Shell("C:\Users\mehmet\AppData\Local\Yandex\YandexBrowser\Application\browser.exe --profile-directory=""Profile 1""")
End Sub

tek butona 2 olay yüklemişim
bu şekil oldugu için oturumlar açılmıyordu diğerini silince sorun çözüldü.

Kolay gelsin.