Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

Aktuelle Themen

Administrator.de FeedbackApache ServerAppleAssemblerAudioAusbildungAuslandBackupBasicBatch & ShellBenchmarksBibliotheken & ToolkitsBlogsCloud-DiensteClusterCMSCPU, RAM, MainboardsCSSC und C++DatenbankenDatenschutzDebianDigitiales FernsehenDNSDrucker und ScannerDSL, VDSLE-BooksE-BusinessE-MailEntwicklungErkennung und -AbwehrExchange ServerFestplatten, SSD, RaidFirewallFlatratesGoogle AndroidGrafikGrafikkarten & MonitoreGroupwareHardwareHosting & HousingHTMLHumor (lol)Hyper-VIconsIDE & EditorenInformationsdiensteInstallationInstant MessagingInternetInternet DomäneniOSISDN & AnaloganschlüsseiTunesJavaJavaScriptKiXtartKVMLAN, WAN, WirelessLinuxLinux DesktopLinux NetzwerkLinux ToolsLinux UserverwaltungLizenzierungMac OS XMicrosoftMicrosoft OfficeMikroTik RouterOSMonitoringMultimediaMultimedia & ZubehörNetzwerkeNetzwerkgrundlagenNetzwerkmanagementNetzwerkprotokolleNotebook & ZubehörNovell NetwareOff TopicOpenOffice, LibreOfficeOutlook & MailPapierkorbPascal und DelphiPeripheriegerätePerlPHPPythonRechtliche FragenRedHat, CentOS, FedoraRouter & RoutingSambaSAN, NAS, DASSchriftartenSchulung & TrainingSEOServerServer-HardwareSicherheitSicherheits-ToolsSicherheitsgrundlagenSolarisSonstige SystemeSoziale NetzwerkeSpeicherkartenStudentenjobs & PraktikumSuche ProjektpartnerSuseSwitche und HubsTipps & TricksTK-Netze & GeräteUbuntuUMTS, EDGE & GPRSUtilitiesVB for ApplicationsVerschlüsselung & ZertifikateVideo & StreamingViren und TrojanerVirtualisierungVisual StudioVmwareVoice over IPWebbrowserWebentwicklungWeiterbildungWindows 7Windows 8Windows 10Windows InstallationWindows MobileWindows NetzwerkWindows ServerWindows SystemdateienWindows ToolsWindows UpdateWindows UserverwaltungWindows VistaWindows XPXenserverXMLZusammenarbeit
GELÖST

VB6 Zugriff auf Access 2003 Datenbank

Frage Entwicklung VB for Applications

Mitglied: corpse2001

corpse2001 (Level 1) - Jetzt verbinden

24.07.2007, aktualisiert 13:06 Uhr, 9301 Aufrufe, 4 Kommentare

Hallo,

ich habe mit Access 2003 eine datenbank angelegt und darin eine tabelle mit eigentlich nur einem Wert auf den ich aus einem makro aus outlook zugreifen will. der wert ist eine zahl die nach dem zugriff in einer variable geschieben wird und danach soll der wert in der Tabelle/Datenbank verändertwerden (immer +1).

kann mir jemand sagen wie das geht ich steh da nu aufm Schlauch

mfg
corpse2001
Mitglied: bastla
24.07.2007 um 10:49 Uhr
Hallo corpse2001!

Warum jetzt VB6?

Wie auch immer, versuch es so:
01.
Set cn = CreateObject("ADODB.Connection") 
02.
cn.Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=\\Server\Freigabe\db1.mdb") 
03.
Set rs = cn.Execute("SELECT Nummer.Nr FROM Nummer") 
04.
If Not rs.EOF Then 
05.
	NewNumber = rs.Fields("Nr") 
06.
	NewNumber = NewNumber + 1 
07.
	Set rs = cn.Execute("UPDATE Nummer SET Nummer.Nr = " & NewNumber) 
08.
	MsgBox NewNumber 
09.
Else 
10.
	'Nr konnte nicht gelesen werden 
11.
End If 
12.
cn.Close
Mit dem obigen Code wird auf die "db1.mdb", gespeichert auf "\\Server\Freigabe", zugegriffen.

Wenn sich die gesuchte Ticketnummer im Feld "Nr" des ersten Datensatzes der Tabelle "Nummer" befindet, wird diese gelesen und um 1 erhöht wieder zurückgeschrieben. Die neue Nummer steht in der Variablen "NewNumber" zur Verfügung.

Grüße
bastla
Bitte warten ..
Mitglied: corpse2001
24.07.2007 um 12:54 Uhr
hallo

danke für die antwort ich probier das gleich mal aus.

das war doch vorher auch VB6 steht jedenfall unter Info (Microsoft Visual Basic 6)

mfg corpse2001
Bitte warten ..
Mitglied: bastla
24.07.2007 um 13:03 Uhr
Hallo corpse2001!

Gemeinhin wird unter VB6 die eigenständige (also nicht als VBA an Office gebundene) Programmiersprache (Vorgänger von VB.NET) verstanden.

Grüße
bastla
Bitte warten ..
Mitglied: corpse2001
24.07.2007 um 13:06 Uhr
DANKE!!!

funktioniert wunderbar!
Bitte warten ..
Ähnliche Inhalte
Datenbanken
gelöst MS Access Datenbank (18)

Frage von endada zum Thema Datenbanken ...

Datenbanken
Access Datenbank wie am einfachsten Datensätze aufbereiten (5)

Frage von Dr.Cornwallis zum Thema Datenbanken ...

Datenbanken
Automatisierter täglicher Import einer Access Datenbank in SQL (5)

Frage von RichterS zum Thema Datenbanken ...

Microsoft Office
Access DB: ODBC-Verbindung zu Datenbank fehlgeschlagen (2)

Frage von potshock zum Thema Microsoft Office ...

Neue Wissensbeiträge
Windows 10

Windows 8.x oder 10 Lizenz-Key aus dem ROM auslesen mit Linux

(6)

Tipp von Lochkartenstanzer zum Thema Windows 10 ...

Tipps & Tricks

Wie Hackt man sich am besten in ein Computernetzwerk ein

(40)

Erfahrungsbericht von Herbrich19 zum Thema Tipps & Tricks ...

Heiß diskutierte Inhalte
Windows 10
gelöst Windows 10 Home "Netzlaufwerk nicht bereit" (19)

Frage von Oggy01 zum Thema Windows 10 ...

DNS
gelöst Komplette TLD Überschreiben bzw eigene Definieren (10)

Frage von Herbrich19 zum Thema DNS ...

Exchange Server
gelöst RU 17 Exchange 2010 . Erfahrungen? (10)

Frage von keine-ahnung zum Thema Exchange Server ...

Datenbanken
gelöst MySQL Zeiterfassungs-Problematik (wer ist eingecheckt) (9)

Frage von NativeMode zum Thema Datenbanken ...