VB 資料備份 還原

2021-04-30 07:36:05 字數 746 閱讀 8110

新建乙個視窗,新增2個command控制項,1個text控制項,1個drive控制項,1個file,進行資料的備份和還原,**如下:

private sub command1_click()

msg = msgbox("是否確定需要備份?", 1, "資料備份")

text1.visible = true

drive1.visible = true

text1.text = "備份至"

end sub

private sub command2_click()

msg = msgbox("資料還原會覆蓋電腦裡面的資料,是否繼續?", 4, "資料還原")

text1.visible = true

file1.visible = true

drive1.visible = true

text1.text = "資料來自"

end sub

errprompt:

me.mousepointer = 0

select case err.number

case 57

msgbox "磁碟已壞!", vbcritical

case 70

msgbox "磁碟寫保護,重新開始!", vbcritical

unload me

case 71

msgbox "磁碟未準備好!", vbcritical

end select

end sub

資料備份還原

先加一快硬碟,重啟之後fdisk l 檢視一下硬碟是否能找到 然後fdisk dev sdb建立乙個主分割槽 root localhost mkfs.xfs dev sdb1 格式成xfs格式 root localhost mkdir data 建立乙個data目錄 root localhost m...

備份還原資料

備份mysql資料庫的命令 mysqldump hhostname uusername ppassword databasename backupfile.sql 備份mysql資料庫為帶刪除表的格式,能夠讓該備份覆蓋已有資料庫而不需要手動刪除原有資料庫。mysqldump add drop tab...

備份還原 資料庫備份和還原

最近在搞封閉開發,有些東西基本上都忘記了,在網上重新搜尋了一下貼子,總結了一下檔案組備份和還原的一些東西 環境 microsoft corporation developer edition on windows nt 5.1 build 2600 service pack 3,v.5755 1 建...