Thanks - Part One - Re: Executing SP in VB6

From: "Sandro Yaqub Yusuf" <sandro(at)proservvi(dot)com(dot)br>
To: <pgsql-odbc(at)postgresql(dot)org>
Subject: Thanks - Part One - Re: Executing SP in VB6
Date: 2004-10-05 14:35:11
Message-ID: 002d01c4aae8$851e0c10$9414a8c0@proservvi.com.br
Views: Raw Message | Whole Thread | Download mbox | Resend email
Thread:
Lists: pgsql-odbc

Hello my dears friends,

Thanks for yours colaborations.

It´s here the part of solution about my problem with colaboration of
everbody that help me (Philippe Lang, Iain, Andrew Ayers, Rick Sivernell,
Corey W. Gibbs):

---------------------------------------------------------------------------------------------------------------------------------------

POSTGRESQL:

CREATE OR REPLACE FUNCTION sp_user_search(varchar)
RETURNS SETOF user AS
' select * from user where user = $1'
LANGUAGE 'sql' VOLATILE;

---------------------------------------------------------------------------------------------------------------------------------------

VISUAL BASIC 6 with ADO 2.8 without STORED PROCEDURE:

Dim adoBD As ADODB.Connection
Dim rsTB As New ADODB.Recordset

Set adoBD = New ADODB.Connection

adoBD.ConnectionString =
"driver=PostgreSQL};server=localhost;database=SICCEV;port=5432;uid=ryan;pwd=displace;"
adoBD.Open

Set rsTB = adoBD.Execute("select * from user where user = 'Sandro';")

Do While Not rsTB.EOF
MsgBox rsTB!Usuario

rsTB.MoveNext
Loop

rsTB.Close
adoBD.Close

RESULT OF EXECUTION: Sandro Yaqub Yusuf

---------------------------------------------------------------------------------------------------------------------------------------

VISUAL BASIC 6 with ADO 2.8 with STORED PROCEDURE:

Dim adoBD As ADODB.Connection
Dim rsTB As New ADODB.Recordset

Set adoBD = New ADODB.Connection

adoBD.ConnectionString =
"driver=PostgreSQL};server=localhost;database=SICCEV;port=5432;uid=ryan;pwd=displace;"
adoBD.Open

Set rsTB = adoBD.Execute("select sp_user_search('Sandro');")

Do While Not rsTB.EOF
MsgBox rsTB(0)

rsTB.MoveNext
Loop

rsTB.Close
adoBD.Close

RESULT OF EXECUTION: (1,Sandro,123,"Sandro Yaqub Yusuf")

---------------------------------------------------------------------------------------------------------------------------------------

The question is how I do for to isolate the columns when come
(1,Sandro,123,"Sandro Yaqub Yusuf"). I would like to get only the column
FULLNAME using the STORED PROCEDURE. Have I do a function in VB for to
isolate the RESULTS of STORED PROCEDURES in POSTGRESQL ?

Thanks more one times...

Sandroyy

In response to

Responses

Browse pgsql-odbc by date

  From Date Subject
Next Message Scot Loach 2004-10-05 14:44:07 Re: change to error result in SQLStatistics
Previous Message Dave Page 2004-10-05 14:32:01 Re: Access and PG ODBC problem