Solved

VB conduit Help!!!

Posted on 2004-04-28
4
388 Views
Last Modified: 2007-12-19

  My questio is simple, in my conduit when i try to open a database vb show a the follow error.

-2147024770 : Error de Automatización

  Heres is the vb code

On Error GoTo Err
Dim FileNum As Integer
Dim FirstTime As Boolean
 
Dim pDbQuery As New PDDatabaseQuery
Dim pDataSampleDB As PDRecordAdapter

' Declare the record header and data
Dim nIndex As Long
Dim vUniqueId As Variant
Dim nCategory As Long
Dim eAttributes As ERecordAttributes
Dim vData As Variant

Dim CurrRec As tAFSampleTableRecord
Dim RecOffset As Long

  FileNum = FreeFile
  Open App.Path & "\AFDataSample.txt" For Output As #FileNum
 
 'The follow line make the error  
Set pDataSampleDB = pDbQuery.OpenRecordDatabase("AFSampleTable", "PDDirect.PDRecordAdapter", eRead Or eWrite)

any idea?
 
0
Comment
Question by:Dany_mx
4 Comments
 
LVL 48

Expert Comment

by:Mikal613
ID: 10959119
Dim pDataSampleDB As New PDRecordAdapter
0
 

Author Comment

by:Dany_mx
ID: 11028613
I found the problem, i just change the type of proyect form activex dll to activex exe

0
 
LVL 1

Accepted Solution

by:
Computer101 earned 0 total points
ID: 11167043
PAQed, with points refunded (125)

Computer101
E-E Admin
0

Featured Post

Free Tool: Postgres Monitoring System

A PHP and Perl based system to collect and display usage statistics from PostgreSQL databases.

One of a set of tools we are providing to everyone as a way of saying thank you for being a part of the community.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

In this article we will discuss all things related to StageFright bug, the most vulnerable bug of android devices.
A short article about problems I had with the new location API and permissions in Marshmallow
Although Jacob Bernoulli (1654-1705) has been credited as the creator of "Binomial Distribution Table", Gottfried Leibniz (1646-1716) did his dissertation on the subject in 1666; Leibniz you may recall is the co-inventor of "Calculus" and beat Isaac…
Nobody understands Phishing better than an anti-spam company. That’s why we are providing Phishing Awareness Training to our customers. According to a report by Verizon, only 3% of targeted users report malicious emails to management. With compan…

809 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question