asp備份sql資料庫代碼

① ASP插入數據到SQL資料庫怎麼寫代碼

strconn = "driver={sql erver};description=sqldemo;server=127.0.0.1;uid=用戶名;&_
pwd=data123;database=data1

set conn = server.createobject("猛纖adodb.connection")

conn.open strconn

以上態知神就打開資料庫了，接下來就是插入數據帆虧了

set rs=server.CreateObject("adodb.recordset")
sql="update table set fn =da "
rs.open sql,conn,1,3

② 如何用asp代碼實現數據備份和恢復

<form name="form1" method="post" action="?action=bf">
<table width="90%" border="0" align=center cellpadding="5" cellspacing="1" bgcolor="#336699" class="tableBorder">
<tr>
<th width="593" height=25 bgcolor="#FFFFFF" > <B>備份數據</B>( 需要FSO支持，FSO相關幫助請看微軟網站 ) </th>
</tr>
<tr>
<td height=100 bgcolor="#FFFFFF" class="forumrow">
<span class="STYLE1">
<%
if request.QueryString("action")="bf" then
Dbpath=request.form("Dbpath")
backpath=request.form("backpath")&".mdb"
if dbpath="" then
response.write "請輸入您要您要備份的資料庫"
else
Dbpath=server.mappath(Dbpath)
end if
backpath=server.mappath(backpath)
Set Fso=server.createobject("scripting.filesystemobject")
if fso.fileexists(dbpath) then
fso.file Dbpath,Backpath
response.write "數據備份成功！"
else
response.write "資料庫地址不存在，請檢查CONN.ASP中的DB＝這一項是否是絕對地址！"
end if
end if%>
</span> <div align="center">
<p>備份資料庫路徑(相對)：
<input name=backpath type=text id="backpath" value="bak\jester_bak" size=30>
<br>
目標資料庫路徑(相對)：
<input name=DBpath type=text id="DBpath" value="<%=db%>" size=30>
<BR>
<BR>

<input name="submit" type=submit value="備份數據">
</p>
<p>*必須是絕對的資料庫地址<br>
</p>
</div></td>
</tr>
</table>
<p> </p>
</form>
<form name="form1" method="post" action="?action=hy">
<font color=red class="STYLE1">
<%
if request.QueryString("action")="hy" then
Dbpath=request.form("Dbpath")
backpath=request.form("backpath")
if dbpath="" then
response.write "請輸入您要恢復成的資料庫全名"
else
Dbpath=server.mappath(Dbpath)
end if
backpath=server.mappath(backpath)
Set Fso=server.createobject("scripting.filesystemobject")
if fso.fileexists(dbpath) then
fso.file Dbpath,Backpath
response.write "成功恢復數據！"
else
response.write "備份目錄下並無您的備份文件！"
end if
end if%>
</font> <table width="80%" height="1" border="0" align=center cellpadding="5" cellspacing="1" bgcolor="#336699" class="tableBorder">
<tr>
<th width="593" height=25 bgcolor="#FFFFFF" > <B>恢復論壇數據</B>( 需要FSO支持，FSO相關幫助請看微軟網站 ) </th>
</tr>
<tr>
<td height=100 bgcolor="#FFFFFF" class="forumrow"> 備份資料庫路徑(相對)：
<input type=text size=30 name=DBpath value="bak\jester_bak.Mdb">
<BR>
目標資料庫路徑(相對)：
<input name=backpath type=text id="backpath" value="<%=db%>" size=30>
<BR>
填寫您當前使用的資料庫路徑，如不想覆蓋當前文件，可自行命名（注意路徑是否正確），然後修改conn.asp文件，如果目標文件名和當前使用資料庫名一致的話，不需修改conn.asp文件<BR>

<input name="submit" type=submit value="恢復數據">
<br>
-----------------------------------------------------------------------------------------<br>
在上面填寫本程序的資料庫路徑全名，本程序的默認備份資料庫文件為，請按照您的備份文件自行修改。<br>
您可以用這個功能來備份您的法規數據，以保證您的數據安全！<br>
注意：所有路徑都是相對與程序空間根目錄的相對路徑 </td>
</tr>
</table>
<p></p>
</form>
<span class="STYLE1">
<%
if request.QueryString("action")="ys" then
dim dbpath,boolIs97
if request("Dbpath")<>"" then Dbpath=request("Dbpath") end if
if request("Dbpath")="" then
if request("bkfolder")<>"" then bkfolder=request("bkfolder") else bkfolder="spubbsbak" end if
if request("bkdbname")<>"" then bkdbname=request("bkdbname") else bkdbname="spubbs" end if
bkdbname=bkdbname&"#.asp"
Dbpath=bkfolder&"\"&bkdbname
end if
'dbpath = request("dbpath")
if request("boolIs97")<>"" then boolIs97=request("boolIs97") else boolIs97=true end if
'boolIs97 = request("boolIs97")

If dbpath <> "" Then
dbpath = server.mappath(dbpath)
response.write(CompactDB(dbpath,boolIs97))
End If

'=====================壓縮參數=========================
Function CompactDB(dbPath, boolIs97)
Dim fso, Engine, strDBPath,JET_3X
strDBPath = left(dbPath,instrrev(DBPath,"\"))
Set fso = CreateObject("Scripting.FileSystemObject")

If fso.FileExists(dbPath) Then
fso.CopyFile dbpath,strDBPath & "temp.mdb"
Set Engine = CreateObject("JRO.JetEngine")

If boolIs97 = "True" Then
Engine.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & "temp.mdb", _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & "temp1.mdb;" _
& "Jet OLEDB:Engine Type=" & JET_3X
Else
Engine.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & "temp.mdb", _
"Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDBPath & "temp1.mdb"
End If

fso.CopyFile strDBPath & "temp1.mdb",dbpath
fso.DeleteFile(strDBPath & "temp.mdb")
fso.DeleteFile(strDBPath & "temp1.mdb")
Set fso = nothing
Set Engine = nothing

CompactDB = "你的資料庫, " & dbpath & ", 已經壓縮成功!" & vbCrLf

Else
CompactDB = "資料庫名稱或路徑不正確. 請重試!" & vbCrLf
End If

End Function

end if%>
</span>
<form action="?action=ys" method="post">

<table width="80%" height="1" border="0" align=center cellpadding="5" cellspacing="1" bgcolor="#336699" class="tableBorder">
<tr>
<td width="581" height=25 bgcolor="#FFFFFF" class="forumrow"><b>注意：</b><br>
輸入資料庫所在相對路徑,並且輸入資料庫名稱（正在使用中資料庫不能壓縮，請選擇備份資料庫進行壓縮操作） </td>
</tr>
<tr>
<td bgcolor="#FFFFFF" class="forumrow">壓縮資料庫：
<input type="text" name="dbpath" value=<%=db%>>

<input name="submit3" type="submit" value="開始壓縮"></td>
</tr>
<tr>
<td bgcolor="#FFFFFF" class="forumrow"><input type="checkbox" name="boolIs97" value="True">
如果使用 Access 97 資料庫請選擇 (默認為 Access 2000 資料庫)<br>
<br></td>
</tr>
</table> </form>

③ ASP實現SQL資料庫備份 還原!!!!!!!!

<% '=========================資料庫處理=============================================
IF Request.form("adminDatabase")<>"" Then
call CheckAdminLogin("資料庫管理")
ZD_AdminDatabase=Request.form("adminDatabase")
select case ZD_AdminDatabase
case "Compact"
osMessage=CompactDatabase()
case "backup"
osMessage=BackupDatabase()
case "Restore"
osMessage=RestoreDatabase()
case else
osMessage=GetErrMessage()
End select
End IF
%>

<%
Function updateDatabase()
Dim resultMessage
'On Error Resume Next

updateDatabase = resultMessage

End Function
%>

<%

Function CompactDatabase()
Set Conn=Nothing
Dim FSO,Engine
Set FSO=Server.CreateObject("Scripting.FileSystemObject")
IF FSO.FileExists(Server.Mappath(ZD_DataName)) Then
' Response.Write "<div id=""Layer1"" style=""position:absolute; left:220px; top:153px; width:372px; height:95px; z-index:1"" class=""tdbg3""></div>"
' Response.Write "<div id=""Layer2"" style=""position:absolute; left:222px; top:155px; width:371px; height:93px; z-index:1; overflow: hidden;"" class=""tdbg1"">資料庫壓縮中....請等待....</div>"
Set Engine = CreateObject("JRO.JetEngine")
Engine.CompactDatabase "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath(ZD_DataName), "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.Mappath(ZD_DataName & ".temp")
FSO.CopyFile Server.Mappath(ZD_DataName & ".temp"),Server.Mappath(ZD_DataName)
FSO.DeleteFile(Server.Mappath(ZD_DataName & ".temp"))
Set FSO = Nothing
Set Engine = nothing
CompactDatabase = "<span class=""importantText"">壓縮資料庫成功！！</span>"
'call SaveLog(Session("member"),"成功操作",now(),"資料庫壓縮",getIP(),true)
End If
End Function

Function BackupDatabase()
Set Conn=Nothing
Set FSO=Server.CreateObject("Scripting.FileSystemObject")
FSO.CopyFile Server.Mappath(ZD_DataName),Server.Mappath(ZD_DataName & ".bak")
Set FSO = Nothing
BackupDatabase = "<span class=""importantText"">資料庫備份成功！！</span>"
'call SaveLog(Session("member"),"操作成功",now(),"資料庫備份",getIP(),true)
End Function

Function RestoreDatabase()
Application.Contents.Removeall()
Set Conn=Nothing
Set FSO=Server.CreateObject("Scripting.FileSystemObject")
IF FSO.FileExists(Server.Mappath(ZD_DataName & ".bak")) Then
FSO.CopyFile Server.Mappath(ZD_DataName & ".bak"),Server.Mappath(ZD_DataName)
Set FSO = Nothing
RestoreDatabase = "<span class=""importantText"">資料庫恢復成功！！</span>"
'call SaveLog(Session("member"),"操作成功",now(),"資料庫恢復",getIP(),true)
Else
Set FSO = Nothing
RestoreDatabase = "<span class=""importantText"">不存在有備份文件！</span>"
'call SaveLog(Session("member"),"操作失敗",now(),"資料庫恢復",getIP(),false)
End IF
End Function

%>

大體是這樣您修改下吧。

④ asp sql備份代碼

資料庫備份可以通過SQL的「資料庫維護計劃」實現；或者：
執行
BACKUP
DATABASE
語句以創建資料庫備份，同時指定：
要備份的資料庫的名稱；資料庫備份將寫入的備份設備。
執行
RESTORE
DATABASE
語句以還原資料庫備份，同時指定：
要還原的資料庫名稱。要從其中還原資料庫備份的備份設備。

⑤ ASP連接sql2016代碼是什麼

通過driver建立連接
代碼如下 <%
Const DataBaseType=1
If DataBaseType=0 then
DBPath="/jb51/news.asp"
SqlNowString = "Now()"
ystr=true
nstr=false
suiji="rnd(id)"
Else
'如果是SQL資料庫，請認真修改好以下資料庫選項
DataServer = "www111cnnet" '資料庫伺服器IP
DataUser = "jb51net" '訪問資料庫用戶名
DataBaseName = "jb51net" '資料庫名稱
DataBasePsw = "密碼" '訪問資料庫密碼
SqlNowString = "getdate()"
ystr=1
nstr=0
suiji="newid()"
End if
On Error Resume Next
If DataBaseType = 1 Then
ConnStr="driver={SQL Server};server="&dataserver&";UID="&datauser&";PWD="&databasepsw&";Database="&databasename
Else
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DBPath)
End If
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnStr
If Err Then Err.Clear:Set conn = Nothing:Response.Write "資料庫連接出錯，請檢查Conn.asp文件中的資料庫參數設置。":Response.End
%>
通過driver建立連接

通過driver建立頁面與資料庫的連接，同樣不需要創建ODBC DSN數據源，但必須知道實際的資料庫文件路徑或者數據源名(例如,SQLserver的資料庫)。
代碼如下 Set conn=Server.CreateObject("ADODB.Connection")
conn.Open"driver={SQL Server};server=abc;DataSource=(test);uid=;pwd=;database=UserDB"

編寫腳本和資料庫源建立連接

ADO（ActiveX Data Objects ） 提供 Connection 對象，可以使用該對象建立和管理應用程序和 ODBC 資料庫之間的連接。Connection 對象具有各種屬性和方法，可以使用它們打開和關閉資料庫連接。編寫資料庫連接腳本，首先應創建 Connection 對象的實例，接著打開資料庫連接

代碼如下
'********************************************************************
' 與SQL Server2000有關的連接
' 可以參照它建立您的資料庫連接
'********************************************************************
'敬請注意：
'請根據情況配置StrServer,StrUid,StrSapwd,StrDbName四個參數
Dim StrServer,StrUid,StrSaPwd,StrDbName
StrServer="(local)" '資料庫伺服器名
StrUid="testuser" '您的登錄帳號
StrSaPwd="12345" '您的登錄密碼
StrDbName="db_test_com" '您的資料庫名稱

Dim Conn '資料庫連接
Dim StrDSN '資料庫連接字元串
Dim Rs '命令字元串
StrDSN="driver={SQL server};server="&StrServer&";uid="&StrUid&";pwd="&StrSaPwd&";database="&StrDbName
'建立和資料庫master的連接
set Conn = Server.CreateObject("ADODB.Connection")
set Rs=Server.CreateObject("ADODB.RecordSet")
Conn.Open StrDSN

⑥ 怎麼用asp備份sql資料庫

沒有這樣的方法，必須使用sql客戶端，看一下你資料庫用的是什麼版本，比如sql2000，那你本地需要裝舉租sql2000，然後連上遠胡答拆程資料庫，將資料庫備份到本地。ftp在這里是沒用的

你理解錯誤，你說只給了你ftp，如果只給你ftp的話，你網站如何去連接資料庫？網站還如何運行？你檢查一下網站的數據褲棗庫連接頁面，裡面有連接資料庫的各種參數

ping一下域名啊，域名對應的公網IP即可

⑦ asp.net(c#) 如何實現SQL資料庫的備份其相關代碼

直接執行一個備份用的存儲過程就行了 好像是什麼BACKUP DATABASE 然後給參數

⑧ 如何用ASP代碼實現將SQL2005導出的數據批量存儲到ACCESS中

這個在後台實現吧，然後前台ASP就只下載Access文件算了扒橘。
後台啟動SQLServer的DTS導數據，或者使用OpenDatasource之類的外部資料庫連接方式導數據。ASP直接完成可能不方便，另外寫個DataExport進程來完成吧，GET/POST到伺服器端觸發啟動該進程，帶上命令行參數中大將數據導完，然後下載到客戶端。
如果要賣此豎在客戶端做的話，估計要寫ActiveX了。

⑨ asp.net在後台怎麼對Sql Server 資料庫備份

"自己要備份的地方"不知道你這個地方是哪裡？這里可能有許可權的問題。如果排除一切許可權設置問題，就用1樓的就ok了。

⑩ ASP.NET中備份SQL Server資料庫的方法

前言:我們在開發網站時 在管理後台 管理員通常要定期對資料庫進行備份(當然也可以讓sqlserver伺服器定期自動備份 但我此處講的是中的備份) 備份的代碼很陸派亂簡單:

下面是我做一個網站後台時在 備份 按扭下寫的一個事件:

protected void Button _Click(object sender EventArgs e)

{

string newname = WebJake + DateTime Now Year ToString() + DateTime Now Month ToString() + DateTime Now Day ToString() + DateTime Now Hour ToString()+ bak ;

SqlConnection cn = DB createCon();

string nepath=Server MapPath( / /DataBack/ )+newname;

string sql = BACKUP DATABASE WebJake to DISK = +nepath+ ;

SqlCommand cmd = new SqlCommand(sql cn);

try

{

cn Open();

cmd ExecuteNonQuery();

早檔HyperLink Text = 已成功備份到伺服器路徑 + nepath+ 請點擊下載到本地！ ;

HyperLink NavigateUrl = / /DataBack/ +newname;

HyperLink Visible = true;

}

catch (Exception ex)

{

string exm = ex Message;

Label Text = 備份羨局資料庫出錯 該文件可能不存在！ ;

Label Visible = true;

}

finally

{

cmd Dispose();

cn Close();

cn Dispose();

}