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, 9285 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

Mit freundlichen Grüßen
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)

Mit freundlichen Grüßen 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 ..
Neuester Wissensbeitrag
CPU, RAM, Mainboards

Angetestet: PC Engines APU 3a2 im Rack-Gehäuse

(1)

Erfahrungsbericht von ashnod zum Thema CPU, RAM, Mainboards ...

Ähnliche Inhalte
SAN, NAS, DAS
gelöst Access Datenbank auf einer (Synology) NAS? (4)

Frage von garack zum Thema SAN, NAS, DAS ...

Datenbanken
Kein Zugriff auf Inhalte der Tabellen in Datenbank (5)

Frage von Server2503 zum Thema Datenbanken ...

Datenbanken
Access Datenbank mit Rechnungen und Summenbildung möglich? (1)

Frage von Stefan007 zum Thema Datenbanken ...

Heiß diskutierte Inhalte
Switche und Hubs
Trunk für 2xCisco Switch. Wo liegt der Fehler? (13)

Frage von JayyyH zum Thema Switche und Hubs ...

DSL, VDSL
DSL-Signal bewerten (13)

Frage von SarekHL zum Thema DSL, VDSL ...

Windows Server
Mailserver auf Windows Server 2012 (9)

Frage von StefanT81 zum Thema Windows Server ...