04/03/2010, 11:53
Dostlar herkese merhaba;
Access formundaki bilgileri "Word Aktar" düğmesine tıkladığımda, word dosyası belgelerime gidiyor.
Masaüstü adresim:
C:\Users\ABC\Desktop\
Aşağıdaki kod üzerinde nasıl bir değişiklik gerekiyor?
Private Sub Komut25_Enter()
On Error GoTo hata
Dim stDocName As String
Dim SID As String
Dim stLinkCriteria As String
SID = Me.[isletmeninadi].Value
stDocName = "belge1"
DoCmd.OpenReport stDocName, acViewPreview, , "[sno]=[forms]![tablo1]![sno]"
DoCmd.OutputTo acOutputReport, "Belge1", _
acFormatRTF, SID & ".rtf", False
DoCmd.Close acReport, "belge1"
hata: Exit Sub
End Sub
İlgi ve yardımınız içn teşekkürler.
Access formundaki bilgileri "Word Aktar" düğmesine tıkladığımda, word dosyası belgelerime gidiyor.
Masaüstü adresim:
C:\Users\ABC\Desktop\
Aşağıdaki kod üzerinde nasıl bir değişiklik gerekiyor?
Private Sub Komut25_Enter()
On Error GoTo hata
Dim stDocName As String
Dim SID As String
Dim stLinkCriteria As String
SID = Me.[isletmeninadi].Value
stDocName = "belge1"
DoCmd.OpenReport stDocName, acViewPreview, , "[sno]=[forms]![tablo1]![sno]"
DoCmd.OutputTo acOutputReport, "Belge1", _
acFormatRTF, SID & ".rtf", False
DoCmd.Close acReport, "belge1"
hata: Exit Sub
End Sub
İlgi ve yardımınız içn teşekkürler.