[Excel-VB] addins installeren

Pagina: 1
Acties:

  • Maasluip
  • Registratie: April 2002
  • Laatst online: 13:05

Maasluip

Kabbelend watertje

Topicstarter
Nu heb ik op het werk een nieuwe PC met XP gekregen. Voorheen had ik NT. Ik heb hiermee in Excel en VBA een paar leuke applicaties gemaakt die vanuit excel direct een query uitvoeren in een databank (Oracle, via ODBC).

Om maar even wild een lap code te posten, dit is wat ik doe:
Visual Basic:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
'PURPOSE:
'   open a table from Oracle and put the output in a temproary worksheet
'PARAMETERS:
'   sConnStr        IN  connect string for ODBC
'   sQuerySelect    IN  query to be executed
'   lRows           OUT number of rows from query
'   lColumns        OUT number of columns from query
Sub ImportDataFromOracle(sConnStr As String, sQuerySelect As String, lRows As Long, lColumns As Long)

    Dim wrkODBC As Workspace
    Dim conPubs As Connection
    Dim rstTemp As Recordset

    'Call MsgBox("Opening ODBC Connection")
    ' Open Microsoft Jet and ODBCDirect workspaces, Microsoft Jet database, and ODBCDirect connection.
    Set wrkODBC = CreateWorkspace("", "admin", "", dbUseODBC)
    Set conPubs = wrkODBC.OpenConnection("", , , sConnStr)

    'Call MsgBox("Running Query")
    Set rstTemp = conPubs.OpenRecordset(sQuerySelect, dbOpenDynamic)
    OpenRecordsetOutput rstTemp
    
    lColumns = rstTemp.Fields.Count
    lRows = rstTemp.RecordCount + 1
    
    rstTemp.Close
    conPubs.Close
    wrkODBC.Close

End Sub

Nu werkt dit niet meer op mijn nieuwe PC, hij loopt de mist in op wrkODBC.OpenConnection. Dat komt zeer waarschijnlijk omdat ik op mijn NT PC in de Visual Basic editor onder Add-Ins -> Add-In Manager een hele lijst met addins had. Nu met XP staat er helemaal niks. Commentaar van de helpdesk was 'jah, weet ik ook niet wat je allemaal had en hoe ik dat moet installeren' 8)7

Zijn dit de DAO-en die geinstalleerd moeten worden?

Signatures zijn voor boomers.


  • Boss
  • Registratie: September 1999
  • Laatst online: 09:19

Boss

+1 Overgewaardeerd

En als je kijkt bij Tools -> References? Kan je daar nog wat dingen aanvinken?

Heb je wel dezelfde oracle installatie als eerst?

The process of preparing programs for a digital computer is especially attractive, not only because it can be economically and scientifically rewarding, but also because it is an aesthetic experience much like composing poetry or music.


  • Maasluip
  • Registratie: April 2002
  • Laatst online: 13:05

Maasluip

Kabbelend watertje

Topicstarter
Boss schreef op 26 januari 2004 @ 15:57:
En als je kijkt bij Tools -> References? Kan je daar nog wat dingen aanvinken?
He, 8)7 8)7 8)7 ik zat bij in het verkeerde menu te kijken.
Heb je wel dezelfde oracle installatie als eerst?
Ja, we hebben dan wel een andere Oracle (9.0 i.p.v. 7.3) maar we zijn van de Oracle ODBC dll naar de Microsoft-for-oracle ODBC dll gegaan. Blijkbaar is die laatste de hoofdschuldige, want toen ik weer de ODBC link via de Oracle dll liet lopen ging het weer.

Maar ik was me blind aan het staren op die Add-ins... Bedankt voor het in de goede richting sturen.

Nu alleen nog zien uit te vissen hoe ik het met de Microsoft Oracle for ODBC verbinding aan het werk krijg. Met Access is die verbinding namelijk dramatisch veel sneller als de Oracle ODBC verbinding.

Signatures zijn voor boomers.