<?xml version="1.0" encoding="UTF-8"?>
<!-- generator="FeedCreator 1.8" -->
<?xml-stylesheet href="https://miguelangel.torresegea.es/wiki/lib/exe/css.php?s=feed" type="text/css"?>
<rdf:RDF
    xmlns="http://purl.org/rss/1.0/"
    xmlns:rdf="http://www.w3.org/1999/02/22-rdf-syntax-ns#"
    xmlns:slash="http://purl.org/rss/1.0/modules/slash/"
    xmlns:dc="http://purl.org/dc/elements/1.1/">
    <channel rdf:about="https://miguelangel.torresegea.es/wiki/feed.php">
        <title>miguel angel torres egea</title>
        <description></description>
        <link>https://miguelangel.torresegea.es/wiki/</link>
        <image rdf:resource="https://miguelangel.torresegea.es/wiki/_media/wiki:dokuwiki-128.png" />
       <dc:date>2026-05-23T16:53:31+00:00</dc:date>
        <items>
            <rdf:Seq>
                <rdf:li rdf:resource="https://miguelangel.torresegea.es/wiki/windows:prog:vbasic?rev=1509272124&amp;do=diff"/>
            </rdf:Seq>
        </items>
    </channel>
    <image rdf:about="https://miguelangel.torresegea.es/wiki/_media/wiki:dokuwiki-128.png">
        <title>miguel angel torres egea</title>
        <link>https://miguelangel.torresegea.es/wiki/</link>
        <url>https://miguelangel.torresegea.es/wiki/_media/wiki:dokuwiki-128.png</url>
    </image>
    <item rdf:about="https://miguelangel.torresegea.es/wiki/windows:prog:vbasic?rev=1509272124&amp;do=diff">
        <dc:format>text/html</dc:format>
        <dc:date>2017-10-29T10:15:24+00:00</dc:date>
        <dc:creator>Anonymous (anonymous@undisclosed.example.com)</dc:creator>
        <title>visual basic</title>
        <link>https://miguelangel.torresegea.es/wiki/windows:prog:vbasic?rev=1509272124&amp;do=diff</link>
        <description>visual basic

anotaciones de Núria Trias


Public Sub ConnectToAccess()
    Dim conn As New System.Data.OleDb.OleDbConnection()
    conn.ConnectionString = &amp; _ &quot;Provider=Microsoft.Jet.OLEDB.4.0;Data source=&quot; &amp; _ &quot;C:\Documents and Settings\username\My Documents\dbFile.mdb&quot;
    Try
        conn.Open()
    Catch ex As Exception
        MessageBox.Show(&quot;Failed to connect to data source&quot;)
    Finally
        conn.close()
    End Try
End Sub</description>
    </item>
</rdf:RDF>
