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

Datei mit Inhalten aus Tabellenfeldern erstellen und unter bestimmten Namen u.Ort speichern bzw ersetzen.

Frage Microsoft Microsoft Office

Mitglied: svenac2010

svenac2010 (Level 1) - Jetzt verbinden

22.02.2012, aktualisiert 10:45 Uhr, 3033 Aufrufe, 2 Kommentare

Hallo,
ich kenne mich mit VBA unter Access soweit wie nicht aus, daher folgende Frage an euch.
Habe Access 2010 im Einsatz

Ich habe eine ini Datei, welche in einem bestimmten Verzeichnis liegt.
Diese Ini Datei soll per Access befüllt werden.

D.h. die Felder Defaultwebserver=XX.XXX.XXX.XXX
und
hdlnr=XXXXX

soll aus Acess heraus genommen werden, sobald in einem Formular ein entsprechendes Icon gedrückt wird
In dem Formular werden die Informationen bereits vorgeblendet.

Im Textfeld des Hauptformulars werden über den Steuerelementinhalt
Datensatzquelle [CROSS Betriebe].Betriebsnummer ( text52) soll = hdlnr=XXXXX

und dem Unterformular

Datensatzquelle Abfrage Server (IP Linux Server) soll=Defaultwebserver=XX.XXX.XXX.XXX

Ini Datei sieht wie folgt aus,
"
[Environment]
LDIR=C:\cross2
TSLDIR=%HOMEDRIVE%%HOMEPATH%\cross2
LANG=de_AT

[Settings]
LogPath=%LDIR%\logs
VersionFile=%LDIR%\version.ini
UpdateServer1=\\XXXX\DFS01$\zentral\ish\Standorte

log=1
schulicons=0
kts=1
ngs=1
Defaultwebserver=XX.XXX.XXX.XXX
notscheck=1
hdlnr=XXXXX
"

ich kann gerne eine Beispieldatei zu verfügung stellen.
Ich stelle mir das so vor.. beim Klick auf ein Icon X im unterformular soll eine Datei erzeugt werden, welche og.g. inhalte aus Access sich zieht und dann die Datei im vorgebenen Verzeichnis speicher/ersetzt.
Mitglied: 83928
22.02.2012 um 12:23 Uhr
Hi,

Ich stelle mir das so vor.. beim Klick auf ein Icon X im unterformular soll eine Datei erzeugt werden, welche og.g. inhalte aus
Access sich zieht und dann die Datei im vorgebenen Verzeichnis speicher/ersetzt.

Du kannst mit VBA auch direkt die ini-Datei bearbeiten (am besten mit Hilfe der Win-Api). Das Beispiel speichert auf Knopfdruck den "Defaultwebserver" (Feld1 in dem Formular) und den "hdlnr" (Feld2) in der ini-Datei (Sektion Settings).

Feldnamen und ini-Pfad musst Du natürlich noch anpassen
01.
Option Compare Database 
02.
Private Declare Function WritePrivateProfileString Lib "kernel32" _ 
03.
  Alias "WritePrivateProfileStringA" ( _ 
04.
  ByVal lpApplicationName As String, _ 
05.
  ByVal lpKeyName As Any, _ 
06.
  ByVal lpString As Any, _ 
07.
  ByVal lpFileName As String) As Long 
08.
 
09.
Private Sub Befehl4_Click() 
10.
Dim myIniFile As String 
11.
Dim val As String 
12.
  
13.
myIniFile = "c:\tmp\ini.ini" 
14.
val = Nz(Me!feld1) 
15.
WritePrivateProfileString "Settings", "Defaultwebserver", val, myIniFile 
16.
val = Nz(Me!feld2) 
17.
WritePrivateProfileString "Settings", "hdlnr", val, myIniFile 
18.
End Sub
Gruß
Bitte warten ..
Mitglied: svenac2010
22.02.2012 um 21:11 Uhr
Vielen dank für die Hilfe,

hat mir deutlich weiter geholfen.
Stehe jetzt nur noch vor dem Problem, dass bei doppelklick die o.g. Prozedur zwar ausgeführt wird, aber vorher ein Hinweis auf ein OLE Objekt kommt ( hatte eine Verlinkung auf ein OLE Bildobjekt in einer Tabelle gemacht)

Hierzu werde ich aber eine andere anfrage stellen
Bitte warten ..
Ähnliche Inhalte
Batch & Shell
gelöst Batch: alle Ordner mit einem bestimmten Namen kopieren (4)

Frage von Remsboys zum Thema Batch & Shell ...

Batch & Shell
gelöst Wie speichere ich von einer "Grundbatchdatei" einen bestimmten Wert? (5)

Frage von IchBins01000010 zum Thema Batch & Shell ...

Batch & Shell
gelöst Dateien nach Inhalt umbenennen (4)

Frage von Icemaniac zum Thema Batch & Shell ...

Neue Wissensbeiträge
Entwicklung

Exploit Development

Anleitung von burhanudinn123 zum Thema Entwicklung ...

Windows Update

Microsoft Update KB4034664 verursacht Probleme mit Multimonitor-Systemen

(1)

Tipp von beidermachtvongreyscull zum Thema Windows Update ...

Viren und Trojaner

CNC-Fräsen von MECANUMERIC werden (ggf.) mit Viren, Trojanern, Würmern ausgeliefert

(4)

Erfahrungsbericht von anteNope zum Thema Viren und Trojaner ...

Heiß diskutierte Inhalte
Router & Routing
gelöst Linksys wrt1200ac v2 mit dd-wrt: keine vlan-einstellungen im GUI (15)

Frage von Pixi123 zum Thema Router & Routing ...

Netzwerkprotokolle
Leiten "dumme" Switches VLAN-Tags mit durch? (14)

Frage von coltseavers zum Thema Netzwerkprotokolle ...

E-Business
Wo tragt ihr eure privaten Termine ein? (13)

Frage von honeybee zum Thema E-Business ...

Windows Server
Terminalserver starten willkürlich neu (12)

Frage von thaefliger zum Thema Windows Server ...