Re: Urgent : ORACLE AND VBA6.0

From: gchaoui <gchaoui_at_framfab.fr>
Date: Thu, 12 Oct 2000 10:43:03 +0200
Message-ID: <39E57997.888B1DB2@framfab.fr>

Did anybody encounter any of these problems connecting to Oracle via ASP or VB:

I am working in a project which involves Oracle & ASP. I wish to know if you've ever tried to connect to Oracle via ASP or if you know anybody who did so.

In fact, we must choose the bug-free solution betwwen those 3 :

1/ To connect via ODBC is a very tricky solution. 2/ via OleDB is really better but errors appear sometimes : ASP error 0115 (very frequent) or OLEDB error (2 or 3 errors of this type per day).
3/ via OO4O (Oracle Objects For OleDB) is the better solution but we've got the following error :

                OraOLEDB error '80004005'
                ORA-00020: maximum number of processes (50) exceeded
     What are processes and does that mean that an internet site with

ASP-Oracle has no chance to be viewed cause no more than 50 users can connect at the same time using OO4O?

     Do you know how to catch and insert a blob after a form is posted and without saving it to the disk in first place .. ??

Hope you could answer any of this question or confirm that you've experienced such troubles.

Cordially,

Ghazi.

Juan Miranda a écrit :

> You must hace Oracle - Objects installed in your PC. It is in all Oracle
> CD´s and in the web.
> There are a lot of code to talk to MicroStation. Forget it.
>
> ----------------------------
> Public msApp As Object
> Public DGN As Object
> Public Nodo As String
> Public OraSession As Object
> Public OraDatabase As Object
> Public OraDynaset As Object
> Dim PuedeDesh As Boolean
> Dim ID_UI As Single
>
> ---------------------------------
> Private Sub cmdCAJA_Click()
> On Error GoTo LBLERROR
>
> Dim point As Object
> Dim point1 As Object
> Set point = msApp.mbepoint
> Set point1 = msApp.mbepoint
>
> Dim view%, status%
> Dim Color As Integer
> Dim Style As Integer
> Dim Weight As Integer
> Dim Angle As Integer
>
> 'Meto datos en la base de datos:
>
> ID_UI = ID_UI + 1
> OraDatabase.ExecuteSQL ("Insert into UIS (TIPO_A, TIPO_O, TIPO_N, TIPO_B,
> NODO, ID_TABLA) values (" & txtA.Text & ", " & txtO.Text & ", " & txtN.Text
> & ", " & txtB.Text & ", " & CStr(Nodo) & "," & ID_UI & ")")
>
> Fin:
> 'Muestra mesajes de mst
> msApp.MbeState.errorMessages = 1
> msApp.MbeState.messages = 1
>
> msApp.MbeSendReset
> msApp.MbeStartDefaultCommand
>
> Exit Sub
> LBLERROR:
> Call Error(" en el procedimiento : cmdCaja_Click Módulo: frmTablas")
> End Sub
> --------------------------------
>
> Private Sub form_load()
> On Error GoTo LBLERROR
>
> Dim point As Object
> Dim point1 As Object
> Set msApp = CreateObject("MicroStation.Application")
> Set point = msApp.mbepoint
> Set point1 = msApp.mbepoint
> Dim newScale As Object
> Set newScale = msApp.mbepoint
> Set DGN = msApp.activedocument
> PuedeDesh = False
>
> 'Set OraSession = CreateObject("OracleInProcServer.XOraSession")
> 'Set OraDatabase = OraSession.OpenDatabase("gal", "siren28r/siren28r", 0&)
> Set OraSession = Nothing
> Set OraDatabase = Nothing
>
> Dim Usuario As String, Contraseña As String, Instancia As String
> Usuario = oracleUSER
> Contraseña = USERPASSWD
> Instancia = INSTANCE_NAME
> If Usuario = "" Or Contraseña = "" Or Instancia = "" Then
> MsgBox ("Fichero ini incorrecto")
> End
> End If
> 'MsgBox ("Conectar con Oracle; " & Usuario & "\********\" & Instancia)
> Set OraSession = CreateObject("OracleInProcServer.XOraSession")
> Set OraDatabase = OraSession.OpenDatabase(Instancia, Usuario & "/" &
> Contraseña, 0&)
> 'MsgBox ("Conexion correcta")
> BarraHerramientas.BarraConexion.BackColor = &HFF00&
>
> Nodo = Left(DGN.Name, Len(DGN.Name) - 4)
>
> Exit Sub
> LBLERROR:
> Call Error(" en el procedimiento : Form_load Módulo: frmTablas")
> End Sub
> ----------------------------------------------
>
> Brice.Butzerin <Brice.Butzerin_at_wanadoo.fr> escribió en el mensaje de
> noticias 8s27s4$clf$1_at_wanadoo.fr...
> > Hello
> > My question is : How to write in a table from Oracle with VBA?. It is
> > compatible? What is the instruction for this? What DLL must I use for it?
> > Must I use a instruction SQLserveur
> > Thanks
> > alouette50_at_wanadoo.fr
> >
> >
> >
> >
Received on Thu Oct 12 2000 - 03:43:03 CDT