منتدى فيجوال بيسك لكل العرب | منتدى المبرمجين العرب

نسخة كاملة : متغيرات اسماء الملفات
أنت حالياً تتصفح نسخة خفيفة من المنتدى . مشاهدة نسخة كاملة مع جميع الأشكال الجمالية .
Public Lines() As String = My.Computer.FileSystem.ReadAllText(Application.StartupPath & "\ipfile.txt").Split(vbCrLf)

    Dim Cls As New AttachDatabaseNameCls()
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        '-----------------------------------------------------------------
        Dim file0, file1, file2 As String

        file0 = Lines(0)
        file1 = Lines(1)
        file2 = Lines(2)
        'Try
        Cls.AttachDatabaseName(file0, Application.StartupPath & file1, Application.StartupPath & file2)
          
القيم  الموجودة في الملف النصي  هي
"salse"
"salse.mdf\"
"salse_log.ldf\"

لماذا  لا يعطي خطا  علما بان عند عرض اسماء الملفات في رسئايل تظهر سليمة

برجاء احد يعرف الخطأ فين
كيف اعرف اسم الملف كمتغير ويلا يظهر خطا عند التنفيذ
برجاء
الملف اللي طلبته حضرتك