AccessTr.neT

Tam Versiyon: Masaüstüne dosyayı nasıl aktarırım?
Şu anda arşiv modunu görüntülemektesiniz. Tam versiyonu görüntülemek için buraya tıklayınız.
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.
Kod:
acFormatRTF, SID & ".rtf", False
şeklindeki satırı, aşağıdaki şekilde değiştirip deneyin:
Kod:
acFormatRTF, "C:\Users\ABC\Desktop\" & SID & ".rtf", False
Sayın Seruz;

Hocam günaydın.

İlgi ve yanıtınız için teşekkür ederim.

Sevgi ve saygılar..