新建乙個視窗,新增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 建...