20-03-17, 07:05 AM
وهذه طريقة أخرى
PHP كود :
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
SaveFormResources("C:\Users\سعود الشامان\Desktop\Sntrial.exe", My.Resources.Sntrial)
End Sub
Public Sub SaveFormResources(ByVal FilePatch As String, ByVal File As Object)
Dim FByte() As Byte = File
My.Computer.FileSystem.WriteAllBytes(FilePatch, FByte, True)
End Sub
End Class
