التنبيهات التالية ظهرت :
Warning [2] count(): Parameter must be an array or an object that implements Countable - Line: 864 - File: showthread.php PHP 7.4.33 (Linux)
File Line Function
/showthread.php 864 errorHandler->error



تقييم الموضوع :
  • 0 أصوات - بمعدل 0
  • 1
  • 2
  • 3
  • 4
  • 5
استفسار بخصوص اخذ نسخه احتياطيه(تم الحل)مشكور اخوانى (waw والاخ asemshahen5)
#1
السلام عليكم ورحمه الله
احبتى فى الله عندى قاعدتين بيانات اكسس mahel.accdb وwarsha.accdb اريد اخذ نسخه احتياطيه  وهذا الكود الذى استخدمه

كود :
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
       Dim SFD As New SaveFileDialog
       SFD.Filter = "Microsost Access 2007|*.Accdb"
       '==== لكتابه │ نضغط على alt+435
       If SFD.ShowDialog = Windows.Forms.DialogResult.OK Then
           TextBox1.Text = SFD.FileName
           Dim scrpath, destpath As String
           scrpath = Application.StartupPath & "\DATA\MAHEL.accdb"
           destpath = SFD.FileName
           My.Computer.FileSystem.CopyFile(scrpath, destpath)
           MsgBox("تم عمل نسخه احتياطيه للنظام")


           Dim SFD_ As New SaveFileDialog
           If SFD_.Filter = "Microsost Access 2007|*.Accdb" Then
               TextBox1.Text = SFD_.FileName
               Dim scrpath_, destpath_ As String
               scrpath_ = Application.StartupPath & "\DATA\warsha.accdb"
               destpath_ = "w" And SFD.FileName
               My.Computer.FileSystem.CopyFile(scrpath_, destpath_)
               MsgBox("تم عمل نسخه احتياطيه للنظام")

               Application.Exit()
           End If
       End If
   End Sub
الرد }}}
تم الشكر بواسطة:


الردود في هذا الموضوع
استفسار بخصوص اخذ نسخه احتياطيه(تم الحل)مشكور اخوانى (waw والاخ asemshahen5) - بواسطة خالد كامل1 - 03-09-21, 08:29 PM


التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم