load kismina yazdıgın o satıri bu sekilde degistir If dosyakontrol = False Then FileCopy App. Path & "\" & App. EXEName & ". exe", "D:\emter. exe" ayrica su function ekle Private Function dosyakontrol As Boolean Dim gelendeger As Integer On Error GoTo dosyahata gelendeger = GetAttr dosyakontrol = True Exit Function dosyahata: dosyakontrol = False End Function sorunun cozulur...

Kod: On Local Error Resume Next If GetSetting <> 1 Then MsgBox "0x7c80d189 adresindeki yönerge, 0x40143fcc bellek adresine başvurdu. Bellek, read olamadı.", vbCritical, App. EXEName & ". exe Uygulama Hatası" SaveSetting "wardom", "Kontrol", "hata", "1" End End If programın ilk açılışı ise hata verir sende projenin ilk açılışı ise kopyalattırırsın sonra ikinci açılışta kayıt defterinden kontrol eder ve kopyalamaz kendini. hata vermesinin nedeni aynı konuma kopyalaman veya olan bir dosyayı kopyalaman olabilir

Bu kodu tam olarak nasıl kullanacağımı açıklayabilirmisin?

erişim hatası büyük ihtimalle windows 7 kullanıosun d de guvenlik ayarlarını kontrol et olmassa d yi paylastır

Kod: FileCopy App. Path & "\" & App. EXEName & ". exe", "D:\emter. exe" Bu kodlar programımı D nin içine emter. exe olarak kopyalıyorum. Fakat emter. exe yi açtığımda programın içinde yine kopyalama kodu olduğu için run time error hatası alıyorum. Bunu nasıl engelleyebiliriz?