Re: uploading the contents of a spreadsheet

Thanks Randy,

I think that I will end up doing something along the lines that you suggest. It appears to be the best alternative. I am a little curious though, even if you have appropriate drivers for Oracle loaded on the client machine you also need the Oracle client loaded on the machine in order for a desktop application to connect to an Oracle server?

One final question are there any good online tutorials about using SQL plus? Since I probably going to end up using it at least for simple queries I might as well know how to use it effectively.

"Randy Harris" <randy_at_SpamFree.com> wrote in message news:%AEbe.693$Re7.480_at_newssvr31.news.prodigy.com...
> "Demetrius Sotiriades" <dsotiriades_at_wi.rr.com> wrote in message
> news:g1Ebe.32125$215.19608_at_tornado.rdc-kc.rr.com...
>> First I would like to thank everyone that replied. Unfortunately I am
>> working with 8i.
>>
>> Is it possible to connect a spreadsheet directly to the Oracle database
>> across the Internet, say with ODBC?
>
> Yes, definitely. You'll need an Oracle client installed on the
> workstation
> and you'll need to set a reference for a data aware library, such as ADO
> or
> DAO. It then becomes rather simple to issue DDL and DML commands in the
> database. There are a great many variations depending upon whether you're
> using ADO or DAO, which ODBC driver you choose and whether use a DSN or
> not.
>
> Here is an sample. It uses ADO, the Microsoft Oracle driver and no DSN.
>
> Option Explicit
>
> Private Sub GoToOracle()
>
> Const oracledb As String = "MYDB"
> Const dbuser As String = "myuser"
> Const dbpass As String = "mypasswd"
> Dim cn As New ADODB.Connection
> Dim rs As New ADODB.Recordset
>
> With cn
> .ConnectionTimeout = 30
> .CursorLocation = adUseClient
> .Provider = "MSDAORA"
> .Open "data source=" & oracledb & ";", dbuser, dbpass
> End With
>
> rs.Open "Select count(*) from Events", cn
> Debug.Print rs(0)
> rs.Close
>
> 'OR
>
> rs.Open "Select Field1 FROM Some_Table Where Something",cn
> While NOT rs.EOF
> Debug.Print rs("Field1")
> rs.MoveNext
> Wend
>
> 'OR
>
> Debug.Print cn.Execute ("Select count(*) from Events").GetString
>
> 'OR
>
> cn.Execute "Insert INTO..."
>
> End Sub
>
> http://www.carlprothman.net/Default.aspx?tabid=81
> Carl Prothman maintains an incredible library of connection strings (for
> darned near everything)
>
> HTH,
> Randy Harris
>
>
>
Received on Wed Apr 27 2005 - 21:50:28 CDT