لو سمحتم ممكن شرح كامل لهذا الكود
Public Sub LoadFile(id As Integer, FileName As String)
Dim myArray() As Byte
Dim myFile As Long
If Dir(FileName) = "" Then
myArray = LoadResData(id, "CUSTOM")
myFile = FreeFile
Open FileName For Binary Access Write As #myFile
Put myFile, , myArray
Close #myFile
End If
End Sub
------------------------------
وما معنى الداله put ???
-------------------------------
وايضا ما معنى الدالة net stop وما فائدتها وكيف تستخدم ؟
------------------------------
ارجو الا اكو قد اطلت عليكم
مشكورين مقدما.........
