Nonaktifkan Tanda Peringatan

2

Apakah ada cara untuk menghentikan tanda peringatan ini agar tidak muncul di Microsoft Access 2007-2013 melalui metode VBA? Saya telah mencoba (DoCmd.SetWarnings False) dan (Application.DisplayAlerts = false)

Tampaknya kedua metode itu tidak berhasil sama sekali. Bantuan apa pun akan sangat dihargai.

Memastikan

vba microsoft-access Ky TySon
sumber
@horney_D_Clown
Ky TySon
@Homey_D_Clown_IT Maaf tentang itu, ok logika di backend adalah untuk menyalin file dan menempelkannya di suatu tempat menggunakan metode objFSO.CopyFile namun untuk melakukan itu saya perlu mempertahankan nama file asli yang akan menunjukkan kepada saya tautan yang ditunjukkan di atas yang agak menjengkelkan karena saya mencoba menyalin file tidak menggantinya. Jadi sebagai kesimpulan, saya butuh sesuatu yang bisa mengeksekusi kode VBA dan hanya mematikan hal peringatan ini.
Ky TySon
Saya baru saja menambahkan jawaban untuk Anda dengan sumbernya, dll. Jadi cobalah ketika Anda mendapat kesempatan, ini akan menyelesaikan masalah Anda.
Pimp Juice,
@Homey_D_Clown_IT Terima kasih banyak !! : D Masalahnya terpecahkan
Ky TySon
Kapan saja, senang bisa membantu !!
Pimp Juice,

Jawaban:

3

Periksa Metode CopyFile dan pertimbangkan untuk menggunakan overwriteargumen untuk meneruskan ke fungsi untuk memberi tahu bahwa jika file ada, maka timpa dan jangan meminta.

Visual Basic untuk Referensi Aplikasi

Metode CopyFile

Sintaksis

obyek. Sumber CopyFile , tujuan [, timpa]

The CopyFile sintaks metode memiliki bagian-bagian ini:

  • Bagian: menimpa

    • Keterangan: Opsional. Nilai Boolean yang menunjukkan apakah file yang ada ingin ditimpa. Jika Benar , file ditimpa; jika salah , mereka tidak. Standarnya adalah Benar . Perhatikan bahwa CopyFile akan gagal jika tujuan memiliki set atribut read-only, terlepas dari nilai overwrite .

Komentar

Karakter wildcard hanya dapat digunakan di komponen jalur terakhir dari argumen sumber. Misalnya, Anda dapat menggunakan:

FileSystemObject.CopyFile "c:\mydocuments\letters\*.doc", "c:\tempfolder\"

Tetapi Anda tidak dapat menggunakan:

FileSystemObject.CopyFile "c:\mydocuments\*\R1???97.xls", "c:\tempfolder"

Jika sumber berisi karakter wildcard atau tujuan berakhir dengan pemisah jalur (), diasumsikan bahwa tujuan adalah folder yang ada untuk menyalin file yang cocok. Jika tidak, tujuan diasumsikan sebagai nama file yang akan dibuat. Dalam kedua kasus, tiga hal dapat terjadi ketika satu file disalin.

  • Jika tujuan tidak ada, sumber akan disalin. Ini adalah kasus yang biasa.
  • Jika tujuan adalah file yang ada, kesalahan terjadi jika menimpa adalah False . Jika tidak, upaya dilakukan untuk menyalin sumber di atas file yang ada.
  • Jika tujuan adalah direktori, kesalahan terjadi.

Kesalahan juga terjadi jika sumber menggunakan karakter wildcard tidak cocok dengan file apa pun. The CopyFile metode berhenti pada kesalahan pertama itu pertemuan. Tidak ada upaya untuk mengembalikan atau membatalkan perubahan yang dilakukan sebelum kesalahan terjadi.

Sumber

Pimp Juice
sumber