[dubai.eig]

(18-01-17, 04:14 PM)مساعدة كتب : التغيير يكون على هذا السطر

كود :

IO.File.WriteAllBytes(IO.Path.GetFileName(filename), data)

ليصبح هكذا

كود :

Dim targetFilename as string
targetFilename = My.Application.Info.DirectoryPath & "\myfile\" & IO.Path.GetFileName(filename)
IO.File.WriteAllBytes(targetFilename , data)

احسنت بارك الله فيك