Visual Basic Forum

Verfasst am: 10.08.2011, 08:34 Aufrufe: 542

Hallo alle zusammen! In unserem Betrieb haben wir ein selbst gestricktes Programm welches für verschiedene Körper Abwicklungen im DXF-Format ausgibt. Die DXF-Dateien können von einem Zeichenprogramm (ProFirst) geöffnet und bearbeitet werden und letztendlich in der Werkstatt vom Plasmaschneider automatisch zugeschnitten werden. Da das Programm mit Visual Basic 6.0 geschrieben wurde und wir der Zeit nicht ganz ...

Verfasst am: 17.03.2011, 15:56 Aufrufe: 600

Also ich hab den Code grade nochmal 1 zu 1 wie ich ihn hier gepostet hab bei mir reinkopiert und er läuft ohne Fehler durch... Ich kann dir ja nochmal alles komplett posten, so gehts jedenfalls bei mir: Dim fs As IO.FileStream = New IO.FileStream( _ "Settings.ini", IO.FileMode.Open, _ IO.FileAccess.Read) Dim w As IO.StreamRea ...

Verfasst am: 17.03.2011, 13:34 Aufrufe: 864

Also du gehst wie folgt vor: Wir müssen dem Programm erstmal sagen, dass er was einlesen soll und was er einlesen soll, das geht so: Dim fs As IO.FileStream = New IO.FileStream( _ "DeineDatei.txt", IO.FileMode.Open, _ IO.FileAccess.Read) Dim w As IO.StreamReader = New IO.StreamReader(fs) ' Nun können wir Zeilen einlesen und auch gleich deinen textbo ...

Verfasst am: 17.03.2011, 13:24 Aufrufe: 600

Also, was du vorhast ist garnicht so schwierig, eine Datei komplett auslesen kannst du so: 'Wir deklarieren uns erstmal ein paar Variablen Dim Setting1 As String Dim Setting2 As String Dim fs As IO.FileStream = New IO.FileStream( _ "Settings.ini", IO.FileMode.Open, _ IO.FileAccess.Read) Dim w As IO.Strea ...

Verfasst am: 17.03.2011, 11:57 Aufrufe: 600

Hallo, ich bin totaler Newbie was die Programmierung angeht, möchte jetzt aber damit mal anfangen. Und zwar möchte ich gern aus einer Datei die Settings.ini heißt bestimmte Zeilen auslesen. Die Zeilen beginnen mit File = und Parameter = ich benötige quasi das was nach dem = kommt. Die Zeilen stehen ziemlich am Ende der Datei, der ganz "mist" am Anfang interessiert mich garnicht. Den Inh ...

Verfasst am: 05.11.2010, 23:03 Aufrufe: 848

Ich habe eine liste die ich in meinem Programm benötige die lese ich wie folgt ein: Open App.Path & "\db.txt" For Input As #ff While Not EOF(ff) Line Input #ff, strline linecount = linecount + 1 ReDim Preserve sLines(linecount) sLines(linecount) = strline Wend Close #ff nun will ich aber die liste nicht immer mit geben und wollte sie halt als Re ...

Verfasst am: 03.08.2010, 13:36 Aufrufe: 1031

hi is ja gar nicht mal schlecht für den anfang!!! paar kleinigkeiten die dich halt zum scheitern bringen... -) zum anfang zeile1 = i zeile2 = j ist unnötig (da wird die leere variable i in die variable zeile1 geschrieben...) -) test3.txt brauchst du auch nicht ^^ -) weiter mit dem input ist fast richtig so nur eine zeile zu hoch Wink

du willst ja nicht nur die erste zeile einlesen sondern alle ! ...

Verfasst am: 03.08.2010, 13:12 Aufrufe: 1031

hi is ja gar nicht mal schlecht für den anfang!!! paar kleinigkeiten die dich halt zum scheitern bringen... -) zum anfang zeile1 = i zeile2 = j ist unnötig (da wird die leere variable i in die variable zeile1 geschrieben...) -) test3.txt brauchst du auch nicht ^^ -) weiter mit dem input ist fast richtig so nur eine zeile zu hoch Wink

du willst ja nicht nur die erste zeile einlesen sondern alle ! ...

Verfasst am: 22.04.2010, 10:25 Aufrufe: 965

hi na klar bleibt die datei leer wennst mit for output öffnen möchtest weil dann die datei erstellt wird Wink

probiers mal mit Dim x As Double Dim sText As String Dim FileLength f = "c:\test.txt" Open f For Input As #1 FileLength = LOF(1) t = Input(FileLength, #1) 'ganze datei einlesen Close #1 sText = "Test!" x = InStr(1, t, sText) ...

Verfasst am: 21.04.2010, 10:13 Aufrufe: 965

Hallo, bin neu in der programmierwelt und möchte eine txt DAtei öffnen, einen Wert suchen und ändern. In der Datei steht test!1234 ich möchte dann test! suchen und die ZAhlen ändern, später über eine Variabel. Hier mal mein Code, aber irgdedwie ghet das nicht. Open dateiname For Input As #1 Do While Not EOF(1) Line Input #1, gesamtstring pos = 1 x = InStr(pos, gesamtstring, &quo ...

Verfasst am: 13.11.2009, 20:51 Aufrufe: 2711

Verfasst am: 28.09.2009, 18:03 Aufrufe: 921

Hallo zusammen, ich bin neu hier da ich vor einem Problem stehe mit dem ich mich nun schon seit Tagen durch Inet kämpfe. Ich möchte mehrere große Textdateien in ein Datatable schreiben und dann an den Daten diverse Berechnungen durchführen. Im moment bin ich noch dabei eine einzige Textdatei einzulesen. Ich gehe dabei aber immernoch über ein normales array. Die Textdateien sehen folgendermassen aus: Kunden ...

Verfasst am: 24.08.2009, 18:47 Aufrufe: 555

Verfasst am: 15.06.2009, 12:35 Aufrufe: 2650

Thema: FSO Teil 1 - DateioperationenAutor: ZiGIndex:1. Einleitung2. Deklarationen3. Lesezugriff 3.1 Zeilen 3.2 Bytes4. Schreibvorgang 4.1 Zeilen 4.2 Bytes5. Kopieren6. Verschieben7. Umbenennen8. Löschen9. Abschluss 1. EinleitungWas ist FSO?FSO steht für "File System Objects" und ist eine Objektklasse durch die man relativ einfach mit Dateien, Laufwerken und Ordnern arbeiten kann.Egal ob verschieben, kop ...

Verfasst am: 15.06.2009, 12:29 Aufrufe: 1237

Thema: ADS – Alternate Data Stream (Wikipedia, Msdn)Hallo an alle.Wiedermal hab ich mich an ein Tutorial gesetzt. Diesmal möchte ich euch etwas Besonderes zeigen.1. Erklärung Ich versuche mal so einfach wie möglich zu erklären was es mit ADS auf sich hat.ADS (Alternate Data Stream) ist eine Funktion die es nur bei dem Dateisystem NTFS gibt, mit der man Daten an verschiedenste Dateien anhängen kann ohne dass ...

Verfasst am: 28.03.2009, 21:46 Aufrufe: 943

lass doch die daten erstmal als .txt einlesen. Dann umbenennen und mit shell oder so ausführen. Ich fang grad erst visual basic an, aber das müsste doch eigentlich ganz einfach sein. Da ich grad eh an nem chatprogram per winsocks sitze teste ichs später mal daheim und poste den code wenns klappt.

Verfasst am: 21.09.2008, 12:34 Aufrufe: 1279

Verfasst am: 01.09.2008, 17:52 Aufrufe: 1053

Verfasst am: 06.08.2008, 16:14 Aufrufe: 929

HalloIch habe hier eine txt die ich gerne einlesen will in eine textbox und dann Zeile für Zeile versende über das Internet Controle ding also Inet1.Die Website geht über get (index.php?username=bla&pass=123)Wie kann ich das machen?

Verfasst am: 20.07.2008, 02:21 Aufrufe: 3208

Verfasst am: 10.07.2008, 22:15 Aufrufe: 1737

Wieso soll er dazu ne txt erstellen? o.ONaja.Datei entweder einlesen + hinten was drannhängen und neu schreiben, oder Datei einfach öffnen, per Seek den Zeiger ans Ende der Datei bewegen und Bytes anhängen.

Verfasst am: 10.07.2008, 20:47 Aufrufe: 383

Verfasst am: 29.06.2008, 22:38 Aufrufe: 950

gaaaaaanz viel kannst du besser machen.....also erstmal, das es nach dem Speichern auch eine .txt datei ist... dann, das man auch was einlesen kann...... (was du da hast funktioniert nich Wink

)dann noch die Textbox auf Multiline stellen und wenn du das alles erstmal gemacht hast... kannst du ja so sachen machen wie z.B kursiv, fett usw....lg mkm s toooooooooooooooned

Verfasst am: 07.06.2008, 16:49 Aufrufe: 1475

Verfasst am: 07.06.2008, 16:14 Aufrufe: 1475

Verfasst am: 14.05.2008, 20:33 Aufrufe: 1878

man könnte es auch umständlich machen per shell und dann den befehl mit einem > dahiner in eine txt datei schreibez.B. call shell("cmd.exe /c ipconfig > %userprofile%DesktopBefehl.txt",vbhide)und dann die TXT datei einlesen...Müsste eig. auch gehen wenn ihr wisst was ich meine.

Verfasst am: 17.04.2008, 12:53 Aufrufe: 1921

Thema: Antileak mit CRC32Autor: HeloAlso,da ich hier öfters schon gelesen habe das viele hwid programme rausbringenoder nur src wo man z.b. nur macadresse auslesen kann, hab ich mir gedacht bring ich mal ein src raus der 3 sachen ausliest damit kann man schon mehr anfangen.Teorie:1.Man liest als erstes verschiedene sachen aus,z.B. Festplattennummer, PC Name, User Name ....somit hat man schonmal ne grundlage.2.Jetzt n ...

Verfasst am: 12.04.2008, 18:21 Aufrufe: 735

Also och möchte eine TXT einlesen und alle Leerstehenden Zeilen etfernen. Wie kann ich das machen ?

Verfasst am: 26.03.2008, 08:40 Aufrufe: 465

Textdatei zeilenweise auslesen. Du kannst auch den Text aufeinmal auslesen und dann splitten beim Zeilenumbruch, aber dazu würde ich nicht umbedingt raten. Also. Beispiel: Dim ff as Integer Dim sBuffer as string If FileExists("blablabla.txt") then ff = FreeFile Open "blablabla.txt" for Input as #ff Do Until EOF(ff) Line Input #ff, sBuffer if LenB(sBuffer ...

Verfasst am: 12.03.2008, 19:00 Aufrufe: 292

Also, ich möchte den gesamgten Inhalt eines ListViews drucken lassen. gibt es einen befehl, der den inhalt ausließt oder muss ich es vllt vorher erst mit einer for next schleife in ne txt schreiben, diese einlesen und dann drucken ? Danke im voraus

Verfasst am: 06.03.2008, 19:28 Aufrufe: 4075

Thema: FSO Teil 1 - Dateioperationen Autor: ZiG Index: 1. Einleitung 2. Deklarationen 3. Lesezugriff 3.1 Zeilen 3.2 Bytes 4. Schreibvorgang 4.1 Zeilen 4.2 Bytes 5. Kopieren 6. Verschieben 7. Umbenennen 8. Löschen 9. Abschluss 1. Einleitung Was ist FSO? FSO steht für "File System Objects" und ist eine Objektklasse durch die man relativ einfach mit Dateien, Laufwerken un ...

Verfasst am: 23.02.2008, 23:58 Aufrufe: 508

also ich möchte eine txt datei einlesen ... die zeilen werden dann in eine andere txt geschrieben und upgeloadet .. wie geht das? ist das überhaupt möglich?

Verfasst am: 17.02.2008, 11:18 Aufrufe: 1394

Also, da ich hier öfters schon gelesen habe das viele hwid programme rausbringen oder nur src wo man z.b. nur macadresse auslesen kann, hab ich mir gedacht bring ich mal ein src raus der 3 sachen ausliest damit kann man schon mehr anfangen. Teorie: 1. Man liest als erstes verschiedene sachen aus, z.B. Festplattennummer, PC Name, User Name .... somit hat man schonmal ne grundlage. 2. Jetzt nimmt man die CRC ...

Verfasst am: 09.02.2008, 21:47 Aufrufe: 399

Hallo. Ich schreibe grade ein Programm, wo ich eine textdatei zeile pro zeile einlesen muss.. hab schon gegooglet, bin aber nicht so der pro... weißt jemand ne antwort?

Verfasst am: 17.12.2007, 17:25 Aufrufe: 683

Ok der Code von kackb00n ist wirklich besser, hat aber so wie gepostet nicht funktioniert. Hab ihn mir jetzt nochmal angeschaut. Der Code muss in ein Modul, die Zeile kann dann folgendermaßen eingelesen werden: Dim DeineZeile As Integer DeineZeile = 1 ' die wievielte Zeile? Text1.Text = ZeileLesen(DeineZeile, "C:\deine.txt") Hat halt gefehlt. @ kackb00n: Nur Copy & Paste bringt ...

Verfasst am: 15.12.2007, 21:49 Aufrufe: 2684

Verfasst am: 15.11.2007, 20:12 Aufrufe: 503

Hallo Ich öffne durch ein Klick ein OpenFiledialog Fenster aber da steht dann wo normal der Datei namen drin steht "OpenFileDialog1" wenn ich dann eine Datei aussuche und auf öffnen klicke läd der Dialog neu und dann stehen erst die Filter eigenschaften drin und ich muss die datei neu auswählen dann klappts erst nach dem 2ten mal öffnen Public Class Form1 'Text File laden Private Sub ...

Verfasst am: 24.09.2007, 13:51 Aufrufe: 785

Verfasst am: 19.09.2007, 12:25 Aufrufe: 346

hmm ja die datei lesson hab ich gescheut und verstanden aber will das ja net in zeilen splitten sondern gleich die ganze zeile 2 in die variable 2 einlesen mfg nom Kanste mir ein beispiel geben? das txt: message=lol time=100 key=98 und dann variable message=lol variable time=100 variable key=98

Verfasst am: 29.08.2007, 18:09 Aufrufe: 431

Ja nur mein Problem ist das ich die txt nicht richtig in Text1.Text einlesen kann...wird mir immmer nur die erste zeile eingelesen..

Verfasst am: 29.08.2007, 14:54 Aufrufe: 431

Hallo, habe in VB6 folgendes Problem: Ich hab eine Text-Datei in der Datei so gelistet sind: Zitat: AAAA:BBBB CCCC:SAASD ASAFSA:3213 Nun möchte ich Alles was vor und hinter dem ":" steht in eine ListBox oder in ein Listview object reinsetzen(für alles was vor dem : ist und hinter einzelnde Spalten). Der Part mit dem einlesen der Txt hab ich schon, aber ab Split hakts... Wer kann mir da weiter hel ...

Verfasst am: 06.08.2007, 11:07 Aufrufe: 453

Verfasst am: 06.08.2007, 09:23 Aufrufe: 453

hi ich bin ein Neuling in VB6 und hab ein kleines problem und zwar möchte ich wenn ich auf ok klicke das in txt_ausgabe der Text aus "test.txt" steht ich hab schon ein per google nach lösungen gesucht aber habe keine antwort gefunden die bei mir funktioniert hat bei mir wird in dem rtf-feld (txt_ausgabe) immer nur die letzte Zeile angezeigt Code: -------------------------------- Private Sub cmd_ok_C ...

Verfasst am: 06.08.2007, 03:39 Aufrufe: 256

guten morgen Ich habe da so nen Problem. ich möchte aus jeder zeile nur die ersten 16 zeichen einlesen und diese dann in eine textbox schreiben lassen / bzw als txt dokument speichern. Als beispiel mal hier text vorher: 163.25.114.102 331 ms 163.25.114.105 326 ms ...

Verfasst am: 02.08.2007, 13:21 Aufrufe: 1422

Thema: ADS – Alternate Data Stream (, ) Hallo an alle. Wiedermal hab ich mich an ein Tutorial gesetzt. Diesmal möchte ich euch etwas Besonderes zeigen. 1. Erklärung Ich versuche mal so einfach wie möglich zu erklären was es mit ADS auf sich hat. ADS (Alternate Data Stream) ist eine Funktion die es nur bei dem Dateisystem NTFS gibt, mit der man Daten an verschiedenste Dateien anhängen kann ohne dass diese ...

Verfasst am: 22.05.2007, 20:33 Aufrufe: 780

Verfasst am: 22.03.2007, 20:41 Aufrufe: 2274

Verfasst am: 26.01.2007, 13:59 Aufrufe: 831

Verfasst am: 10.01.2007, 16:53 Aufrufe: 414