📄 myisam2innodb.vbs
字号:
Set fso = CreateObject("Scripting.FileSystemObject")
Set src = fso.GetFolder("..\..\db\MyISAM")
For Each FullName In src.Files
MyISAM2InnoDB FullName
Next
' 巜掕偺僼僅儖僟偵奿擺偝傟偨奺僒僽僼僅儖僟傪張棟偡傞
tmpMessage = "僼僅儖僟堦棗:" & vbNewLine
For Each FolderName In src.Subfolders
tmpMessage = tmpMessage & FolderName & vbNewLine
Next
WScript.Echo "MyISAM偐傜InnoDB傊曄姺廔傢傝傑偟偨丅"
Sub MyISAM2InnoDB(FullName)
Set fso = CreateObject("Scripting.FileSystemObject")
FileName = fso.GetFileName(FullName)
Set destFolder = fso.GetFolder("..\..\db\InnoDB")
Set destFile = destFolder.CreateTextFile(FileName)
Set srcFile = fso.OpenTextFile(FullName) ' 僥僉僗僩僼傽僀儖偺僆乕僾儞
Do Until srcFile.AtEndOfStream
destFile.WriteLine( replace(srcFile.ReadLine,"MyISAM","InnoDB"))
Loop
destFile.close()
srcFile.close()
End Sub
⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -