asp操作dts進行代引數的資料匯入匯出
年前接了乙個小專案,其中一部分是將sql中的資料進行有選擇的匯出到乙個mdb中。
這些是完全可以通過asp得sql語句進行操作的,但是還是想把主要匯出的任務交給sql server去做,asp主要是調動這個程式而已。
想到以前做過的東西,覺得實現起來並不難,只是乙個引數的問題。
開始實現:
先做乙個dts,連線好資料來源,新增乙個資料匯出任務,將資料匯出到access中。
然後呼叫asp啟動dts,測試成功。
重點問題是如何在asp中輸入引數,傳遞到dts中。
開始去想如何直接輸入引數給dts。可以使用全域性變數。
新增乙個全域性變數在資料轉換任務中使用帶有引數的查詢。
select *
from fenlei
where ( fl_id < ?)
這樣可以有乙個引數使用。那麼引數如何賦值?
關鍵是這幾個語句
set objglobal = objdtspackage.globalvariables
objdtspackage.loadfromsqlserver servername, usrname, pwd, dtssqlstgflag_default2, "", "", "", dtsname
objdtspackage.globalvariables("fl_id").value = fl_id
objdtspackage.execute
而且一定要注意,引數的賦值一定要在loadfromsqlserver之後才行。否則不成功!!!
源**如下:
<%
dtsname=request.form("dtsname")
usrname=request.form("usrname")
servername=request.form("servername")
pwd=request.form("pwd")
fl_id=request.form("fl_id")
dtssqlstgflag_default2=request.form("dtssqlstgflag_default2")
if dtsname="" or dtssqlstgflag_default2="" or usrname="" or servername="" or pwd="" then
response.write("error")
response.end
else
response.write("dtsname:"&dtsname&"
")response.write("usrname:"&usrname&"
")response.write("servername:"&servername&"
")response.write("dtssqlstgflag_default2:"&dtssqlstgflag_default2&"
")dim objdtspackage
dim objdtsstep
dim strresult
dim blnsucceeded
const dtssqlstgflag_default = 0
const dtsstepexecresult_failure = 1
set objdtspackage = server.createobject("dts.package")
blnsucceeded = true
'objdtspackage.dtsglobalvariables("fl_id").value = 10
set objglobal = objdtspackage.globalvariables
objdtspackage.loadfromsqlserver servername, usrname, pwd, dtssqlstgflag_default2, "", "", "", dtsname
objdtspackage.globalvariables("fl_id").value = fl_id
objdtspackage.execute
for each objdtsstep in objdtspackage.steps
if objdtsstep.executionresult = dtsstepexecresult_failure then
strresult = strresult & "package " & objdtsstep.name & " failed.
" blnsucceeded = false
else
strresult = strresult & "package " & objdtsstep.name & " succeeded.
" end if
next
if blnsucceeded then
response.write ""
else
response.write ""
end if
response.write strresult
end if
%>
轉 ASP採集 ASP採集程式原理
轉自 採集程式的主要步驟如下 一 獲取被採集的頁面的內容 二 從獲取 中提取所有用的資料 一 獲取被採集的頁面的內容 我目前所掌握的asp常用獲取被採集的頁面的內容方法 1 用serverxmlhttp元件獲取資料 以下內容為程式 以下為引用的內容 function getbody weburl 建...
ASP 全新接觸(4) 轉
2000 10 31 趙于 esky 4.其他 包括intrinsic controls,以及我們渴望已久的sendmail元件,加 解密元件,可以自定義的執行表現記數器,可以讀寫nt日誌的元件,網路訪問元件。等等。四.asp 的最終版本 很顯然,預覽版的 asp 與執行時框架還不是十全十美的。雖然...
ASP操作檔案
例項一 寫入檔案 語法 object.copyfile 複製路經 貼上路經 如存在,是否替代 set fs server.createobject scripting.filesystemobject fs.copyfile d ss.txt e bb.txt true 用fs的copyfile方法...