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

8stellige Zahl aus dok auslesen VB6

Frage Entwicklung

Mitglied: hexflex

hexflex (Level 1) - Jetzt verbinden

08.02.2007, aktualisiert 09.02.2007, 7041 Aufrufe, 5 Kommentare

Hallo,

Ich stehe vor einem scheinbar unlösbaren problem.
Ich habe eine text datei in der zwichen verschiedenen buchstaben-zahlen-nummern
immer mal eine 9 steligew nummmer steht. nun wie kan ich diese nummer auslesen?

Die datei einlesen und in variable spechern ist kein priblem aber danach komme ich nicht weiter . . .
Mitglied: Dynadrate
08.02.2007 um 21:30 Uhr
Vielleicht wärs einfacher, wenn du einfach mal ne Probe aus der Textdatei mitpostest!
Bitte warten ..
Mitglied: hexflex
08.02.2007 um 21:38 Uhr
ok die siet ungefähr so aus


È tomas… 304326871   m freddyŸâj 2423552234   m Clù@?Ñ2 194434424   m mannyE? 322544638   m ClËÕ?ÿ¾ì 324234234   m C”`ä?€ 208432684  m C”`î?€ 243456925   m C”a%?€ 423333425  m C”b¼?€ 24243261
 anna€ 129534341


so da sind dann immer zahlen (9 stellig ) die brauch ich
und dann noch (evtl) wenns geht steht vor der zahl n name
perfekt wär wen ich in dem schema ne ausgabe hätte:

Name = Nummer

ohne die ganzen anderen zeichen
Bitte warten ..
Mitglied: A-J
08.02.2007 um 22:01 Uhr
Hallo hexflex,

das Muster zeigt, dass dein Problem vielleicht größer, zumindest aber anders ist, als du glaubst:

Die meisten Zahlenreihen haben tatsächlich 9 Ziffern, aber in dem Beispiel sind auch Muster mit acht oder zehn Ziffern.
Ansonsten sehe ich hier nur eine Gemeinsamkeit und das ist das Leerfeld vor und hinter den Ziffernblöcken.
Vorschlag:
Suche das Leerzeichen und prüfe, ob anschliessend Zahlen folgen. Wenn es mehr als sieben Zahlen waren, als du auf das nächste Leerzeichen triffst, dann sollte das die gesuchte Ziffernfolge sein...


Gruß A-J
Bitte warten ..
Mitglied: A-J
08.02.2007 um 22:16 Uhr
Guck dir doch mal diesen Tipp hier an.

http://www.activevb.de/tipps/vb6tipps/tipp0324.html

Wenn du ihn ein wenig änderst, löst das dein Problem, denke ich.


Gruß A-J
Bitte warten ..
Mitglied: hexflex
09.02.2007 um 14:37 Uhr
lso ich lese die datei bisjetzt so ein:

Private Sub Command1_Click()
Dim dateiin As String
dateiin = datei.Text
Open dateiin For Input As #1
Input #1, texxt
For Each Space In texxt
End Sub


nur 1: weis ich nicht wie ich prüfen kann ob 1 ein leerzeichen und danach 7 zahlen kommen
2: Es liest nur die erste zeile ein wie kan ich dandach die 2 einlesen usw??

Mit freundlichen Grüßen
Bitte warten ..
Neuester Wissensbeitrag
Ähnliche Inhalte
VB for Applications
gelöst Bestimmte Spalten aus CSV-Datei auslesen (VBS) (9)

Frage von Gurkenhobel zum Thema VB for Applications ...

Batch & Shell
Eventlog Druckjobs mit VBS auslesen (2)

Frage von joni2000de zum Thema Batch & Shell ...

Batch & Shell
gelöst Appx aus Image auslesen und entfernen (9)

Frage von Markus2016 zum Thema Batch & Shell ...

Heiß diskutierte Inhalte
Windows Userverwaltung
Ausgeschiedene Mitarbeiter im Unternehmen - was tun mit den AD Konten? (33)

Frage von patz223 zum Thema Windows Userverwaltung ...

LAN, WAN, Wireless
FritzBox, zwei Server, verschiedene Netze (21)

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

Viren und Trojaner
Aufgepasst: Neue Ransomware Goldeneye verbreitet sich rasant (20)

Link von Penny.Cilin zum Thema Viren und Trojaner ...

Windows Netzwerk
Windows 10 RDP geht nicht (18)

Frage von Fiasko zum Thema Windows Netzwerk ...