Sql Uzerınde Makro İle veri Alma

[Kemal Demir]

Arkadaslar İyi akşamlar,

Uzun Zamandır aranızda yokum sorumu sormakta bile cekindim.
"Yardımcı olamayan bır ınsan nasıl yardım ısteyebilirki"

Bir konuda yardımcı olabilirmsiniz arkadaslar.

Makro Kaydedici ile,

Kaydettiğim kod zannedersem satır sayısının fazlalıgından olacak ki

Aşagıdaki kodda hata veriyor.

.CommandText = Array( _
        "SELECT SampleR6332.InterviewNumber, SampleR6332.ResponseCode, SampleR6332.Status, SampleR6332.SuspendImage, SampleR6332.NumberOfContacts, SampleR6332.ID, SampleR6332.Email, SampleR6332.ContactTime, Sa" _
        , _
        "mpleQ6332.Channel, SampleR6332.InitialChannel, SampleR6332.SystemData, SampleR6332.AppointmentTime, SampleR6332.AppointmentName, SampleR6332.TelephoneNumber, SampleR6332.InterviewerNumber, SampleR6332" _
        , _
        ".TargetInterviewer, SampleR6332.ShowDisplayFields, SampleR6332.DisplayField1, SampleR6332.DisplayField2, SampleR6332.DisplayField3, SampleR6332.DisplayField4, SampleR6332.ShowSecondPhoneNumber, Sample" _
        , _
        "Q6332.Indicator2ndNumber, SampleR6332.SecondPhoneNumber, SampleR6332.TimeDifference, SampleR6332.GroupID, SampleR6332.CallIntervalBegin, SampleR6332.CallIntervalEnd, SampleR6332.Language, SampleR6332." _
        , _
        "txtKota, SampleR6332.Adres, SampleR6332.ILCE, SampleR6332.IL, SampleR6332.FAX, SampleR6332.SIRANO, SampleR6332.kotaILNetwork, SampleR6332.kotaILCalican, SampleR6332.SIRALAMA"&chr(13)&""&chr(10)&"FROM NIPOFieldworkSystem." _
        ,)

Yukarıdaki Kod'un calisması için ne yapabilirirz arakadaslar.

Teşekkur Ederim