Oracle Long Binary Data

[Pfotis]

Καλησπέρα,
θα ήθελα να κάνω μία ερώτηση.... ανοίγω μία βάση δεδομένων Oracle (που δεν δημιούργησα εγώ) και σ' ένα πεδίο γράφει Long Binary Data. Πώς μπορώ να δώ αυτό το πεδίο τι περιέχει;;;;

Ευχαριστώ πολύ!

[cordis]

κώδικας:

CREATE or REPLACE function Find_Value    ( av_owner varchar2, av_cname varchar2) RETURN varchar2 IS    long_var LONG; BEGIN    SELECT SEARCH_CONDITION INTO long_var    FROM ALL_CONSTRAINTS    WHERE owner = av_owner    AND constraint_name = av_cname;    return long_var; END;

κώδικας:

SELECT owner, constraint_name, Find_Value(owner, constraint_name) FROM ALL_CONSTRAINTS;

περισσότερα στο: http://www.techonthenet.com/oracle/questions/long_value.htm

_________________
Δεν απαντάω σε προσωπικά μηνύματα με ερωτήσεις που καλύπτονται από τις ενότητες του forum. Για ο,τι άλλο είμαι εδώ για εσάς.
- follow me @twitter

[Pfotis]

Ευχαριστώ πολύ για την άμεση απάντηση.

Αν θέλω τον κώδικα να τον γράψω σε Visual Basic γνωρίζεις τον τρόπο;

το field είναι το aday
και το table είναι era_record

και πάλι ευχαριστώ!!!

[makis]

φίλε... ένα select είναι... όπως βάζεις τα άλλα select θα βάλεις και αυτό... απλά πρώτα τα πρέπει να φτιάζεις μια αντίστοιχη Find_Value function...

[Pfotis]

Δυστυχώς όσο και αν προσπάθησα δεν τα κατάφερα. Μήπως αυτή την κλήση που κάνει στη Function "Find_Value" η Visual Basic δεν μπορεί να την "καταλάβει";
Αφού έγραψα τον κώδικα αυτό που κάνει είναι να δημνιουργήσει ένα table στην βάση δεδομένων long_var και δεν κάνει τίποτε άλλο. Μήπως πρέπει να μορφοποιήσω τον κώδικα στην Visual Basic;;;;

Ευχαριστώ για το χρόνο σας!!!

[cordis]

γράψε μου εδώ πως θα έκανες το select αν η στήλη δεν ήταν long, αλλά varchar2 για να μπορέσω να σου εξηγήσω τι πρέπει να κάνεις...

_________________
Δεν απαντάω σε προσωπικά μηνύματα με ερωτήσεις που καλύπτονται από τις ενότητες του forum. Για ο,τι άλλο είμαι εδώ για εσάς.
- follow me @twitter

[Pfotis]

Ευχαριστώ πολύ για το ενδιαφέρον σου

Έγραψα τα εξής.....

Private Sub Command1_Click()

Dim rsAdo As ADODB.Recordset
Dim strSQL As String

Set cnAdo = New ADODB.Connection
Set rsAdo = New ADODB.Recordset


cnAdo.Open "Provider= Microsoft .Jet.OLEDB.4.0;Data Source=D:\Program Files\Work\SCH\Prog.sch;Persist Security Info=False"

rsAdo.CursorType = adOpenStatic
rsAdo.LockType = adLockOptimistic
rsAdo.CursorLocation = adUseClient

strSQL = "SELECT pbx, date, find_value(pbx, date) FROM era_record"

rsAdo.Open strSQL, cnAdo


Set Form1.DataGrid1.DataSource = rsAdo

Set Adodc1.Recordset = rsAdo

Set DataGrid1.DataSource = Adodc1

End Sub



Function Find_Value(av_pbx As Integer, av_date As Date) As String

Dim long_var As Long
Dim rsAdo2 As ADODB.Recordset
Dim strSQL2 As String

Set rsAdo2 = New ADODB.Recordset

strSQL2 = "SELECT Agentday INTO TEST From era_SchagentDayrecord"
Find_Value = TEST
rsAdo2.Open strSQL2, cnAdo
End Function

και μου βγάζει "undefined function find_Value"

[cordis]

οχι βρε συ...
η find_value είναι function που θα βάλεις στην ORACLE όχι στην VB...

_________________
Δεν απαντάω σε προσωπικά μηνύματα με ερωτήσεις που καλύπτονται από τις ενότητες του forum. Για ο,τι άλλο είμαι εδώ για εσάς.
- follow me @twitter

[Pfotis]

Πάλι εγώ!!!
Sorry αν σε κούρασα αλλά επειδή προσπαθώ να βγάλω άκρη και δεν γνωρίζω αρκετά πράγματα θα ήθελα την βοήθεια σου
Έκανα αυτά που μου έγραψες και στο πεδίο που πρίν έγραφε <Binary> που το type του είναι Long raw εμφάνισε "02000000010000000000000000B9E2405555555512B9E2401700000000". Επειδή όπως σου έγραψα την βάση δεν την δημιούργησα εγώ πρέπει να καταλάβω κάτι από αυτό το νούμερο ή είναι κωδικοποιημένο και πρέπει να το εμφανίσω με κάποιο άλλο εργαλείο (αυτό το πεδίο το εμφανίζω σε Grid)

Και πάλι ευχαριστώ!!!!!