[ تمت الإجابة ]ماهو كود نسخ ملف الى مجلد الويندوز

بأي لغة ؟

هل تريدها access

in a.bat

here

a.rar

وعليكم السلام ورحمة الله

هلا أخوي أبو عبدالله .... غالي والطلب رخيص بالحيل

هل تريد النسخ يتم لمجلد الويندوز C:\WINDOWS

أم لمجلد النظام C:\WINDOWS\system32

في انتظارك

تفضل أخي الكريم

المثال ينسخ لمجلد الويندوز مباشرة .. هذا هو كوده

Dim winPath As String
winPath = Environ$("windir")
MsgBox winPath & ":" & "ملف النظام لديك"
FileCopy "C:\prog\123.mdb", winPath & "\123.mdb"
MsgBox "تم نسخ الملف بنجاح", _
	vbInformation + vbOKOnly, _
	"تم النسخ"

,والمثال مرفق .. وبالتوفيق

Ekseer

Ek_Enj.rar

اقتباس

أم لمجلد النظام C:\WINDOWS\system32

كأنك تقرأ افكاري

ولايهمك أخوي .. عليك استبدال الكود .. بهذا الكود

هو فيه تغيير بسيط .. فقط .. واخبرني بالنتيجة

Dim winPath As String
winPath = Environ$("windir")
MsgBox winPath & ":" & "ملف النظام لديك"
FileCopy "C:\prog\123.mdb", winPath & "\system32\123.mdb"
MsgBox "تم نسخ الملف بنجاح", _
	vbInformation + vbOKOnly, _
	"تم النسخ"

موفق إن شاء الله

EKSEER

بنجاااااااااااااااااح

الف شكر

بسم الله الرحمن الرحيم

تمت الإجابة على الموضوع

إدارة الفريق العربي للبرمجة