Top-Themen

AppleEntwicklungHardwareInternetLinuxMicrosoftMultimediaNetzwerkeOff TopicSicherheitSonstige SystemeVirtualisierungWeiterbildungZusammenarbeit

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

VB6 Letztes Zeichen von EXE Datei einlesen

Frage Entwicklung VB for Applications

Mitglied: hexflex

hexflex (Level 1) - Jetzt verbinden

17.03.2007, aktualisiert 19.03.2007, 3541 Aufrufe, 4 Kommentare

Hallo,

Ich würde gerne mit meinem VB6 Programm das letzte teichen einer EXE Datei einlesen.
Dies tue ich wie folgt:

Dim char As String
Dim check As String
Dim valuechk As String

Open App.Path & "\" & "UT2004.exe" For Binary Access Read As #1
Get #1, LOF(1) - 1, char
Close #1

check = char
MsgBox "check = " & check

If Not "#" = check Then call backup



Und im Zweiten Teil soll an das ende Der Datei das Zeichen "#" geschreiben werden:


valuechk = "#"

Open App.Path & "\" & "UT2004.exe" For Binary As #Free
Put #Free, LOF(Free) + 1, valuechk
Close #Free



Nur leider befindet sich in der Variable char nicht das Letzte ZEchen, sondern immer eine Zahl (zb 249)

Was ist mein Fehler?

Vielen Dank für die Hilfe im Vorraus,

Mfg hexflex
Mitglied: hexflex
18.03.2007 um 14:54 Uhr
Ok Problem gelöst
Bitte warten ..
Mitglied: bastla
19.03.2007 um 08:25 Uhr
Hallo hexflex!

Meinst Du, Deine Lösung wäre gut genug, sie hier darzustellen?

Grüße
bastla
Bitte warten ..
Mitglied: Biber
19.03.2007 um 08:31 Uhr
@bastla

Meinst Du, Deine Lösung wäre gut genug, sie hier darzustellen?
Nur aus diesem Grund habe ich diesen Thread gestern nicht geschlossen....

Wie immer am Montachmorgen fröhlich vor sich hinpfeifend
Biber
Bitte warten ..
Mitglied: hexflex
19.03.2007 um 19:32 Uhr
Der Fehler lag in Der Variablendeklaration:

Dim char As String
Dim valuechk As String * 2
Dim check As String * 1
Bitte warten ..
Ähnliche Inhalte
Windows 10
Kontextmenü Verzögerung bei .EXE Dateien (6)

Frage von Monto1 zum Thema Windows 10 ...

Viren und Trojaner
gelöst Laden Makroviren eine .exe-Datei? (2)

Frage von FrAmEr zum Thema Viren und Trojaner ...

Batch & Shell
Dateien umbenennen - ersten Zeichen entfernen (4)

Frage von jan999 zum Thema Batch & Shell ...

Neue Wissensbeiträge
Ubuntu

Ubuntu 17.10 steht zum Download bereit

(3)

Information von Frank zum Thema Ubuntu ...

Datenschutz

Autofahrer-Pranger - Bewertungsportal illegal

(8)

Information von BassFishFox zum Thema Datenschutz ...

Windows 10

Neues Win10 Funktionsupdate verbuggt RemoteApp

(8)

Information von thomasreischer zum Thema Windows 10 ...

Microsoft

Die neuen RSAT-Tools für Win10 1709 sind da

(2)

Information von DerWoWusste zum Thema Microsoft ...

Heiß diskutierte Inhalte
Monitoring
Netzwerk-Monitoring Software (18)

Frage von Ghost108 zum Thema Monitoring ...

Windows 10
Seekrank bei Windows 10 (18)

Frage von zauberer123 zum Thema Windows 10 ...

Windows 10
Windows 10 Fall Creators Update Fehler (13)

Frage von ZeroCool23 zum Thema Windows 10 ...