Mike Mattys
mmattys at rochester.rr.com
Tue Jun 23 09:44:16 CDT 2009
Obviously, I don't really know this stuff, but it is really interesting. I wonder if DDE is simply diving into the message stream in the same way that COM has a somewhat eager look-ahead registry resolution of types, etc - the same thing the happens in Visual Studio'sError List/Warnings/Messages window. Hmm. I'm going to have to look into this when I get some time. - Michael R Mattys MapPoint and Database Dev www.mattysconsulting.com - ----- Original Message ----- From: "jwcolby" <jwcolby at colbyconsulting.com> To: "Access Developers discussion and problem solving" <accessd at databaseadvisors.com> Sent: Tuesday, June 23, 2009 10:15 AM Subject: [AccessD] What is this? >I just found code that does the TransferText in a completely different way. >I have never seen a > text control use these properties and methods. Is this something new in > 2007 or does this go back > to some previous version? What is the advantage of this over the normal > TransferText? > > http://support.microsoft.com/kb/113905 > > Sub Command1_Click () > Dim cmd As String ' Holds DDEExecute command. > On Error GoTo DDEerr ' Error trap. > > ' Make sure there isn't an existing DDE conversation: > text1.LinkMode = 0 > > ' Set up the DDE link: > text1.LinkTopic = "MSACCESS|C:\ACCESS\NWIND.MDB" > text1.LinkItem = "All" > text1.LinkMode = 2 > > ' DDEExecute command to import text file into Microsoft Access > Table: > cmd = "[TransferText ,,'Shippers','C:\ACCESS\SHIPPERS.TXT']" > > ' Execute the TransferText command and close the DDE link: > text1.LinkExecute cmd > text1.LinkMode = 0 > MsgBox "Transfer OK" > Exit Sub > > DDEerr: > ' An error has occurred. > MsgBox Error > MsgBox "Error in transfer." > Exit Sub > End Sub > > > -- > John W. Colby > www.ColbyConsulting.com > -- > AccessD mailing list > AccessD at databaseadvisors.com > http://databaseadvisors.com/mailman/listinfo/accessd > Website: http://www.databaseadvisors.com