banner

[Rule] Rules  [Home] Main Forum  [Portal] Portal  
[Members] Member Listing  [Statistics] Statistics  [Search] Search  [Reading Room] Reading Room 
[Register] Register  
[Login] Loginhttp  | https  ]
 
Messages posted by: combug  XML
Profile for combug Messages posted by combug [ number of posts not being displayed on this page: 0 ]
 

qtra004 wrote:
Không hiểu thật. Sao dùng code ASP để backup database? ASP là ngôn ngữ để viết web, có liên quan gì tới database đâu.  


sao không liên quan... cậu để site trên server... cậu muốn định kỳ hay làm thủ công để save các cấu trúc database và dữ liệu thì làm trên website cho cái mục quảng trị luôn chẳng hạn... lúc đó cúc tục tặc gì thì chỉ cần run đoạn code đó là xong rồi... vậy đó... smilie
chán vậy... không ai giúp tui hết ah... hay là không ai hiểu câu hỏi của tui... bùn quá...
thiệt khốn khổ... các soft trên...
ưu điểm: cũng cool...
khuyết điểm: install xong die hết... bị SynAV tiễn... tắt SynAV thì con khác nó bò vào... => đói...
tôi đang xài CSDL là mySQL và ngôn ngữ ASP để design web cho công ty.
hiện tại đang làm phần Sao Lưu CSDL, tôi muốn backup toàn bộ CSDL bao gồm cả structure và data ra một file, vì thế tôi đã xài sql cmd: SHOW CREATE ... để lấy thông tin... và dùng BinaryWrite để output... nhưng gặp phải vấn đề như thế này:
- output ra đc nhưng trong chuổi output có các ký tự đi liền nhau là 0A 00 00 mà dùng hàm replace thay cho nó thành "" hết mà không đc.

cụ thể, code:

Code:
Server.ScriptTimeout= 30000
Response.Buffer = True
Response.Clear
Response.AddHeader "Content-Disposition", "attachment; filename=backup.sql"
Response.ContentType = "text/html"
Response.Write vbCRLF & "DROP DATABASE IF EXISTS " & sqlDB & ";" & vbCRLF
Response.BinaryWrite cStr(sqlCon.Execute("SHOW CREATE DATABASE " & sqlDB)(1)) & ";" & vbCRLF
For nI=1 To nCount
selTbl= replaceChr(Request.Form("chkTbl" & nI))
If selTbl<>"" Then
Response.Write "DROP TABLE IF EXISTS " & selTbl & ";" & vbCRLF
Response.BinaryWrite Replace(cStr(sqlCon.Execute("SHOW CREATE TABLE " & selTbl)(1)), Chr(10) & Chr(32) & Chr(32), " ", 1, -1, 1) & ";"
End If
Next
Response.Flush
Response.Clear


- chuổi text thường không xuất được bằng Response.BinaryWrite và chuổi trả về từ truy vấn sql không xuất được bằng Response.Write (chắc kiểu binary... hix...)
Các bác xem giúp tui nhé...
 

Powered by JForum - Extended by HVAOnline
 hvaonline.net  |  hvaforum.net  |  hvazone.net  |  hvanews.net  |  vnhacker.org
1999 - 2013 © v2012|0504|218|