Hello... I'm trying to write a simple program for a class to pull data from a table and write it to a random file.. or text file.. but i keep getting that stupid error message "Object Variable or Block Variable not set" Here is my Code..
VB Code:
Option Explicit Private Type Customer CNumber As String FName As String LName As String Address As String City As String State As String Zip As Integer End Type Private Sub Form_Load() Dim x As Integer Dim Cust(4) As Customer Do While Not DataC1.Recordset.EOF Cust(x).FName = DataC1.Recordset!FName Cust(x).LName = DataC1.Recordset!LName Cust(x).Address = DataC1.Recordset!Address Cust(x).City = DataC1.Recordset!City Cust(x).State = DataC1.Recordset!State Cust(x).Zip = DataC1.Recordset!Zip Cust(x).CNumber = DataC1.Recordset!CNumber DataC1.Recordset.MoveNext x = x + 1 Loop Put #1, , Cust End Sub




Reply With Quote