Skip to main content

AccessTr.neT

Kayıt Ol

 | Facebook ile Bağlan  | Twitter İle Bağlan | Google+ İle Bağlan

Install creator ile Regedit Update

okileturc
okileturc
Access Cevaplanmış Soruları
6
3796

Install creator ile Regedit Update

Çözüldü #1
okileturc
Onursal Üye
okileturc
Bul
Onursal Üye

Additional groups:
Üye
Adı Soyadı: Ok.... Le....
Yaşı: 66
Konum: İzmir
Ofis Versiyonu: Ofis 2003
Son Oturumu: 11/09/2020,15:07
Yorumları: 966
Konuları: 113
Kayıt Tarihi: 18/03/2009
Teşekkür Puanı: 464
Merhaba
Uygulama Setup dosyası için Install Creator kullanıyorum ( eğer sitede
yoksa ekleyebilirim )
Regedit ayarlarında 2 tane ayar yapmam lazım, şu ana kadar hep manüel olarak yaptım.

1. HKEY_LOCAL_MACHINE\Software\Microsoft\Shared Tools\
Graphics Filters\Import\JPEG\Options altında …

ShowProgressDialog değerini “No” yap ( dikkat case sensitive, “N” büyük “o” küçük

2. HKEY_CURRENT_USER\Software\Microsoft\Shared Tools\
Graphics Filters\Import\JPEG\Options altında ...

ShowProgressDialog değerini “No” yap ( dikkat case sensitive, “N” büyük “o” küçük

Install Creatorun aşağıdaki resimde görülen
bir güncelleştirme ekranı var

[Resim: ekranresmi00007.jpg]


Ricam,
a. Bu yazılımı kullanan ve bu ekranı çözmüş bir arkadaştan yardım, çünkü "No" değerini nereye yazacağımı bulamadım
b. Bu iki ayarı yapabileceğim VB kodu varmıdır ?

Teşekkürler
okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #2
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: 20/12/2024,22:58
Yorumları: 13.542
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
sn okileturc, install creator kullandım ama bahsettiğiniz işlemi bilmiyorum ancak,
uygulamanızın ilk açılan formunda
Kod:
Function Kapat()
Dim sReturn As String
Dim sErr
Dim WS As Object
Set WS = CreateObject("WScript.Shell")
sReturn = WS.regread("HKCU\Software\Microsoft\Shared Tools\Graphics Filters\Export\JPEG\Options\ShowProgressDialog")
If sReturn = "Yes" Then 'change ShowProgressDialog entry to "No"
WS.regwrite "HKCU\Software\Microsoft\Shared Tools\Graphics Filters\Export\JPEG\Options\ShowProgressDialog", "No"
End If
sReturn = ""
sReturn = WS.regread("HKCU\Software\Microsoft\Shared Tools\Graphics Filters\Import\JPEG\Options\ShowProgressDialog")
If sReturn = "Yes" Then 'change ShowProgressDialog entry to "No"
WS.regwrite "HKCU\Software\Microsoft\Shared Tools\Graphics Filters\Import\JPEG\Options\ShowProgressDialog", "No"
End If
sReturn = ""
sReturn = WS.regread("HKLM\Software\Microsoft\Shared Tools\Graphics Filters\Export\JPEG\Options\ShowProgressDialog")
If sReturn = "Yes" Then
WS.regwrite "HKLM\Software\Microsoft\Shared Tools\Graphics Filters\Export\JPEG\Options\ShowProgressDialog", "No"
End If
sReturn = ""
sReturn = WS.regread("HKLM\Software\Microsoft\Shared Tools\Graphics Filters\Import\JPEG\Options\ShowProgressDialog")
If sReturn = "Yes" Then
WS.regwrite "HKLM\Software\Microsoft\Shared Tools\Graphics Filters\Import\JPEG\Options\ShowProgressDialog", "No"
End If
sReturn = ""

Set WS = Nothing
End Function
kodunu kullanabilirsin. (Bkz. Polsoft Açılış Formu)
Cevapla
Çözüldü #3
okileturc
Onursal Üye
okileturc
Bul
Onursal Üye

Additional groups:
Üye
Adı Soyadı: Ok.... Le....
Yaşı: 66
Konum: İzmir
Ofis Versiyonu: Ofis 2003
Son Oturumu: 11/09/2020,15:07
Yorumları: 966
Konuları: 113
Kayıt Tarihi: 18/03/2009
Teşekkür Puanı: 464
Hocam çok teşekkürler
okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #4
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: 20/12/2024,22:58
Yorumları: 13.542
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
Kod'u daha önce eşref hocanın eklediği bir konudan almıştım, fakat hangi konu olduğunu hatırlamıyorum,
Uygulamanın kapanışındaki formda da kod yazılarak eski hale getirilmesi gerekli, 2. mesaja yazdığım fonksiyonun tersini yazarak uygulamanızın kapanışında çalıştırın
Cevapla
Çözüldü #5
okileturc
Onursal Üye
okileturc
Bul
Onursal Üye

Additional groups:
Üye
Adı Soyadı: Ok.... Le....
Yaşı: 66
Konum: İzmir
Ofis Versiyonu: Ofis 2003
Son Oturumu: 11/09/2020,15:07
Yorumları: 966
Konuları: 113
Kayıt Tarihi: 18/03/2009
Teşekkür Puanı: 464
Hocam siz bu ayarları hiç kullanmıyor musunuz ? son yazdığınızdan biraz ürktüm doğrusu ( çıkarken eski durumuna getirme konusu ) Bu ayarlar sadece office uygulamalarının, bir bağlı JPEG dosyasını açarken çok kısa bir süre görüntülediği dialog penceresini iptal ediyor . "Loading image" veya "İmporting image" benzeri bir küçük pencere. Ancak bu dilaog penceresi bazen ekranda donup kalıyor ve uygulamanın kitlenmesine sebep oluyor. Bu nedenle sakıncalı bir iptal değil ( buraya kadar yazdıklarım benim bildiklerim ). Fazlasını söyleyebilecek arkadaşlardan yardım rica ediyorum. Eşref hoca ya da ayrıca tşk ederim.
okileturc, 18-03-2009 tarihinden beri AccessTr.neT üyesidir.
Cevapla
Çözüldü #6
ozanakkaya
sledgeab
ozanakkaya
Bul
Kurucu
Adı Soyadı: Oz.... Ak....
Konum: Denizli
Ofis Versiyonu: Ofis 2016 64 Bit
Son Oturumu: 20/12/2024,22:58
Yorumları: 13.542
Konuları: 499
Kayıt Tarihi: 29/01/2008
Teşekkür Puanı: 3.139
Mesleğiniz: Memur
sn okileturc, kod bahsettiğiniz gibi dialog penceresini iptal ediyor. Eski haline getirilmese de olur. Benim eski haline getirme konusunu açmamın sebebi, değiştirilen bir ayarı çıkışta eski haline getirmek.
Cevapla

Bir hesap oluşturun veya yorum yapmak için giriş yapın

Yorum yapmak için üye olmanız gerekiyor

ya da
Task