asp备份sql数据库:ASP备份数据库来源: 发布时间:星期四, 2008年9月25日 浏览:197次 评论:0
<%@ Language=VBScript %>
<HTML> <HEAD> <META name=VI60_defaultClientScript content=VBScript> <META NAME=\"GENERATOR\" Content=\"Microsoft FrontPage 4.0\"> <SCRIPT ID=clientEventHandlersVBS LANGUAGE=vbscript> <!-- Sub btnbak_onclick if frmbak.txtsvr.value=\"\" then window.alert(\"\'Server Name\' is empty!\") frmbak.txtsvr.focus exit sub end if if frmbak.txtuid.value=\"\" then window.alert(\"\'Administrators\' is empty!\") frmbak.txtuid.focus exit sub end if if frmbak.txtdb.value=\"\" then window.alert(\"\'Database\' is empty!\") frmbak.txtdb.focus exit sub end if if frmbak.txtto.value=\"\" then window.alert(\"\'Backup To\' is empty!\") frmbak.txtto.focus exit sub end if frmbak.submit End Sub --> </SCRIPT> <link rel=\"stylesheet\" href=\"../../sheets/B2BStyle.css\"> </HEAD> <form action=\"backupdbsave.asp\" method=\"post\" id=frmbak name=frmbak> <body class=\"bg_frame_up\"> <p class=heading> Database --> Backup</p> <P align=center> <div align=\"center\"> <center> <table width=\"60%\" cellpadding=1 cellspacing=1 border=0 align=center> <tr> <td class=TD_Mand_FN align=\"center\" height=\"35\" width=\"40%\">Server Name:</td> <td class=TD_Mand_F height=\"35\" width=\"59%\"> <INPUT id=txtsvr name=txtsvr size=\"20\" style=\"font-family: Arial; font-size: 9pt\"></td> </tr> <tr> <td class=TD_Mand_FN align=\"center\" height=\"35\" width=\"40%\">Administrators:</td> <td class=TD_Mand_F height=\"35\" width=\"59%\"> <INPUT id=txtuid name=txtuid size=\"20\" style=\"font-family: Arial; font-size: 9pt\"></td> </tr> <tr> <td class=TD_Mand_FN align=\"center\" height=\"35\" width=\"40%\">Password:</td> <td class=TD_Mand_F height=\"35\" width=\"59%\"> <INPUT id=txtpwd name=txtpwd type=password style=\"font-family: Arial; font-size: 9pt\"></td> </tr> <tr> <td class=TD_Mand_FN align=\"center\" height=\"35\" width=\"40%\">Database:</td> <td class=TD_Mand_F height=\"35\" width=\"59%\"> <p align=\"left\"> <INPUT id=txtdb name=txtdb size=\"20\" style=\"font-family: Arial; font-size: 9pt\"></p> </td> </tr> <td class=TD_Mand_FN align=\"center\" height=\"35\" width=\"40%\">Backup To:<br> <u>(Server Path)</u></td> <td class=TD_Mand_F height=\"35\" width=\"59%\"> <input id=txtto name=txtto style=\"font-family: Arial; font-size: 9pt\"></td> </tr> </table> </center> </div> <p align=center><input id=btnbak name=btnbak type=button value=\"Start Backup\" style=\"font-family: Arial; font-size: 9pt\"></p> </body> </form> </HTML> 文件2:BackupDBSave.asp <%@ Language=VBScript %> <% dim msvr,muid,mpwd,mdb,mto msvr=Request.Form(\"txtsvr\") muid=Request.Form(\"txtuid\") mpwd=Request.Form(\"txtpwd\") mdb=Request.Form(\"txtdb\") mto=Request.Form(\"txtto\") if mpwd=\"\" then mpwd=\"\'\'\" on error resume next 0
相关文章
读者评论
发表评论 |