AccessTr.neT
Buton İle Kısayol Program Actırmak - Baskı Önizleme

+- AccessTr.neT (https://accesstr.net)
+-- Forum: Microsoft Access (https://accesstr.net/forum-microsoft-access.html)
+--- Forum: Access Cevaplanmış Soruları (https://accesstr.net/forum-access-cevaplanmis-sorulari.html)
+--- Konu Başlığı: Buton İle Kısayol Program Actırmak (/konu-buton-ile-kisayol-program-actirmak.html)

Sayfalar: 1 2 3

RE: Buton İle Kısayol Program Actırmak - zorosx5 - 10/05/2022

(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ü.

RE: Buton İle Kısayol Program Actırmak - atoykan - 10/05/2022

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ı.

RE: Buton İle Kısayol Program Actırmak - userx - 10/05/2022

(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.