tek tıklama ile program ek özellikleri kurulumu - 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ığı: tek tıklama ile program ek özellikleri kurulumu (/konu-tek-tiklama-ile-program-ek-ozellikleri-kurulumu.html) |
tek tıklama ile program ek özellikleri kurulumu - simendifer - 16/07/2012 degerli arkadaşlar ekteki barkod programını kullanmak için font klasör içine yazı fontu, windows system32 nin içine barcodex.ocx i kopyalıyorum ,çalıştıra /regsvr32 barcodex.ocx yazıyorum daha kolay kurulumu yapması için tek tıklama ile nasıl bir yok izlenir komut dosyasımı yazılır ? makromu yazılır ? bilemiyorum bu konuda yardımcı olurmusunuz ben bunları tektek aşagıdaki yazı le yapıyorum bunun daha kolay olması için yardmlarınızı bekliyorum ----------------------------- ocx reg dediğim olay şu : ilişikteki barcodex.ocx i windows system32 nin içine kopyalıyorsun ve başlat tan çalıştıra geliyorsun /regsvr32 barcodex.ocx yazıp entere basıyorsun. Bunu yaptıktan sonra önceki gönderdiğim programı çalıştırabilirsin..font dosyasının içindeki fontu c:\windows\fontun içine yapıştır şeklinde yapıyorum Cvp: tek tıklama ile program ek özellikleri kurulumu - aydın3838 - 16/07/2012 selam ben olsam bat dosyası hakkında biraz araştırma yapardım vb kodları ile belli bir klasördeki dosyayı kopyalama ve belli bir adrese yapıştırma konusunu araştırırdım yine vb ile registy kaydı nasıl yapılır bakardım ben olsaydım saygılarımla fazla bir deneme yapmadım ama alttaki kod ile reg kaydı yapılabilir call Shell "regsvr32 barcodex.ocx /s" Cvp: tek tıklama ile program ek özellikleri kurulumu - simendifer - 16/07/2012 aydın kardeşimizin önerileri dogrultusunda yaptıgım araştırma neticesinde ekteki programı buldum ingilizce olması nedeniyle türkçeleştirmeye çalıştım ama genede tam başarılı olup programında neler nasıl yaplacagını beceremedim bu halıyle ekliyorum bir arkadaşımızın işine yarar veye bizlere nasıl yapılacagını tarif eder kurulumu yaptıktan sonra içindeki ingilizce dil dosyasını C:\Program Files\Dr.Batcher\Language klasörünün içine atarsa türkçeleşmiş olur Cvp: tek tıklama ile program ek özellikleri kurulumu - aydın3838 - 16/07/2012 selam dosya yollarını kendinize uyrlarsanız çalışır sadece reg ayarını yapamadım Public Function fontekle() 'font dosyası C:\Windows\Fonts 'ocx dosyası C:\Windows\System32 Dim fs1, fs2, fs3, fs4, fs5 As Object Dim font1, font2, font3, font4, font5 As String, ekle As String font1 = "C:\Users\A Yapı\Desktop\barkod\Fonts\BC02.ttf" font2 = "C:\Users\A Yapı\Desktop\barkod\Fonts\code39.ttf" font3 = "C:\Users\A Yapı\Desktop\barkod\Fonts\code128.ttf" font4 = "C:\Users\A Yapı\Desktop\barkod\Fonts\ean13.ttf" font5 = "C:\Users\A Yapı\Desktop\barkod\Fonts\EAN-13.ttf" ekle = "C:\Windows\Fonts\" Set fs1 = CreateObject("Scripting.FileSystemObject") Set fs2 = CreateObject("Scripting.FileSystemObject") Set fs3 = CreateObject("Scripting.FileSystemObject") Set fs4 = CreateObject("Scripting.FileSystemObject") Set fs5 = CreateObject("Scripting.FileSystemObject") fs1.CopyFile font1, ekle fs2.CopyFile font2, ekle fs3.CopyFile font3, ekle fs4.CopyFile font4, ekle fs5.CopyFile font5, ekle Set fs1 = Nothing Set fs2 = Nothing Set fs3 = Nothing Set fs4 = Nothing Set fs5 = Nothing End Function Public Function ocxekle() 'font dosyası C:\Windows\Fonts 'ocx dosyası C:\Windows\System32 Dim fs1 As Object Dim oce As String, ekle As String oce = "C:\Users\A Yapı\Desktop\barkod\barcodex.ocx" ekle = "C:\Windows\System32\" Set fs1 = CreateObject("Scripting.FileSystemObject") fs1.CopyFile oce, ekle Set fs1 = Nothing End Function Public Function regle() Shell "RegSvr32 /s" & "C:\Users\A Yapı\Desktop\barkod\barcodex.ocx" End Function |