<?xml version="1.0"?>
<feed xmlns="http://www.w3.org/2005/Atom" xml:lang="en">
	<id>https://pickwiki.org/index.php?action=history&amp;feed=atom&amp;title=VBOleDbConnection</id>
	<title>VBOleDbConnection - Revision history</title>
	<link rel="self" type="application/atom+xml" href="https://pickwiki.org/index.php?action=history&amp;feed=atom&amp;title=VBOleDbConnection"/>
	<link rel="alternate" type="text/html" href="https://pickwiki.org/index.php?title=VBOleDbConnection&amp;action=history"/>
	<updated>2026-04-28T23:40:32Z</updated>
	<subtitle>Revision history for this page on the wiki</subtitle>
	<generator>MediaWiki 1.43.0</generator>
	<entry>
		<id>https://pickwiki.org/index.php?title=VBOleDbConnection&amp;diff=2421&amp;oldid=prev</id>
		<title>Conversion script: link fix</title>
		<link rel="alternate" type="text/html" href="https://pickwiki.org/index.php?title=VBOleDbConnection&amp;diff=2421&amp;oldid=prev"/>
		<updated>2015-02-26T23:48:56Z</updated>

		<summary type="html">&lt;p&gt;link fix&lt;/p&gt;
&lt;p&gt;&lt;b&gt;New page&lt;/b&gt;&lt;/p&gt;&lt;div&gt;Here is a simple VB procedure that shows the OLE connection string needed for [[UniData]] connection (you will need to have the Unidata OLE DB client software loaded on your PC)&lt;br /&gt;
&lt;br /&gt;
&amp;lt;pre&amp;gt;&lt;br /&gt;
Sub [[Test_OLE_Connection]]()&lt;br /&gt;
    Dim cnnConnection&lt;br /&gt;
    Dim rstTable&lt;br /&gt;
    Dim strCommand&lt;br /&gt;
    Dim strConnect&lt;br /&gt;
&lt;br /&gt;
    Set cnnConnection = [[CreateObject]](&amp;quot;ADODB.Connection&amp;quot;)&lt;br /&gt;
    Set rstTable = [[CreateObject]](&amp;quot;ADODB.Recordset&amp;quot;)&lt;br /&gt;
&lt;br /&gt;
    strConnect = &amp;quot;Provider=Informix.[[UniOLEDB]].1;Password=&amp;lt;password&amp;gt;;User ID=&amp;lt;logon ID&amp;gt;;Data Source=&amp;lt;database name in uci.config&amp;gt;&amp;quot;&lt;br /&gt;
   &lt;br /&gt;
    cnnConnection.Open strConnect&lt;br /&gt;
&lt;br /&gt;
    &amp;#039;Sample SQL command&lt;br /&gt;
    strCommand = &amp;quot;select * from &amp;lt;file name&amp;gt; where ID = &amp;#039;&amp;lt;ID&amp;gt;&amp;#039;&amp;quot;&lt;br /&gt;
&lt;br /&gt;
    rstTable.Open strCommand, cnnConnection, , , 0&lt;br /&gt;
&lt;br /&gt;
    &amp;#039;rest of your code here&lt;br /&gt;
&lt;br /&gt;
End Sub&lt;br /&gt;
&amp;lt;/pre&amp;gt;&lt;/div&gt;</summary>
		<author><name>Conversion script</name></author>
	</entry>
</feed>