Skip to main content

AccessTr.neT


32 bit (x86) yapılan programların 64 bit (x64) çalıştırılması

32 bit (x86) yapılan programların 64 bit (x64) çalıştırılması

#19
Merhaba,
Bu kodları yazmayacaksınız. Modüldeki kodlarda  Declare Function şeklinde kod yazılmış ise bu koda ptrsafe kodu ekleyeceksiniz.

Declare Function LoadCursorBynum Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long

kodu 

Declare ptrsafe Function LoadCursorBynum Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long

şeklinde olacak.

Modülün 64 bit ve 32 bitte çalışabilmesi için ise kod,


#If VBA7 Then
   Declare PtrSafe Function LoadCursorBynum Lib "user32" Alias "LoadCursorA" _
 (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long
#Else
   Declare Function LoadCursorBynum Lib "user32" Alias "LoadCursorA" _
 (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long
#End If

şeklinde düzenlemesi yapılması gerekiyor.  Siz declare içeren tüm kodları yukarıdaki örnekteki gibi düzeltmelisiniz.

Yapamazsanız, çalıştıramadığınız, hata veren uygulamayı yeni konu açarak ekleyin. Yardımcı olmaya çalışalım.
Cevapla
#20
(17/01/2018, 17:06)ozanakkaya yazdı: Merhaba,
Bu kodları yazmayacaksınız. Modüldeki kodlarda  Declare Function şeklinde kod yazılmış ise bu koda ptrsafe kodu ekleyeceksiniz.

Declare Function LoadCursorBynum Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long

kodu 

Declare ptrsafe Function LoadCursorBynum Lib "user32" Alias "LoadCursorA" (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long

şeklinde olacak.

Modülün 64 bit ve 32 bitte çalışabilmesi için ise kod,


#If VBA7 Then
   Declare PtrSafe Function LoadCursorBynum Lib "user32" Alias "LoadCursorA" _
 (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long
#Else
   Declare Function LoadCursorBynum Lib "user32" Alias "LoadCursorA" _
 (ByVal hInstance As Long, ByVal lpCursorName As Long) As Long
#End If

şeklinde düzenlemesi yapılması gerekiyor.  Siz declare içeren tüm kodları yukarıdaki örnekteki gibi düzeltmelisiniz.

Yapamazsanız, çalıştıramadığınız, hata veren uygulamayı yeni konu açarak ekleyin. Yardımcı olmaya çalışalım.
Cevapla
#21
Teşekkürler ozanakkaya bey,
Kodları düzenlemede sıkıntı yok bunu daha önce yapmıştım üzerinden 3-4 yıl geçti unuttum. Sorun bu kodların yeri. Kodları düzenleyeceğimiz yeri bulamadım. Bu konu hakkında yardım istiyorum.
Cevapla
#22
Modülleri kontrol edin
Cevapla
#23
(18/01/2018, 15:04)C*e*l*o*y*c*e yazdı: Modülleri kontrol edin

Hocam merhabalar, 

biz başka birinin 32 bit acceste yazmış olduğu hazır maaş programı kullanıyoruz. Office 2016 64 bit lisanslı ürüne geçmek istememiz nediyle program 64 bitte hata vermektedir. Yukarıda belirtilen kodları accessin veya programın hangi sütununa, dizininde düzeltme yapacağımızı belirtirseniz sorunumuz çözülecektir. İsterseniz programın linkini de sizinle paylaşabiliriz(e-posta aracılıgı ile).
Cevapla
#24
madem özel,özelden linki gönder bakalım
Cevapla

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

Yorum yapmak için üye olmanız gerekiyor

ya da
Task