>EXECSCRIPT("APPEND PROCEDURES FROM ...") >Here's an example:
Imports System Imports System.Data Imports System.Data.OleDb Module Module1 Sub Main() Try Dim cn1 As New OleDbConnection( _ "Provider=VFPOLEDB.1;Data Source=C:\Program Files\Microsoft Visual FoxPro 9\Samples\Northwind\Northwind.dbc;") cn1.Open() '-- C:\HelloWorld.txt '-- Procedure(HelloWorld) '-- Return "Hello World" '-- EndProc() Dim cmd1 As New OleDbCommand( _ "ExecScript('Append Procedures From C:\HelloWorld.txt')", cn1) cmd1.ExecuteNonQuery() Dim cmd2 As New OleDbCommand("HelloWorld()", cn1) Dim val1 As String = cmd2.ExecuteScalar() MsgBox(val1.ToString()) cn1.Close() Catch e As Exception MsgBox(e.ToString()) End Try End Sub End ModuleThanks Alexy for all your help. (Now I'm off to answer a newsgroup question.)