PC Review


Reply
 
 
mu
Guest
Posts: n/a
 
      12th Dec 2003
I want with VB6.0 and ADO a connection to a IBM AS400 -
Database.
The following statements create an runtime-error.
Dim conn As New Connection
Dim cmd As New ADODB.Command
Dim rec As New ADODB.Recordset

conn.ConnectionTimeout = 30
conn.Open "Provider=IBM AS400 OLE DB Provider;Data
Source=heldat;" & _
"User ID=id;Password=pw;SSL=default;Transport
Product=Client Access"
Set cmd.ActiveConnection = conn
cmd.CommandText = "SELECT * FROM TABLE ORDER BY FIELD"
cmd.CommandType = adCmdText
Set rec = cmd.Execute

The execute-command create this error:
Runtime-error: 2147467259 (80004005)
CWBDB0001 - Verbindungskennung fehlgeschlagen beim Versuch,
Server anzusprechen (System HELDAT)

 
Reply With Quote
 
 
 
 
Cor
Guest
Posts: n/a
 
      12th Dec 2003
Hi mu,

This is a vb.net group, ado is not used normaly anymore in vb.net.

For vb classic you have a better change in one of the microsoft.public.vb *
newsgroups.

Cor

> I want with VB6.0 and ADO a connection to a IBM AS400 -
> Database.



 
Reply With Quote
Reply

Thread Tools
Rate This Thread
Rate This Thread:

Posting Rules
You may not post new threads
You may not post replies
You may not post attachments
You may not edit your posts

BB code is On
Smilies are On
[IMG] code is On
HTML code is Off
Trackbacks are On
Pingbacks are On
Refbacks are Off


Similar Threads
Thread Thread Starter Forum Replies Last Post
AS400 Joăo Santa Bárbara Microsoft Dot NET 2 11th May 2004 10:57 AM
SQL against AS400 R. Choate Microsoft Access Queries 4 7th Nov 2003 09:11 PM
AS400 Brad Allison Microsoft ADO .NET 2 23rd Oct 2003 01:43 PM
AS400 Through DAO? Kaney Microsoft Access External Data 3 30th Jul 2003 02:09 AM
AS400 DB2 G Microsoft ADO .NET 0 11th Jul 2003 12:41 PM


Features
 

Advertising
 

Newsgroups
 


All times are GMT +1. The time now is 11:04 AM.