Jump to content

radyofon

Üye
  • Posts

    1044
  • Joined

  • Last visited

Everything posted by radyofon

  1. Your uninstaller öneririm. Hem uninstall işlemlerini hem de dediğiniz işlemleri yapabilirsiniz.
  2. Vergilerle filan Türkye' de 100-120 $ civarı olur diye düşünüyorum.
  3. Checkbox' lı projelerde progress bar eklenmesini inceledim. Fakat 2 ComboBox' lı ve her ComboBox' da 2 seçenek olan bir projede progress bar nasıl uygulanabilir?
  4. Şöyle örnekleyebilriz: Proje adı:........... veri girişi 1: veri girişi 2: veri girişi: 3: .................. Bu şekilde veri girişi yaptıran bir panel ve bu girişleri gidip excel dosyasında kimini 1.sayfada ilgili hücreye kimini 2. ve 3. excel sayfalarında ilgili hücreler yazdıracak. Yani veri girişi yapmak için excel dosyasındaki bütün sayfaları dolaşmayacağız. Ayrıca print işlemini yaptırmak için de bir buton olacak. Bu butonun yanında da 1.sayfayı bastır 2.sayfayı bastır 3.sayfayı bastır diye seçenekler olacak. Bu nedir diye soracak olursanız, hakediş programında kullanmak istiyorum. Her sayfaya tek tek giriş yapıp hesaplarımı yapmasını ve print etmek yerine tek bir panelden bütün sayfalara ulaşmak için.
  5. Veri giriş panelini AutoIt ile hesaplamaları excel ile yaptırmak müümkün müdür? Excel içierisndeki visual basic yerine AutoIt kullanmak daha mı kullanışlı olur yoksa tam tersi mi?
  6. AutoIt denilince blue_life üstüne yoktur. Ben yanlış anlamışım. O bir fenomendir.
  7. AMS' de java update 21' i katılımsız kurmam gerekiyor. En stabl java update 21' de çalışıyor şu an. Fakat USSF parametre vermiyor. Forumdaki bazı yerlerde java' yı kurmamızı ve kurduktan sonra veya kurarken ......klasör adresinden java' nın msi dosyasını almamızı söylüyorlar fakat bahsedilen klasör adresinde msi dosyası oluşur oluşmaz kayboluyor. Bu konuda yardımcı olabilir misiniz? Java' nın katılımsız kurulum parametleri nedir?
  8. Üstad!... Engelleyebilirim diye sormuş. Burada engelleme ile ilgili bir kod göremedim ben
  9. Yeni işlemciler için paraları şimdiden biriktirmeye başlayalım. Bu işn sonu yok, her geçen gün yeni bir şey çıkıyor.
  10. Ctrl+Alt+Del kombinasyonu ile "İşlemler" başlığı altındaki pencerenin fotoğrafını buraya koyar mısın? Bir bakalım neler RAM tüketiyor.
  11. Üstadlar benim kodlar ne zamandan bu yana buralarda sürünüyor. Bir baksanız hata var mı? Daha da kısaltılabilir mi? Ne bileyim işte, table veya function' lar ile daha derli toplu olur mu? Gerekli kontrolleri eklemiş miyim? Bir bilen olarak baksanız bir fikir verseniz!... talha_252, KintaRo, spydevil üstadlar neredesiniz.... MostWanteddddddd [codebox] --- KURULUM AŞAMALARI --- --- Java 21 Kurulumu --- ---Java21 katılımsız yapılarak buraya kodları yazılacak if (Label.GetText("label.os", "Windows XP")) or (Label.GetText("label.os", "Windows Vista")) then Registry.SetValue(HKEY_LOCAL_MACHINE, "\\SYSTEM\\CurrentControlSet\\Control\\Session Manager\\Environment", "Path", ";C:\Program Files\Java\jre6\bin", REG_SZ) --Burası hatalı. bu değeri mevcut değere eklemesi gerekir. else Registry.SetValue(HKEY_LOCAL_MACHINE, "\\SYSTEM\\CurrentControlSet\\Control\\Session Manager\\Environment", "Path", ";C:\Program Files (x86)\Java\jre6\bin", REG_SZ) --Burası hatalı. bu değeri mevcut değere eklemesi gerekir. end --- Kart Okuyucu Seçimi --- okuyucuSelected = ComboBox.GetSelected("ComboBox1"); if okuyucuSelected ~= -1 then okuyucuCategory = ComboBox.GetItemText("ComboBox1", okuyucuSelected); end --- SIM Kart Seçimi --- simSelected = ComboBox.GetSelected("ComboBox2"); if simSelected ~= -1 then simCategory = ComboBox.GetItemText("ComboBox2", simSelected); end -----------------------Gemalto if (okuyucuCategory == "Gemalto") and (Label.GetText("label.bit","32 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.0") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\GemPcCCID_201_en-us_32.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.38).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "Gemalto") and (Label.GetText("label.bit","32 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.2. veya v1.2.1") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\GemPcCCID_201_en-us_32.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.41).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "Gemalto") and (Label.GetText("label.bit","64 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.0") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\GemPcCCID_201_en-us_64.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.38).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "Gemalto") and (Label.GetText("label.bit","64 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.2. veya v1.2.1") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\GemPcCCID_201_en-us_64.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.41).msi", ""); else DialogEx.Close(9999); end ------------------------ACS elseif (okuyucuCategory == "ACS") and (Label.GetText("label.bit","32 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.0") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\ACR38_100_122_PCSC_Driver_32.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.38).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "ACS") and (Label.GetText("label.bit","32 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.2. veya v1.2.1") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\ACR38_100_122_PCSC_Driver_32.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.41).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "ACS") and (Label.GetText("label.bit","64 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.0") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\ACR38_100_122_PCSC_Driver_64.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.38).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "ACS") and (Label.GetText("label.bit","64 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.2. veya v1.2.1") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\ACR38_100_122_PCSC_Driver_64.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.41).msi", ""); else DialogEx.Close(9999); end else Dialog.Message("Hata Algılandı", "!!!Akıllı Kart Okuyucu Tipini veya SIM Kart Version' unu seçmediniz!!!") end if ((ComboBox.GetSelected("ComboBox1")~= -1) and (ComboBox.GetSelected("ComboBox2")~= -1)) then --esyajni.dll ve diğer alt kurulumları --başlatabilmek için kontrol --(BU KONTROLDE HATA VAR) --(üstadlara sormak lazım. Combo' lar seçilmediyse alt adımlara geçmemeli) --- esyajni.dll --- Dialog.TimedMessage("esyajni kopyalama", "esyajni.dll ilgili yerlere kopyalanıyor.......", 5000, MB_ICONNONE) File.Copy("AutoPlay\\Docs\\esyajni.dll", _WindowsFolder, true, true, true, false) File.Copy("AutoPlay\\Docs\\esyajni.dll", _SystemFolder, true, true, true, false) --- 64 bit sysytem' de dosya kopyalama işlemleri --- bit = System.Is64BitOS() if bit then File.Copy("AutoPlay\\Docs\\esyajni.dll", "\\Windows\\SysWOW64\\", true, true, true, false); File.Copy("\\Windows\\SysWOW64\\akiscsp.dll", "\\Windows\\System32\\", true, true, true, false); File.Copy("\\Windows\\SysWOW64\\akiscsp.sig", "\\Windows\\System32\\", true, true, true, false); File.Copy("\\Windows\\SysWOW64\\akis11.dll", "\\Windows\\System32\\", true, true, true, false); end --- KISAYOL KOPYALAMA --- Shell.CreateShortcut(_DesktopFolderCommon, "AKiS Kart İzleme Aracı", "AutoPlay\\Docs\\runAkiA.bat", "", "", "AutoPlay\\Docs\\Cpp-AkisKartIzlemeAraci.exe", 0, SW_MAXIMIZE, nil) --- INTERNET EXPLORER' da REGISTRY KAYITLARINI YAPMA --- Dialog.TimedMessage("Internet Explorer ayarları", "Internet Explorer ayarları yapılıyor.......", 5000, MB_ICONNONE) Registry.CreateKey(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\P3P\\History\\e-icisleri.gov.tr"); Registry.CreateKey(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\P3P\\History\\icisleri.gov.tr"); Registry.SetValue(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\P3P\\History\\e-icisleri.gov.tr", "", 1, REG_DWORD); Registry.SetValue(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\P3P\\History\\icisleri.gov.tr", "", 1, REG_DWORD); Registry.SetValue(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Internet Explorer\\New Windows\\Allow\\", "*.icisleri.gov.tr", 0, REG_BINARY); Registry.SetValue(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Internet Explorer\\New Windows\\Allow\\", "*.e-icisleri.gov.tr", 0, REG_BINARY); Registry.CreateKey(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap\\Domains\\e-icisleri.gov.tr"); Registry.CreateKey(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap\\Domains\\e-icisleri.gov.tr\\www"); Registry.SetValue(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap\\Domains\\e-icisleri.gov.tr\\www", "https", 2, REG_DWORD); Registry.CreateKey(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap\\Domains\\icisleri.gov.tr"); Registry.CreateKey(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\owa"); Registry.SetValue(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\owa", "https", 2, REG_DWORD); Registry.CreateKey(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\owacert"); Registry.SetValue(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\owacert", "https", 2, REG_DWORD); Registry.CreateKey(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\www"); Registry.SetValue(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\www", "https", 2, REG_DWORD); Registry.SetValue(HKEY_CURRENT_USER, "\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet Settings\\Zones\\", "1A04", 0, REG_DWORD) -- SERTİFİKA YÜKLEME ADIMI -- sertifika = Dialog.Message("Sertifika Yükleme", "Lütfen Akıllı Kart okuyucuyu takınız.\r\nDİKKAT!...Driver'ların yükleme işlemini bekleyiniz ve yüklendikten sonra TAMAM tuşuna basınız! ", MB_OKCANCEL); if sertifika == IDOK then File.Run("AutoPlay\\Docs\\SertifikaYukleyici.exe", "", "", SW_SHOWNORMAL, true); else Dialog.Message("Sertifika Yükleme", "Sertifika Yüklemekten Vazgeçildi!") end Dialog.Message("Kurulum Tamamlandı!", "Seçtiğiniz Programlar Kuruldu...", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); else Dialog.Message("Kurulumdan Vazgeçildi!....", "...Kart Okuyucu tipi veya SIM kart seçmediniz...", MB_OK, MB_ICONSTOP, MB_DEFBUTTON1) end [/codebox]
  12. @ talha_252 Üstad bunda bazı kontroller eksik. Bende bu programlar ilgili klasörde olmamasına rağmen hepsini seçip kur diyorum ve kurulum tamamlandı diyor. exe dosyalarının var olup olmadığına bakması gerekir bence. Bu kontrolleri de eklersen iyi olur.
  13. Bunu benim aşağıdaki kurulum butonunda nasıl uygularız? Benim kullandığım CheckBox yerine ComboBox. [xml] [size="1"]--- KURULUM AŞAMALARI --- --- Java 21 Kurulumu --- --Java 21' in katılımsız kurulumunu bulmam lazım. if (Label.GetText("label.os", "Windows XP")) or (Label.GetText("label.os", "Windows Vista")) then Registry.SetValue(HKEY_LOCAL_MACHINE, "[url="file://\SYSTEM\CurrentControlSet\Control\Session"]\\SYSTEM\\CurrentControlSet\\Control\\Session[/url] Manager\\Environment", "Path", ";C:\Program Files\Java\jre6\bin", REG_SZ) else Registry.SetValue(HKEY_LOCAL_MACHINE, "[url="file://\SYSTEM\CurrentControlSet\Control\Session"]\\SYSTEM\\CurrentControlSet\\Control\\Session[/url] Manager\\Environment", "Path", ";C:\Program Files (x86)\Java\jre6\bin", REG_SZ) end --- Kart Okuyucu Seçimi --- okuyucuSelected = ComboBox.GetSelected("ComboBox1"); if okuyucuSelected ~= -1 then okuyucuCategory = ComboBox.GetItemText("ComboBox1", okuyucuSelected); end --- SIM Kart Seçimi --- simSelected = ComboBox.GetSelected("ComboBox2"); if simSelected ~= -1 then simCategory = ComboBox.GetItemText("ComboBox2", simSelected); end -----------------------Gemalto if (okuyucuCategory == "Gemalto") and (Label.GetText("label.bit","32 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.0") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\GemPcCCID_201_en-us_32.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.38).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "Gemalto") and (Label.GetText("label.bit","32 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.2. veya v1.2.1") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\GemPcCCID_201_en-us_32.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.41).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "Gemalto") and (Label.GetText("label.bit","64 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.0") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\GemPcCCID_201_en-us_64.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.38).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "Gemalto") and (Label.GetText("label.bit","64 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.2. veya v1.2.1") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\GemPcCCID_201_en-us_64.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.41).msi", ""); else DialogEx.Close(9999); end ------------------------ACS elseif (okuyucuCategory == "ACS") and (Label.GetText("label.bit","32 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.0") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\ACR38_100_122_PCSC_Driver_32.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.38).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "ACS") and (Label.GetText("label.bit","32 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.2. veya v1.2.1") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\ACR38_100_122_PCSC_Driver_32.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.41).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "ACS") and (Label.GetText("label.bit","64 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.0") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\ACR38_100_122_PCSC_Driver_64.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.38).msi", ""); else DialogEx.Close(9999); end elseif (okuyucuCategory == "ACS") and (Label.GetText("label.bit","64 Bit İşletim Sistemi")) and (simCategory == "AKİS v1.2. veya v1.2.1") then proceed = Dialog.Message("e-imza Kurulumu Aşağıda Seçtiğiniz Bilgilere Göre Başlıyor", "Akıllı Kart Okuyucu Tipi: "..okuyucuCategory.."\r\n\r\nSIM Kart Version: "..simCategory, MB_OKCANCEL, MB_ICONNONE); if proceed == IDOK then MSI.InstallProduct("AutoPlay\\Docs\\ACR38_100_122_PCSC_Driver_64.msi", ""); MSI.InstallProduct("AutoPlay\\Docs\\AKIS Yonetici (1.41).msi", ""); else DialogEx.Close(9999); end else Dialog.Message("Hata Algılandı", "!!!Akıllı Kart Okuyucu Tipini veya SIM Kart Version' unu seçmediniz!!!") end if ((ComboBox.GetSelected("ComboBox1")~= -1) and (ComboBox.GetSelected("ComboBox2")~= -1)) then --kontrol --- esyajni.dll --- Dialog.TimedMessage("esyajni kopyalama", "esyajni.dll ilgili yerlere kopyalanıyor.......", 5000, MB_ICONNONE) File.Copy("AutoPlay\\Docs\\esyajni.dll", _WindowsFolder, true, true, true, false) File.Copy("AutoPlay\\Docs\\esyajni.dll", _SystemFolder, true, true, true, false) --- 64 bit sysytem' de dosya kopyalama işlemleri --- bit = System.Is64BitOS() if bit then File.Copy("AutoPlay\\Docs\\esyajni.dll", "[url="file://\Windows\SysWOW64\"]\\Windows\\SysWOW64\\[/url]", true, true, true, false); File.Copy("[url="file://\Windows\SysWOW64\akiscsp.dll"]\\Windows\\SysWOW64\\akiscsp.dll[/url]", "[url="file://\Windows\System32\"]\\Windows\\System32\\[/url]", true, true, true, false); File.Copy("[url="file://\Windows\SysWOW64\akiscsp.sig"]\\Windows\\SysWOW64\\akiscsp.sig[/url]", "[url="file://\Windows\System32\"]\\Windows\\System32\\[/url]", true, true, true, false); File.Copy("[url="file://\Windows\SysWOW64\akis11.dll"]\\Windows\\SysWOW64\\akis11.dll[/url]", "[url="file://\Windows\System32\"]\\Windows\\System32\\[/url]", true, true, true, false); end --- KISAYOL KOPYALAMA --- Shell.CreateShortcut(_DesktopFolderCommon, "AKiS Kart İzleme Aracı", "AutoPlay\\Docs\\runAkiA.bat", "", "", "AutoPlay\\Docs\\Cpp-AkisKartIzlemeAraci.exe", 0, SW_MAXIMIZE, nil) --- INTERNET EXPLORER' da REGISTRY KAYITLARINI YAPMA --- Dialog.TimedMessage("Internet Explorer ayarları", "Internet Explorer ayarları yapılıyor.......", 5000, MB_ICONNONE) Registry.CreateKey(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\P3P\\History\\e-icisleri.gov.tr"); Registry.CreateKey(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\P3P\\History\\icisleri.gov.tr"); Registry.SetValue(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\P3P\\History\\e-icisleri.gov.tr", "", 1, REG_DWORD); Registry.SetValue(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\P3P\\History\\icisleri.gov.tr", "", 1, REG_DWORD); Registry.SetValue(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Internet"]\\Software\\Microsoft\\Internet[/url] Explorer\\New Windows\\Allow\\", "*.icisleri.gov.tr", 0, REG_BINARY); Registry.SetValue(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Internet"]\\Software\\Microsoft\\Internet[/url] Explorer\\New Windows\\Allow\\", "*.e-icisleri.gov.tr", 0, REG_BINARY); Registry.CreateKey(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\ZoneMap\\Domains\\e-icisleri.gov.tr"); Registry.CreateKey(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\ZoneMap\\Domains\\e-icisleri.gov.tr\\www"); Registry.SetValue(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\ZoneMap\\Domains\\e-icisleri.gov.tr\\www", "https", 2, REG_DWORD); Registry.CreateKey(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\ZoneMap\\Domains\\icisleri.gov.tr"); Registry.CreateKey(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\owa"); Registry.SetValue(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\owa", "https", 2, REG_DWORD); Registry.CreateKey(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\owacert"); Registry.SetValue(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\owacert", "https", 2, REG_DWORD); Registry.CreateKey(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\www"); Registry.SetValue(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\ZoneMap\\Domains\\icisleri.gov.tr\\www", "https", 2, REG_DWORD); Registry.SetValue(HKEY_CURRENT_USER, "[url="file://\Software\Microsoft\Windows\CurrentVersion\Internet"]\\Software\\Microsoft\\Windows\\CurrentVersion\\Internet[/url] Settings\\Zones\\", "1A04", 0, REG_DWORD) Dialog.Message("Kurulum Tamamlandı!", "Seçtiğiniz Programlar Kuruldu...", MB_OK, MB_ICONINFORMATION, MB_DEFBUTTON1); else Dialog.Message("Kurulumdan Vazgeçildi!....", "...Kart Okuyucu tipi veya SIM kart seçmediniz...", MB_OK, MB_ICONSTOP, MB_DEFBUTTON1) end [/xml] [/size]
  14. Üstadım baya iyi hazırladığın Dialog. Fakat şöyle bir sorunum var. Ben bunu kendi projemin içine nasıl yama yapacağım. Tek tek kodları kopyalayacak mıyım? Senin hazırladığın apz' yi program içinde ayrıca çağırtamam mı?
  15. @ coxefgun Ben zaten bu kontrolü eklemiştim. Fakat eklemem gerekli mi? Değil mi? diye bu konuyu açmıştım. Yani sınırlı hesap sahibi AMS' de oluşturulan kodların exe sini çalıtırabilir mi? Sormak istediğim bu idi. Kodlar çalışır mı exe nin içinde. Yoksa özel bir şeyler kodlar koymak gerekiyor mu kodların içine. #RequireAdmin olayı gibi. Neyse KintaRo' nun verdiği ayarlar zaten programda standart olarak öyle. En güzeli Vista veya Win7' de sınırlı hesapta denemek.
  16. Güzelmiş üstadım. Ama ben biraz daha fazlasını isitiyorum. Shell (kabuk) kısmında birkaç tane var ama ben title kısmının fontunu, rengini, yazı rengini, mesaj kısmında da aynı şekilde ve senin yaptığın gibi icon tiplerini değiştirebilmek istiyorum. Hazır bir plugin yok mu acaba?
  17. Bu işin daha kolay bir yolu yok mu? Dialog.Message penceresini AMS' nin istediği gibi mi kullanmak zorundayız. Arkaplan olarak filan herşeyi yapabilirken Dialog.Message penceresinin sabit olması, menülerde bununla ilgili birşey olmaması biraz garip geldi bana.
  18. 1-) AutoIt' de #requireAdmin komutunu vermek suretiyle kodları admin yetkisi ile çalıştırabiliyorsun. AMS' nin help dökümanını incelediğimde Admin yetkisi var mı yok mu diye sorgulama komutundan bahsediyor. Yani bir programı çalıştırmadan önce programın çalıştıralacağı bilgisayar admin yetkisine sahip mi değil mi? Değilse kullanıcıya bir dialogmessage açıp programı admin yetkisi ile kurması gerektiğini mi söyleyeceğiz. Ben böyle bir yorum yaptım. Ya da AMS admin yetkisiyle programları çalıştırabiliyor mu? Bunun için ayrıca bir komut var mı? 2-) Windows 7 olan bilgisayarlarda kodlar içinde kopyalama veya silme işlemi yapmaya kalktığımızda sistem buna izin vermiyor diye biliyorum. Bu durum sadece windows klasörü ile system32 veya system klasörü olabilir. Bunun için özel bir şey yapmak gerekir mi? Sisteme ulaşabilmenin bir yolu var mı?
  19. Legion doğum günün kutlu olsun. Fakat sen yoksun ortalıkta kızlar üflüyor mumu. Eee doğumgünü çocuğu ortalıkta olmayınca servis de yavaş işliyor haliyle.
  20. Sondan bir önceki satır böyle olmalıydı.... [xml]Dialog.Message("wwww.ıı I Net I Org", "Programları seçmedin ben de yüklemedim Abi.) [/xml]
  21. Ben öğrenci olsaydım herhalde bu konuları daha iyi kavrayabilirdim. Ama öğrencilik biteli 23 sene olmuş. Yardımların için teşekkürler. Dediğin yere kodların son halini ekleyeceğim. Yardımların için şimdiden teşekkürler!...
  22. java' nın katılımsız kurulumu için bahsettiğin klasör adresindeki msi dosyası daha kopylamaya başlamadan ortadan kayboluyor.
  23. @ KintaRo Teşekkür ederim. Birçok registry ayarı yaptırdım ama bir bunu bulamamıştım. Fakat anahtar değerini değiştireceğimiz yer senin verdiğin HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\LockDown_zones yolu değil HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Internet Settings\Zones yolu olması gerekiyor. Bunu da yine senin sayende buldum. Textleri bulmuştum ama D_WORD anahtarını değiştirecek yeri bulamamıştım. Allah aşkına bu kadar şeyi nereden biliyorsun? Hangi kaynaklardan faydalandığını bize de söyle de biz de öğrenelim. Sayende microsoft' un makalesinden buldum. Benim e-imza kurulumu bitti bitecek sayılır. Ama yanlış girişlere karşı ya da bir program kurulmadığında diğerinin de kurulmaması gibi kontroller filan yok. Sıradan alelade oldu gibi. Daha önce de belirttiğim gibi hep aynı program isimlerinin tekrar tekrar yazılarak çalıştırılması, bir sürü if döngüsü filan var. Bir de java update 21' in katılımsızını bulamadım. Bir tane buldum ama eksik kuruluyor hata veriyor. apz dosyasını hangi başlığa atayım? Sen bir üstad olarak incelesen de bir fikir versen!...
  24. Aşağıdaki resimde gösterilen ayarı yani "Etkinleştir" ayarını AMS' de nasıl yapabilirim. Regedit' de ilgili kısmı buldum fakat devredışı bırak ya da etkinleştir deyince anahtar değerlerinde değişiklik görmedim. Üstadlar bir el atsanız diyorum. [img]http://www.tnctr.com/uploads/imgs/pre_1307609570__sertifika.jpg[/img]
×
×
  • Create New...