+- منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب (http://vb4arb.com/vb)
+-- قسم : قسم لغة الفيجوال بيسك VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=182)
+--- قسم : قسم اسئلة VB.NET (http://vb4arb.com/vb/forumdisplay.php?fid=183)
+--- الموضوع : تعديل هذا الكود (/showthread.php?tid=7465)
تعديل هذا الكود - مبتدئ - 21-12-12
كود :
TextBox1.Text = SystemInformation.UserName + "\Config"تعديل هذا الكود - SaLoOoMX - 21-12-12
لم افهم قصدك !!!!
تعديل هذا الكود - SaLoOoMX - 21-12-12
كود :
If My.Computer.FileSystem.FileExists(My.Computer.FileSystem.SpecialDirectories.Desktop + "\mn.txt") = False Then
IO.File.CreateText(My.Computer.FileSystem.SpecialDirectories.Desktop + "\mn.txt")
End If
My.Computer.FileSystem.WriteAllText(My.Computer.FileSystem.SpecialDirectories.Desktop + "\mn.txt", My.Computer.Info.OSFullName, True)اتمنى يكون هذا طلبك
تعديل هذا الكود - مبتدئ - 21-12-12
SaLoOoMX كتب :كود :
If My.Computer.FileSystem.FileExists(My.Computer.FileSystem.SpecialDirectories.Desktop + "\mn.txt") = False Then
IO.File.CreateText(My.Computer.FileSystem.SpecialDirectories.Desktop + "\mn.txt")
End If
My.Computer.FileSystem.WriteAllText(My.Computer.FileSystem.SpecialDirectories.Desktop + "\mn.txt", My.Computer.Info.OSFullName, True)
اتمنى يكون هذا طلبك
اقصد انى يكتب مسار الفولدير الى فى C:\Users\Name\
اسم الفولدير Config