11-06-20, 11:39 PM
الصفحات : 1 2
12-06-20, 07:49 AM
السادة
شكرا
تم النسخ بالكود التالي
If conn.State = ConnectionState.Open Then conn.Close()
Dim cmd1 As New SqlCommand
cmd1.CommandType = CommandType.Text
cmd1.Connection = conn
cmd1.CommandText = "ALTER DATABASE salse SET OFFLINE"
conn.Open()
cmd1.ExecuteNonQuery()
conn.Close()
My.Computer.FileSystem.CopyFile(Application.StartupPath & "\salse.ldf", "d:\NewFullfileName.ldf", True)
My.Computer.FileSystem.CopyFile(Application.StartupPath & "\salse.mdf", "d:\NewFullfileName.mdf", True)
لكن عند التشغيل
ما زالت القاعدة اوف لاين
كيف
1-استخدم الكود
ALTER DATABASE database_name SET ONLINE;
2-ما فائدة الكود
ALTER DATABASE yourdatabaseName MODIFY FILE ( NAME = logical_name, FILENAME = 'new_path\os_file_name' );
كيف استخدمه
3-ما فائدة الكود
SELECT name, physical_name AS CurrentLocation, state_desc
FROM sys.master_files
WHERE database_id = DB_ID(N'<database_name>');
كيف استخدمه
اين اضع كود اعادة اون لان
كود الاتصال الذي استخدمه هو
conString = ("Data Source= " & ServerIP(Application.StartupPath & "\IpFile.txt") & ";Initial Catalog=salse; User ID=elsalah ; Password=08642")
conn.ConnectionString = conString
conn.Open()
My.Settings.sername = True
My.Settings.Save()
شكرا
شكرا
تم النسخ بالكود التالي
If conn.State = ConnectionState.Open Then conn.Close()
Dim cmd1 As New SqlCommand
cmd1.CommandType = CommandType.Text
cmd1.Connection = conn
cmd1.CommandText = "ALTER DATABASE salse SET OFFLINE"
conn.Open()
cmd1.ExecuteNonQuery()
conn.Close()
My.Computer.FileSystem.CopyFile(Application.StartupPath & "\salse.ldf", "d:\NewFullfileName.ldf", True)
My.Computer.FileSystem.CopyFile(Application.StartupPath & "\salse.mdf", "d:\NewFullfileName.mdf", True)
لكن عند التشغيل
ما زالت القاعدة اوف لاين
كيف
1-استخدم الكود
ALTER DATABASE database_name SET ONLINE;
2-ما فائدة الكود
ALTER DATABASE yourdatabaseName MODIFY FILE ( NAME = logical_name, FILENAME = 'new_path\os_file_name' );
كيف استخدمه
3-ما فائدة الكود
SELECT name, physical_name AS CurrentLocation, state_desc
FROM sys.master_files
WHERE database_id = DB_ID(N'<database_name>');
كيف استخدمه
اين اضع كود اعادة اون لان
كود الاتصال الذي استخدمه هو
conString = ("Data Source= " & ServerIP(Application.StartupPath & "\IpFile.txt") & ";Initial Catalog=salse; User ID=elsalah ; Password=08642")
conn.ConnectionString = conString
conn.Open()
My.Settings.sername = True
My.Settings.Save()
شكرا
03-07-20, 11:50 PM
لم يلبي احد طلبي حتي الان
04-07-20, 12:39 AM
اخر الفاضل انصح بالرجوع الى هذا الموضوع
http://vb4arb.com/vb/showthread.php?tid=16733
http://vb4arb.com/vb/showthread.php?tid=16733
04-07-20, 08:32 PM
هدفي ليس نسخ backup ولكن نسخ الملفين mdf log
اي كانه نسخ عادي ولكن من الفيجوال
اي كانه نسخ عادي ولكن من الفيجوال
الصفحات : 1 2