<?xml version="1.0" encoding="UTF-8"?>
<rss version="2.0"
	xmlns:content="http://purl.org/rss/1.0/modules/content/"
	xmlns:wfw="http://wellformedweb.org/CommentAPI/"
	xmlns:dc="http://purl.org/dc/elements/1.1/"
	xmlns:atom="http://www.w3.org/2005/Atom"
	xmlns:sy="http://purl.org/rss/1.0/modules/syndication/"
	xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
	>

<channel>
	<title>Cogniza &#187; VB Script</title>
	<atom:link href="http://cogniza.com/wordpress/tag/vb-script/feed/" rel="self" type="application/rss+xml" />
	<link>http://cogniza.com/wordpress</link>
	<description>Business-Intelligence Specialists</description>
	<lastBuildDate>Mon, 15 Mar 2010 20:22:31 +0000</lastBuildDate>
	<generator>http://wordpress.org/?v=2.9.2</generator>
	<language>en</language>
	<sy:updatePeriod>hourly</sy:updatePeriod>
	<sy:updateFrequency>1</sy:updateFrequency>
			<item>
		<title>SQL Server: Import DTS Packages using a Script</title>
		<link>http://cogniza.com/wordpress/2006/11/16/sql-server-import-dts-packages-using-a-script/</link>
		<comments>http://cogniza.com/wordpress/2006/11/16/sql-server-import-dts-packages-using-a-script/#comments</comments>
		<pubDate>Thu, 16 Nov 2006 19:09:14 +0000</pubDate>
		<dc:creator>Craig Buchanan</dc:creator>
				<category><![CDATA[Programming]]></category>
		<category><![CDATA[SQL Server]]></category>
		<category><![CDATA[VB Script]]></category>

		<guid isPermaLink="false">http://www.cogniza.com/blog/?p=87</guid>
		<description><![CDATA[Use a VB Script file to import .DTS files into the local Sql Server database.]]></description>
			<content:encoded><![CDATA[<p>Use a VB Script file to import .DTS files into the local Sql Server database.</p>
<p><span id="more-87"></span></p>
<p><code><br />
'determine current file location<br />
Dim Path: Path=Left(WScript.ScriptFullName,Len(WScript.ScriptFullName)-Len(WScript.ScriptName)-1)</code><code>'.DTS files to be imported<br />
Dim Sources: Sources = Array("File0.dts","File1.dts")</code></p>
<p>&#8216;import each file<br />
Dim i<br />
For i = 0 To Ubound(Sources)<br />
Import Path &amp; &#8220;\&#8221; &amp; Sources(i)<br />
Next</p>
<p>Sub Import(FilePath)</p>
<p>Dim P: Set P = CreateObject(&#8220;DTS.Package&#8221;)<br />
With P<br />
.LoadFromStorageFile FilePath, &#8220;&#8221;<br />
&#8216;import to local database, using a trusted connection<br />
.SaveToSQLServer &#8220;(local)&#8221;, , ,256<br />
End With</p>
<p>Set P = Nothing</p>
<p>End Sub</p>
]]></content:encoded>
			<wfw:commentRss>http://cogniza.com/wordpress/2006/11/16/sql-server-import-dts-packages-using-a-script/feed/</wfw:commentRss>
		<slash:comments>1</slash:comments>
		</item>
	</channel>
</rss>
