Backup dan Restore Mysql

Gimana yaa??

-Backup lihat gambar

-Restore lihat gambar

[Edit] ada yang ngeluh gagal hehe saya lupa kasih ini😀

Agar cara backup dan restore sukses syaratnya harus lihat gambar

moga sukses yaa, maaf yaa🙂

yaa udah silahkan download aja

http://www.mediafire.com/?05r1zix4kjc4nc7

Dikembangkan aja dengan baik dan benar

5 Balasan ke Backup dan Restore Mysql

  1. DhanFox mengatakan:

    filenya kurang gan,file program1.prg nya kagak ada…….

  2. didang mengatakan:

    yg mssql gak ada gan

    • Rubah_amuk mengatakan:

      sqlca.autocommit=true

      string ls_check
      int i_flag

      ls_check=”exec sp_helpdevice bckhrd ;”
      execute immediate :ls_check ;

      if SQLCA.sqlcode = -1 then
      i_flag = 0
      else
      i_flag = 1
      end if

      if i_flag = 1 then
      string ls_drop
      ls_drop =”exec sp_dropdevice bckhrd ;”
      execute immediate :ls_drop ;

      if SQLCA.sqlcode = -1 then
      MessageBox(“Drop Device Object Error !”, SQLCA.sqlerrtext)
      i_flag = 1
      else
      i_flag = 0
      end if
      end if

      if i_flag = 0 then
      string ls_create
      ls_create =”exec sp_addumpdevice ‘disk’,’bckhrd’, ‘”+ trim(sle_1.text) + “‘ ;”
      execute immediate :ls_create ;

      if SQLCA.sqlcode = -1 then
      MessageBox(“Create Device Object Error !”, SQLCA.sqlerrtext)
      else
      if rb_1.checked then
      string ls_back
      ls_back=”backup database hris to bckhrd ;”
      execute immediate :ls_back ;

      if SQLCA.sqlcode = -1 then
      MessageBox(“Backup Database Error !”, SQLCA.sqlerrtext)
      else
      MessageBox(“:)”,”BackUp Sukses !!”)
      end if
      sqlca.autocommit=false
      else
      // koneksi ke master database
      disconnect ;
      //string koneksi
      koneksi = profilestring(“mz.tol”,”mzToloConnection”,”Connect001″,””)
      f_back( koneksi )

      string ls_rest
      ls_rest=”restore database hris from bckhrd ;”
      execute immediate :ls_rest ;

      if SQLCA.sqlcode = -1 then
      MessageBox(“Restore Database Error !”, SQLCA.sqlerrtext)
      else
      MessageBox(“:)”,”Restore Sukses !!”)
      end if
      disconnect ;
      // kembalikan ke koneksi hrx
      f_koneksi( koneksi )
      end if
      end if
      end if

      ane copas dr http://www.fox-id.org/smf/general-code-activex-com/tanya-listing-backup-database-mysql/msg46893/#msg46893

      saya lum pernah pake mssql server mas😀

Tinggalkan Balasan

Isikan data di bawah atau klik salah satu ikon untuk log in:

Logo WordPress.com

You are commenting using your WordPress.com account. Logout / Ubah )

Gambar Twitter

You are commenting using your Twitter account. Logout / Ubah )

Foto Facebook

You are commenting using your Facebook account. Logout / Ubah )

Foto Google+

You are commenting using your Google+ account. Logout / Ubah )

Connecting to %s

%d blogger menyukai ini: