Top-Themen

Aktuelle Themen (A bis Z)

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

Mitglied: corpse2001

corpse2001 (Level 1) - Jetzt verbinden

24.07.2007, aktualisiert 13:06 Uhr, 9334 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
Microsoft Office

Access-Datenbank zur Dokumentation von AGDLP

gelöst Frage von perpendicularMicrosoft Office5 Kommentare

Hallo Leute! Wie der Titel bereits aussagt möchte ich eine Datenbank (Access 2010) erstellen, um die Dokumentation unserer AGDLP-Struktur ...

Datenbanken

Zwei Access Datenbanken zusammenführen

Frage von geocastDatenbanken5 Kommentare

Hallo Zusammen Ich habe hier zwei Accessdatenbanken von einer internen Betriebssoftware. Vom Aufbau her sind sie Identisch, nur eben ...

Microsoft Office

Dateianhänge in einer Access-Datenbank "aktualisieren"

Frage von schrodtiMicrosoft Office3 Kommentare

Hallo Admins, bin jetzt nicht sooo der Access-Crack, habe dennoch eine kleine Datenbank erstellt (Wozu man kein Künstler sein ...

Datenbanken

MS Access Datenbank

gelöst Frage von endadaDatenbanken18 Kommentare

Hey alle zusammen, ich habe folgendes Problem: Ich versuche eine Datenbank mit Access zu erstellen, die wie im Screenshot ...

Neue Wissensbeiträge
Windows 10

USB Maus und Tastatur versagen Dienst unter Windows 10

Erfahrungsbericht von hardykopff vor 17 StundenWindows 103 Kommentare

Da steht man ziemlich dumm da, wenn der PC sich wegen fehlender USB Tastatur und Maus nicht bedienen lässt. ...

Administrator.de Feedback
Update der Seite: Alles zentriert
Information von Frank vor 20 StundenAdministrator.de Feedback14 Kommentare

Hallo User, die größte Änderung von Release 5.8 ist das Zentrieren der Webseite (auf großen Bildschirmen) und ein "Welcome"-Teaser ...

Humor (lol)

WhatsApp-Nachrichten endlich auch per Bluetooth versendbar

Information von BassFishFox vor 1 TagHumor (lol)4 Kommentare

Genau darauf habe ich gewartet! ;-) Der beliebte Messaging-Dienst WhatsApp erhält eine praktische neue Funktion: Ab dem nächsten Update ...

Google Android

Googles "Android Enterprise Recommended" für Unternehmen

Information von kgborn vor 2 TagenGoogle Android3 Kommentare

Hier eine Information, die für Administratoren und Verantwortliche in Unternehmen, die für die Beschaffung und das Rollout von Android-Geräten ...

Heiß diskutierte Inhalte
Server Hardware
Welche Rolle spielt Design bei Enterprise IT Hardware?
Frage von ApolloXServer Hardware17 Kommentare

Ich arbeite für einen internationalen Elektronikhersteller in der Forschung und meine Aufgabe ist es, Feedback von Nutzern in Hinsicht ...

Windows Network
WSUS4 und Windows 10 Updates automatisch installieren
Frage von sammy65Windows Network15 Kommentare

Hallo miteinander, ich habe mit einen neuen WSUS Server aufgesetzt Server 2016 darauf einen aktuellen WSUS. Grund, wir stellen ...

Memory Cards
Vergessliche USB-Sticks?
Frage von hanheikMemory Cards14 Kommentare

Ich habe in den letzten Tagen 500 USB-Sticks mit Bilddateien bespielt. Obwohl ich die Dateien mit größter Sorgfalt kopiert ...

Hyper-V
Hyper-V mit altem XEON-Server. Was ist falsch?
Frage von LollipopHyper-V11 Kommentare

Hallo Bin etwas frustriert. Kleinbetrieb, ca. 15 PC's, 2 Stk. Server mit einigen virtuellen PC's für Fernwartung, VaultServer für ...