ايران ويج

با سلام
به چه روشی میشود فایلی را در پوشه system32 سیستم، مقصد کپی کنیم
من از دستورات مختلفی استفاده کردم نمیشه لطفا اگر راه حلی داره بگید؟؟؟

(۲۷-مهر-۱۳۸۸, ۱۷:۲۲:۱۴)relax_cp نوشته است: [ -> ]با سلام
به چه روشی میشود فایلی را در پوشه system32 سیستم، مقصد کپی کنیم
من از دستورات مختلفی استفاده کردم نمیشه لطفا اگر راه حلی داره بگید؟؟؟

منظورتون از مقصد یک کامپیوتر دیگه است؟ اگه نه که از FSO استفاده کنید!

با سلام
ميتونيد از اين كدها براي اين كار استفاده كنيد

کد: 
Private Declare Function GetSystemDirectory Lib "kernel32" Alias "GetSystemDirectoryA" (ByVal lpBuffer As String, ByVal nSize As Long) As Long

Private Sub Copy2System32(TargetPath As String)

Dim sSave As String, Ret As Long

Dim DestinationPath As String

sSave = Space(255)

Ret = GetSystemDirectory(sSave, 255)

sSave = Left$(sSave, Ret)

DestinationPath = sSave + "\" + TargetPath

FileCopy TargetPath, DestinationPath

End Sub

يا علي

relax_cp

Fireninja

Sh4DoVV