ورود به حساب ثبت نام جدید فراموشی کلمه عبور
برای ورود به حساب کاربری خود، نام کاربری و کلمه عبورتان را در زیر وارد کرده و روی “ ورود به حساب” کلیک کنید.





اگر فرم ثبت نام برای شما نمایش داده نمیشود، اینجا را کلیک کنید.









اگر فرم بازیابی کلمه عبور برای شما نمایش داده نمیشود، اینجا را کلیک کنید.





نمایش نتایج: از 1 به 2 از 2
  1. #1
    amift366
    كاربر عادي
    تاریخ عضویت
    2013 Nov
    نوشته ها
    6
    0
    0

    پشتیبان گیری و بازیابی اطلاعات

    باسلام
    من برنامه ای رو در محیط vb.net 2010 نوشتم و بانک اطلاعاتی اون رو هم در همان میحط پیاده سازی کردم. تمام مراحل برنامه بصورت عالی کار می کنن اما نمی دونم که چه جوری باید این مشکل رو حل کنم.
    ممنون میشم کمکم کنید
  2. #2
    adminmsp
    مدیر کل و موسس سایت
    تاریخ عضویت
    1970 Jan
    محل سکونت
    M.S.P Soft
    نوشته ها
    1,590
    759
    465
    دیتابیس Access

    فراخوانی کنید:
    Imports Microsoft.VisualBasic
    Imports System
    Imports System.Collections.Generic
    Imports System.ComponentModel
    Imports System.Data
    Imports System.Drawing
    Imports System.Text
    Imports System.Windows.Forms
    Imports System.Data.OleDb
    Imports System.IO


    یک btn روی صفحه قرار بدید و داخلش کد زیر را بنویسید :

     Dim CurrentDatabasePath As String = Environment.CurrentDirectory & "\db.mdb"

    Dim fbd As New FolderBrowserDialog()

    If fbd.ShowDialog() = System.Windows.Forms.DialogResult.OK Then
    Dim PathtobackUp As String = fbd.SelectedPath.ToString()
    File.Copy(CurrentDatabasePath, PathtobackUp & "\BackUpbnj.ccw", True)
    progressBar1.PerformStep()
    MessageBox.Show("پشتیبان گیری با موفقیت انجام شد", "ایجاد پشتیبان")
    progressBar1.Value = 0
    End If

    نام دیتابیس db.mdb و این کد کارش گرفتن پشتیبان است !

    بازگردانی اطلاعات
    Dim PathToRestoreDB As String = Environment.CurrentDirectory & "\db.mdb"

    Dim ofd As New OpenFileDialog()
    ofd.Filter = "Text file (*.ccw)|*.ccw"

    If ofd.ShowDialog() = System.Windows.Forms.DialogResult.OK Then

    Dim Filetorestore As String = ofd.FileName
    File.Copy(Filetorestore, PathToRestoreDB, True)
    progressBar1.PerformStep()
    MessageBox.Show("پشتیبان با موفقیت بازگردانی شد", "بازگرداندن پشتیبان")
    progressBar1.PerformStep()
    progressBar1.Value = 0
    End If

    اینجا نیز نام دیتابیس db.mdb است !

    راستی یک progressBar هم روی صفحه قرار بدید !

    موفق باشید
    با M.S.P Soft به دنياي برنامه نويسي وارد شويد[برای نمایش لینک باید عضو شوید. ]
نمایش نتایج: از 1 به 2 از 2

اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

کلمات کلیدی این موضوع

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  

Content Relevant URLs by vBSEO 3.6.0 RC 2