Du bist nicht angemeldet.

vba2010

Registrierter Benutzer

  • »vba2010« ist der Autor dieses Themas

Beiträge: 12

Dabei seit: 17. August 2010

  • Private Nachricht senden

1

Dienstag, 7. September 2010, 12:55

[Outlook] Daten aus Datenbank lesen

Hey,
ich versuche:
Ein Makro für Outlook zu schreiben das mir Adressdaten aus einer MySql Datenbank in einer Liste darstellt, später möchte ich diese Daten noch bearbeiten können bzw. neue hinzufügen.

Momentan versuche ich die Verbindung zur Datenbank herzustellen, aber irgendwie will Outlook nicht so wie ich will.

Code:

Visual Basic Quellcode

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
Sub Database_Query_Click()
	Set condb = New ADODB.Connection
	condb.Open "DRIVER=MySQL ODBC 3.51 Driver; SERVER=localhost; DATABASE=test;USER=root;PASSWORD=;"
	Dim rec As ADODB.Recordset
	Set rec = New ADODB.Recordset
	rec.CursorLocation = adUseClient
	rec.Open "SELECT * FROM `table`", condb, adOpenForwardOnly, adLockReadOnly
	
	rec.MoveFirst
	While Not rec.EOF
    	ComboBox1.AddItem (rec.Fields(0))
    	rec.MoveNext
	Wend
	
	condb.Close
End Sub


Bei Google habe ich einige Sachen zu "vba und mysql" gefunden, aber so wircklich weiter hat mich das nicht gebracht.
Kann mir jemand helfen?

Grüße,
vba2010

jvbsl

Noob

  • »jvbsl« ist männlich

Beiträge: 7 206

Dabei seit: 7. April 2010

Hilfreich-Bewertungen: 397

  • Private Nachricht senden

2

Dienstag, 7. September 2010, 12:57

und was genau will nicht so wie du willst? Bekommst du denn keine Fehlermeldung? Wird nichts in die ComboBox geschrieben, oder wird es einfach nur falsch in die ComboBox geschrieben?
Ich wollte auch mal ne total überflüssige Signatur:
---Leer---

vba2010

Registrierter Benutzer

  • »vba2010« ist der Autor dieses Themas

Beiträge: 12

Dabei seit: 17. August 2010

  • Private Nachricht senden

3

Dienstag, 7. September 2010, 13:07

Ich bekomme keine Fehlermeldung und es wird nichts in die Box geschrieben.

Edit:
Das Problem war die DB! Er liefert mir jetzt auf Knopfdruck die gewollten Ergebnisse. :)

Jetzt muss ich nur noch herausfinden wie ich hier jetzt neue Einträge hinzufügen, ändern und entfernen kann.
Hat jemand Rat?

Grüße,
vba2010

Dieser Beitrag wurde bereits 2 mal editiert, zuletzt von »vba2010« (7. September 2010, 13:30)


vba2010

Registrierter Benutzer

  • »vba2010« ist der Autor dieses Themas

Beiträge: 12

Dabei seit: 17. August 2010

  • Private Nachricht senden

4

Dienstag, 7. September 2010, 16:12

Gibt es eine Möglichkeit meine Oberfläche, die ich im Makro erstelle, in Outlook einzubinden.
Also das es nicht als Extra Fenster geöffnet wird sonder eingebunden, wie z.B. die Linke Spalte(Email, Kalender, Kontakte,...)?

Grüße,
vba2010