نحوه کپی گرفتن از دیتابیس را برای من بگید؟

[mina.net]

سلام دوستان
من می خوام از یک دیتابیس کپی بگیرم و در یک مسیر خاصی با نام جدید ذخیره کنم . لطفا راهنمای فرمایید.
در ضمن چطور می تونم کانکشن جدید رو در برنامه ذخیره کنم؟

[saadi2]

منظورتون دیتابیس اکسس هست یا اسکیوال؟

به هر حال با این کد میتونی یک کپی از فایل موردنظر در مسیر مشخص بگیری با نام جدید که با دیتابیس اکسس خوب جواب میده



Dim filen, filep AsString
filen = SaveFileDialog.FileName + ".Mpc"
filep = System.Windows.Forms.Application.StartupPath + "\data.mdb"
FileCopy(filep, filen)



در ضمن اگر منظورت از کانکشن همون کانکشن استرینگ هست میتونی اونو تو یه تکست باکس قراربدی در خط اولش و در یک مسیر مشخص قرار بدی بعد اونو در برنامه اینجوری فراخوانی کنی:




Imports System.IO
Public con AsNew SqlConnection
PublicSub connect()
'Dim txtStr As StreamReader = New StreamReader(Application.StartupPath & "\conStr.txt")
Dim txtStr As StreamReader = New StreamReader("H:\conStr.txt")
Dim ss AsString = txtStr.ReadToEnd
con.ConnectionString = ss
EndSub



اگر درست جواب ندادم به خاطر اینکه خوب متوجه نشدم . یکم بیشتر توضیح بدید با تشکر

[mina.net]

با تشکر از دوست عزیر
دیتابسم SQL هست.

[mina.net]

سلام دوستان
من از دیتا بیس کپی گرفتم و کانکشن جدید رو هم ساختم. یعنی حل شد. منتها یک سوال وجود داره چطور می تونم جلوی حذف احتمالی دیتا بیس رو از کاربر بگیرم؟