+- 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ığı: MDE dosyası yapma (/konu-mde-dosyasi-yapma.html)
Cvp: MDE dosyası yapma - alpeki99 - 14/12/2008
Tasarım modundayken klavyeden Alt + F11 tuşlarına basıp Kod penceresine geçiş yapınız. Daha sonra yukarıda bulunan menude Debug - Compile ... tıklayın. Daha profesyonel çözümler için Forumda Programlar Bölümünde Access Programları alt bölümünü inceleyin.
Cvp: MDE dosyası yapma - Redgreen - 14/12/2008
resimde ekledim üstteki örneğe yanlış bişey yapmayalım.
Cvp: MDE dosyası yapma - ozanakkaya - 14/12/2008
sn redgreen 5. mesaja yazdım koddaki yanlışı,
Cvp: MDE dosyası yapma - Redgreen - 14/12/2008
End Sub eksikmiş dediğinizi yaptığımda dosya bozuldu.End Sub ekleyince sonuna düzeldi.
Cvp: MDE dosyası yapma - ozanakkaya - 14/12/2008
Kod:
Option Compare Database
Private Sub Komut6_Click()
On Error GoTo Err_Komut6_Click
DoCmd.GoToRecord , , acFirst
Exit_Komut6_Click:
Exit Sub
Err_Komut6_Click:
MsgBox Err.Description
Resume Exit_Komut6_Click
End Sub
Option Compare Database
Option Explicit
Dim path As String
End Sub-----------------------
Option Compare Database
Option Explicit
Bu kodu sil
------------------------
Dim path As String
bu kodu
en üstteki Option Compare Database in bir altına yaz (silmeni söylediğim kodu sildiğinde bu kodu gerekli yere taşıyacağını düşündüm)
-------------------------------------------------
en sona eklediğin end sub u sil
Cvp: MDE dosyası yapma - Redgreen - 14/12/2008
şimdi düzeldi.doğrusu dediğiniz gibiymiş.