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之后才行。否则不成功！！！
源代码如下：
& ......
学ASP到现在已有许多年，好多人都说他这个不好那个不好，可我觉得挺好，我却说不出什么好的理由让客户选择用ASP开发，终于看到了这个文章，心中大喜，转给大家分享~~
ASP是一种类似HTML(Hypertext Markup Language超文本标识语言)、Script与CGI(Common GAteway Interface 通用网关接口)的结合体，但是其运行效率却比CGI更高、程序编制也比HTML更方便且更有灵活性，程序安全及保密性也比Script好。如果您是第一次接触互连网(Internet)，那么您可能不很了解上述名词，以下对各种名词加以解释并说明它们之间的区别。
HTML(Hypertext Markup Language)是一种超文本标识语言，文件通过这种格式可以在互连网上载送浏览，用户只要使用网页浏览器工具就可以浏览这些文件，目前比较常用的工具包括Microsoft Internet Explorer,Netscape Communicator等，由于HTML文件都是由标签(tag)所组成，因此它比较适合制作静态网页，再者，由于先天上的限制HTML是无法直接存取数据库的，所以存取数据库的工作大多是依靠CGI来处理。ASP不但可以包含HTML标签，也可以直接存取数据库及使用无限扩充的ActiveX控件，因此在程序编制上要比HTML方便而且更富有灵活性。
CGI(Common ......
自动识别IP,并跳转到来访问者所在的城市
先去下一个最新的纯真IP数据库,然后按如下操作:
1.运行纯真QQIP数据库里带的ShowIP.exe，点解压，输入文件名，比如IP.txt，确定，就得到一个TXT文件。
2.打开ACCESS，工具－自定义，命令选项卡，把导入选项拖动到上面的工具栏。
3.建库，建一个表，四个字段
Startip 类型:文本 (相关城市的IP段信息)
Endip 类型:文本 (相关城市的IP段信息)
Country 类型:文本 (相关城市名称)
ReUrl 类型:文本 (你想要跳转的城市路径如:北京 http://bj.abc.com)
4.点导入按钮，文件类型选文本文件，找到刚才导出的IP.txt文件，导入到刚才建的表里~
运算将真实IP转换为数字,比如北京的IP段是 ： 1.1.0.0 -- 1.1.0.255
Startip: 1*256*256*256+1*256*256+0*256+0 = 16842752 (这个数字才是最终要放到数据库里)
Endip: 1*256*256*256+1*256*256+0*256+255 = 16843007 (这个数字才是最终要放到数据库里的)
可用程序批量处理,如果不会,而且没时间(像我一样)你就直接去下个动网的IP库,它是已经处理好了的,下面是程序部分:
user_ip = Request.ServerVariables("REMOTE_ADDR") ''取得访问者IP
userip_ary=split(user_ip,".")
tmp_userip=use ......
今天重新整理电脑，找到一个文件，看了下日期（2006.11.5） ，怕不小心再丢了，存到网上来晒晒。
安装与配置
1.5.1安装IIS
控制面板_ 添加删除程序_添加删除Windows组件_
"internet信息服务(IIS)"对话框_详细信息——"Word Wide Web服务器" _ 单击两个“确定”——
测试:在浏览器的地址栏中输入"http://localhoset"
如果安装成功,会出现欢迎界面.
1.5.2安装.NET Framework
建立运行环境后，相关程序安装在 WINNT\Microsoft.NET\Framework\v1.1.4322目录下．
css.exe就是c#的编译文件．将地址栏显示的路径添加到系统路径下，执行该文件，可以得到.NET Framework的版本号．
测试运行环境：(注意)c#区分大小写，将文件保存到c:\initpub\wwwroot,操作系统在那个盘上，就到那个盘上找这个路径．然后在浏览器的地址栏输入"http://local/1-01.aspx".
第二部分 asp.net程序设计基础
第３章 asp.net
3.1.1 服务器端控件概述
3.1.2 asp.net页面的处理过程
3.1.3页面的事件
一个asp.net页面的事件是被web服务器自动调用的，也有一些事件是需要被激发的。
page_load():在页面被加载的时� ......
这个模板引擎比较方便,跟HTML结合了
Class template
Private c_Char, c_Path, c_FileName, c_Content, c_PageUrl, c_CurrentPage, c_PageStr, ReplacePageStr
Private TagName
' ***************************************
' 设置编码
' ***************************************
Public Property Let Char(ByVal Str)
c_Char = Str
End Property
Public Property Get Char
Char = c_Char
End Property
' ***************************************
' 设置模板文件夹路径
' ***************************************
Public Property Let Path(ByVal Str)
c_Path = Str
End Property
Public Property Get Path
Path = c_Path
End Property
' ***************************************
' 设置模板文件名
' ***************************************
Public Property Let FileName(ByVal Str)
c_FileName = Str
End Property
Public Property Get FileName
FileName = c_FileName
End Property
' ***************************************
' 获得模板文件具体路径
' *********************** ......
1 示例xml文件 model.xml
<?xml version="1.0" encoding="utf-8" ?>
<DrRoot>
<SiteName>xml操作示例</SiteName>
<SiteUrl>www.abc.com.cn</SiteUrl>
.net开源论坛
<SiteKeyWord>xml操作示例</SiteKeyWord>
<FileType>gif|jpg|rar</FileType>
<FileSize>1024</FileSize>
<Filters>script|iframe</Filters>
<FilterEvent>onload|onmouseover</FilterEvent>
<BadWords>admin|webmaster|drbbs</BadWords>
<DisallowIP>0.0.0.0</DisallowIP>
<IsCloseReg>False</IsCloseReg>
<IsCloseBBS>False</IsCloseBBS>
<PostPay>5</PostPay>
<ReplyPay>2</ReplyPay>
<GoodPay>10</GoodPay>
<DelPost>5</DelPost>
<DelReply>2</DelReply>
<CancleGood>10</CancleGood>
</DrRoot>
2 主要方法
public string ReadValue(string key)
{
XmlDocument xd=new XmlDocument();
&n ......
1 示例xml文件 model.xml
<?xml version="1.0" encoding="utf-8" ?>
<DrRoot>
<SiteName>xml操作示例</SiteName>
<SiteUrl>www.abc.com.cn</SiteUrl>
.net开源论坛
<SiteKeyWord>xml操作示例</SiteKeyWord>
<FileType>gif|jpg|rar</FileType>
<FileSize>1024</FileSize>
<Filters>script|iframe</Filters>
<FilterEvent>onload|onmouseover</FilterEvent>
<BadWords>admin|webmaster|drbbs</BadWords>
<DisallowIP>0.0.0.0</DisallowIP>
<IsCloseReg>False</IsCloseReg>
<IsCloseBBS>False</IsCloseBBS>
<PostPay>5</PostPay>
<ReplyPay>2</ReplyPay>
<GoodPay>10</GoodPay>
<DelPost>5</DelPost>
<DelReply>2</DelReply>
<CancleGood>10</CancleGood>
</DrRoot>
2 主要方法
public string ReadValue(string key)
{
XmlDocument xd=new XmlDocument();
&n ......
最新文章 :