oracle应付模块期间无法关闭有影响吗
1个回答
展开全部
备份Oracle数据库中数据
Function OracleEXP(App,User,Pass,Dir,ConStr)
Dim wshell,file
Set wshell = CreateObject("WScript.Shell")
file = Dir & "\" & Replace(CStr(Date),"-","") & ".dmp"
makeDumpCmdString = App & " " & User & "/" & Pass & ConStr & " file=" & file
wshell.Run makeDumpCmdString,1,True
Set wshell = Nothing
OracleEXP = file
End Function
Function OracleEXP(App,User,Pass,Dir,ConStr)
Dim wshell,file
Set wshell = CreateObject("WScript.Shell")
file = Dir & "\" & Replace(CStr(Date),"-","") & ".dmp"
makeDumpCmdString = App & " " & User & "/" & Pass & ConStr & " file=" & file
wshell.Run makeDumpCmdString,1,True
Set wshell = Nothing
OracleEXP = file
End Function
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询