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

Zeichen und Zahl in Access aus einer Spalte auslesen

Frage Microsoft

Mitglied: Kiwani

Kiwani (Level 1) - Jetzt verbinden

24.05.2011 um 13:07 Uhr, 4686 Aufrufe, 4 Kommentare

Hallo zusammen

Ich bearbeite grade Logfils und muss ich aus einer Spalte(URL) der Etwa so aussieht:

/suche/suchformular.html?&sessionid=BB278149056F591CD858995BFA908C9B&goto=ResultDisplay&lang=de&L=0&formtype=mixed&id=186&startsearch=true&sort=year_descending&js=yes&ip=xxx.xxx.xx.xx&hash=0bed9&goto=ResultDisplay&PHPSESSID=3317f11f17aa36247788f0fce3334bf1&listid=&useruid=0&hitsperpage=10&&ssoar=&showdocid=csa-sa-200610221&formtype=mixed&lang=de&L=0&pagecount=1

ich muss die IPs aus dem Link mit MS Access auslesen können.

ich habe versucht mit mehrere Access Funktion wie (Links(),....) , ist aber leider nicht möglich, weil die string Länge immer unterschiedlich vorkommt.

Bestimmt geht es mit einer vba Funktion, kenne ich mich aber leider net so tolle mit vba.

Bitte um Helfe.

lg
Kiwani
Mitglied: bastla
24.05.2011 um 13:22 Uhr
Hallo Kiwani!

Wenn die URL immer nach diesem Schema aufgebaut ist, könntest Du eine VBA-Function der Art
01.
Function GetIP(URL) 
02.
GetIP = Split(Split(URL, "ip=")(1), "&")(0) 
03.
End Function
dafür verwenden ...

Es wird zunächst der gesamte String anhand von "ip=" geteilt und mit dem Index 1 der zweite entstehende Teil weiter verwendet. Dieser Teil wird nochmals (dieses Mal anhand von "&") gesplittet und daraus der erste Teil (Index 0) als Ergebnis zurückgegeben. Dabei wird vorausgesetzt (und daher derzeit nicht überprüft), dass tatsächlich "ip=" im Parameter URL enthalten ist ...

Grüße
bastla
Bitte warten ..
Mitglied: Kiwani
24.05.2011 um 14:08 Uhr
Vielen herzlichen Dank,


also die Abfrage öffnet sich und zeigt die IPs und gleich zeitig kommt die Fehlermeldung:
Laufzeitfehler '9'
Index außerhalb des gültien Bereich.

Anscheinend sind noch welche ohne IPs, oder?
Bitte warten ..
Mitglied: bastla
24.05.2011 um 14:48 Uhr
Hallo Kiwani!
Anscheinend sind noch welche ohne IPs, oder?
Versuch es damit:
01.
Function GetIP(URL) 
02.
Delim1 = "ip=" 
03.
Delim2 = "&" 
04.
If InStr(URL, Delim1) > 0 Then 
05.
    GetIP = Split(Split(URL, Delim1)(1), Delim2)(0) 
06.
Else 
07.
    GetIP = "Keine IP gefunden" 
08.
End Function
Zu beachten wäre übrigens, dass bei der Suche nach "ip=" Groß-/Kleinschreibung unterschieden wird ...

Grüße
bastla
Bitte warten ..
Mitglied: Kiwani
24.05.2011 um 14:54 Uhr
Funktioniert einwandfrei.

Ich danke dir ganz herlich.
lg
Kiwani
Bitte warten ..
Neuester Wissensbeitrag
Microsoft

Lizenzwiederverkauf und seine Tücken

(5)

Erfahrungsbericht von DerWoWusste zum Thema Microsoft ...

Heiß diskutierte Inhalte
LAN, WAN, Wireless
FritzBox, zwei Server, verschiedene Netze (18)

Frage von DavidGl zum Thema LAN, WAN, Wireless ...

Windows Netzwerk
Windows 10 RDP geht nicht (16)

Frage von Fiasko zum Thema Windows Netzwerk ...

Windows Server
Outlook Verbindungsversuch mit Exchange (15)

Frage von xbast1x zum Thema Windows Server ...