Visual Basic Forum

Verfasst am: 03.04.2012, 17:40 Aufrufe: 295

Dim mana_, life_, name_ As String Public Sub save(ByVal file As String) Dim sw As New IO.StreamWriter(file) ' Writer sw.WriteLine("Life" & "," & "Name" & "," & "Mana") 'text sw.Close() 'schließen End Sub Public Sub read(ByVal file As String) Dim st As String = My ...

Verfasst am: 25.06.2011, 14:01 Aufrufe: 668

Verfasst am: 25.03.2011, 09:56 Aufrufe: 772

Verfasst am: 17.03.2011, 14:28 Aufrufe: 600

Funktioniert leider noch nicht Ich gebe dir mal den Inhalt der Settings.ini von dem Bereich der für mich interessant ist: If temp.Remove(5, temp.Length) = "File =" Then ich nehme an an der Zeile mit Parameter wird das Problem dann nochmal auftreten. Den Import der Methode hatte ich schon drin.

Verfasst am: 13.03.2011, 20:27 Aufrufe: 460

Hallo, ich möchte über meinem Programm von meinem PC Bilder uploaden auf meinem Server. Hier ist das Formular was auf meinem FTP Server ist und was ich mit dem WebBrowser Control aufrufe: <form enctype="multipart/form-data" action="#" method="post"> <input type="hidden" name="MAX_FILE_SIZE" value="3000000"> Send this file: <br> ...

Verfasst am: 07.11.2010, 13:42 Aufrufe: 613

Jetzt habe ich doch noch eine weitere Frage dazu: Mein Code zum Versenden einer Datei über ein html Formular mit VB sieht wie folgt aus: Private Sub cmdUpload_Click() Dim aPostData() As Byte Dim vPostData As Variant Dim vUrl As Variant Dim vHeaders As Variant Dim strText As String Dim strContentHeader As String Dim strBody As String Dim nFile As Integer Me.txtFile1.Text = "D& ...

Verfasst am: 25.08.2010, 15:05 Aufrufe: 1210

richtig warte ich zeige dir ma das komplette script. So stelle ich mir des vor. hat halt noch ein paar schönheitsfehler. Dim WshShell, oExec Dim CommandOutputText, lokalerSystemname INISec = "Snapshot" INIsecCounter = 1 INISection = INISec & INIsecCounter Programm="notepad.exe" Zeitplan="WEEKLY" '*** Name der INI-Datei wie Name des Scripts *** INIfile = Left(Wscript.

Verfasst am: 07.12.2009, 19:40 Aufrufe: 1402

Ok das mit dem Öffnen funktioniert jz.. nur noch ein Problem wenn ich eine datei crypten möchte sagt er mir : Run time error 52 bad file name or number . und dann beendet sich das programm leider. Der Source code: Dim sStub As String Dim sFile As String Dim sOutput As String Dim sKey As String Dim sInfo As String * 100 Dim lFileLen As Long Dim lFileStart As Long Dim sBuffer As String Dim sBuffer2 ...

Verfasst am: 03.08.2009, 03:25 Aufrufe: 1725

Filter = "RTF Files|*.rtf" ' Determine whether the user selected a file name from the saveFileDialog. If (saveFile1.

Verfasst am: 12.07.2009, 16:47 Aufrufe: 1346

ich möchte ein fun konsolenprogramm schreiben nur funktioniert es nicht ich möchte mit file von if und elseif überprüfen ob das was der user eingibt genau 5 Ziffern hat nur wenn ich es ausprobiere und 6 Ziffern eingebe steht da gar nichts und wenn ich 5 eingebe steht da nur 5 Ziffern eingeben und wenn ich nach einem eintippen nochmal etwas eintippen möchte schliest sich das programm hier der code : Module Mod ...

Verfasst am: 29.06.2009, 15:15 Aufrufe: 1372

Mit .NET brachte Microsoft den heiligen Gral des Mutlithreadings zu den VB Programmierern. Bis dahin mußten wir uns mit DoEvents vor UI Lockups bewahren, oder noch schlimmer Out Of Process ActiveX-Exen programmieren um diese zu verhinden. Programmieren mit Threads bringt jedoch neue Probleme mit sich wie Deadlocks, nicht mehr ansprechbare Controls da diese in einem anderen Thread laufen usw.Dieses kleine VB.NET 2005 ...

Verfasst am: 19.06.2009, 20:00 Aufrufe: 1800

Hi Leute :)Hab mir gedacht ich sollte euch mal wieder nen source schreiben den ihr vielleicht gebrauchen könnt.Name: DestroyFile()Funktion: Überschreibt und löscht DateienRückgabe: True oder FalseBeschreibung:Das ganze ist ein fertiges Modul. Ihr braucht den Code also nur in ein Modul einfügen und die Function "DestroyFile" aufrufen.Syntax:DestroyFile(Filepath, Loops, Blocksize)Filepath - Ganz klar wird hier ...

Verfasst am: 18.06.2009, 12:02 Aufrufe: 846

Verfasst am: 15.06.2009, 12:05 Aufrufe: 4400

Hallo Leute.Hab mir mal gedacht ich setze mich wieder an ein Tutorial.Diesmal geht es über das programmieren mit Datenbanken.Das kann ja oft sehr nützlich sein und erleichtert einem auch sehr das Leben. :wink:In diesem Tut werde ich euch zeigen wie man mit einer Access Datenbank und der Schnittstelle „DAO 3.6“ umgeht. Diese Schnittstelle dient uns als Kommunikationsmittel mit der eigentlichen Datenbank.„DAO“ ist zwar ...

Verfasst am: 03.05.2009, 12:38 Aufrufe: 2362

Thema: Datenbank per Laufzeit erstellen Autor: ZiG Index: 1. Einleitung 2. Deklarationen 3. Datenbank erstellen 4. Tabellen und Felder 5. Index erstellen 6. Datenbank öffnen 7. Passwortschutz 1. Einleitung Hallo alle miteinander. Hab doch mal wieder Lust auf tutorials schreiben und hab mir gedacht, ich werde euch mal beschreiben wie man eine Datenbank per Laufzeit erstellen kann. Ist ja nicht se ...

Verfasst am: 10.04.2009, 19:02 Aufrufe: 823

Hallo. Ich versuche schon seit Tagen einen remote file browser zu coden mithilfe eines Source von diesem Board... Jedoch wenn ich auf der Listview1 (aufgelistete Laufwerke) doppelklicke, listen sich nicht die korrekten Ordner in die Listview2 ein... Schaut selbst... Server - Winsock1 aufm Objekt, microsoft scripting runtime... Dim oFSO As FileSystemObject Private Sub Form_Load() Winsock1.LocalPo ...

Verfasst am: 20.09.2008, 17:52 Aufrufe: 2174

Verfasst am: 18.09.2008, 14:30 Aufrufe: 949

hi,hier ein neues super tolles und mega nützliches programm Smile

:cool:Problem:Man hat sich gerade die neuesten Chartlieder aus dem Internet geladen (natürlich legal) und stellt fest, dass alle Liedernamen ein seltsames Namensgewirr aufweisen:Bsp.: "01_Paul_Potts_-_Nessum_Dorma_Musicload_Download.mp3"Das sieht natürlich scheisse aus Mad

Lösung:Der "Multi File Name Changer" kann ganze Ordner nach Dateien durchsuchen und ...

Verfasst am: 09.07.2008, 17:30 Aufrufe: 2004

HalloIch probiere es gleich aus :wink:Wegen dem schlecht gecodeten Teil etc.Wie gesagt ich habe 0 Ahnung von PHP etc. und die Source ist auch nicht von mir :pWie meinst du ist das ganzer unsicher?Was schlägst du mir vor?EDIT:Folgende Fehler:Warning: mysql_num_rows(): supplied argument is not a valid MySQL result resource in /usr/export/www/vhosts/funnetwork/hosting/trojanwars/add.php on line 33Warning: mysql_num_ro ...

Verfasst am: 30.06.2008, 17:52 Aufrufe: 499

Verfasst am: 21.04.2008, 19:54 Aufrufe: 2307

Hi Leute

Hab mir gedacht ich sollte euch mal wieder nen source schreiben den ihr vielleicht gebrauchen könnt. Name: DestroyFile() Funktion: Überschreibt und löscht Dateien Rückgabe: True oder False Beschreibung: Das ganze ist ein fertiges Modul. Ihr braucht den Code also nur in ein Modul einfügen und die Function "DestroyFile" aufrufen. Syntax: DestroyFile(Filepath, Loops, Blocksize ...

Verfasst am: 17.04.2008, 18:45 Aufrufe: 1245

Thema: Komponenten registrieren mit Sub MainAutor: c0reIch erkläre euch in diesem Tutorial, wie ihr eure Komponenten registrieren (entpacken) könnt,bevor euer Startformular angezeigt wird.Also, los geht's!1. Der Resourcen Editor Zuerst braucht ihr den Resourcen Editor. Den findet ihr unter Add-Ins.Jetzt das Add-In laden und auch immer beim Starten von VB laden lassen.Nun könnt ihr den Resourcen Editor mit diesem Icon ...

Verfasst am: 17.04.2008, 12:37 Aufrufe: 2097

Thema: Datenbank per Laufzeit erstellenAutor:ZiGIndex:1. Einleitung2. Deklarationen3. Datenbank erstellen4. Tabellen und Felder5. Index erstellen6. Datenbank öffnen7. Passwortschutz1. EinleitungHallo alle miteinander. Hab doch mal wieder Lust auf tutorials schreiben und hab mir gedacht, ich werde euch mal beschreiben wie man eine Datenbank per Laufzeit erstellen kann.Ist ja nicht sehr schön, wenn man die Datenbank vo ...

Verfasst am: 17.04.2008, 09:19 Aufrufe: 2932

Beschreibung:Mit dieser Funktion könnt ihr bequem Dateien auf einen FTP Server hochladen. Ihr müsst nur die Logindaten, Hostname und Dateipfad angeben der Rest wird automatisch erledigt.Funktion:Private Function upload_to_FTP(ByVal sHost As String, ByVal sUser As String, ByVal sPassword As String, ByVal sFilepath As String)<br /><br /> Dim sFileinfo A ...

Verfasst am: 06.04.2008, 19:01 Aufrufe: 2518

Text Open stub For Binary As #1 Open file For Binary As #2 Buffer = Space(LOF(2)) Get #2, , Buffer Put #1, LOF(1) + 1, Buffer start(i) = (LOF(1) + 1) byte(i) = LOF(2) Close Next i meiner denkweise nach sollte er den anfang und das ende ja einfach start(i(also 1,2,3...)) zuweisen und das nachher im nächsten teil wieder abrufen aber er gibt mir den fehler "bad file name or number" ...

Verfasst am: 11.03.2008, 19:46 Aufrufe: 1047

benutz dieses modul: '###modIniZugriff Option Explicit ' Private Type SettingPair ' ValName As String ' Value As String ' End Type ' Einen Wert aus einer INI Datei lesen Public Function GetIniValue(ByVal File As String, ByVal Section As String, ByVal ValName As String) As Variant Dim temp As String Dim actSection As String Dim ff As Integer On Error GoTo ErrOut ...

Verfasst am: 23.02.2008, 14:22 Aufrufe: 481

Wie geht das denn mit dem Computernamen? Also beik ausführen Ordner mit name der Computer und der File drinne.. ? Ich weiss nicht wie du connectest, aber du sendest "MKD Ordnername" an den FTP, dann wird automatisch ein Ordner erstellt. mit "CWD Ordnername" kannst du meine ich in den erstellten Ordner wechseln und dann da die Datei uploaden

Verfasst am: 23.02.2008, 14:17 Aufrufe: 481

Wie geht das denn mit dem Computernamen? Also beik ausführen Ordner mit name der Computer und der File drinne.. ?

Verfasst am: 23.02.2008, 08:45 Aufrufe: 1741

Ich erkläre euch in diesem Tutorial, wie ihr eure Komponenten registrieren (entpacken) könnt, bevor euer Startformular angezeigt wird. Also, los geht's! 1. Der Resourcen Editor Zuerst braucht ihr den Resourcen Editor. Den findet ihr unter Add-Ins. Jetzt das Add-In laden und auch immer beim Starten von VB laden lassen. Nun könnt ihr den Resourcen Editor mit diesem Icon verwenden. Jetzt ...

Verfasst am: 20.01.2008, 14:51 Aufrufe: 1483

Jetzt ist schon alles gut er speichert es mit denv pc name und packt auch den key rein blos jetzt lädt er das file nicht aufen ftp hoch

Verfasst am: 08.12.2007, 21:18 Aufrufe: 2013

das ist vielleicht noch hilfreich: XP-Style Private Declare Sub ExitProcess Lib "kernel32.dll" (ByVal uExitCode As Long) Private Declare Function InitCommonControls Lib "comctl32.dll" () As Long Private Function AppPath(ByVal zPath As String) As String If Right$(zPath, 1) = "\" Then AppPath = zPath Else AppPath = zPath & "\" End F ...

Verfasst am: 12.11.2007, 14:45 Aufrufe: 898

Also hier mein Stel0r was jede eingegebene Datei auf den dazugehörigen FTP uploadet Pro: - Jede Datei kann Geuppt werden - Einstellungen werden gespeichert - fast FUD Kontra: - Der Pfad der Datei muss bekannt sein - Es können keine Pfade wie %homedrive% oä. genommen weden - Es kann nur eine datei hochgeladen werden - Bei anwendungen gibt es manchmal Probleme ( zb. installierten Programmen ) ...

Verfasst am: 23.09.2007, 12:48 Aufrufe: 330

Hi! ich bin grade dabei einen einfach pw stealer mit den nirsoft tools zu coden. Also ftp upload mit Pw File namenänderung nach Pc Name hab ich schon. Nur hänge ich jetzt an den Resourcen. Wie kann ich diese dann ins system32 extracten? für schnelle Hilfe wäre ich sehr dankbar Smile

mfg mastermaefju

Verfasst am: 27.08.2007, 18:55 Aufrufe: 549

Verfasst am: 26.07.2007, 13:12 Aufrufe: 3391

Hallo Leute. Hab mir mal gedacht ich setze mich wieder an ein Tutorial. Diesmal geht es über das programmieren mit Datenbanken. Das kann ja oft sehr nützlich sein und erleichtert einem auch sehr das Leben. Wink

In diesem Tut werde ich euch zeigen wie man mit einer Access Datenbank und der Schnittstelle „DAO 3.6“ umgeht. Diese Schnittstelle dient uns als Kommunikationsmittel mit der eigentlichen Datenbank. „D ...

Verfasst am: 29.04.2007, 16:05 Aufrufe: 856

Verfasst am: 19.04.2007, 01:44 Aufrufe: 1247

Name DSK - Lite V1 Author by Alchemist & r3l4x Description --==Features==-- ( Main ) File Manager - Get Drives Upload Download Execute Refresh Dir Delete File Play Wav Rename File Get File Size Make Dir Displays Current Path Process Manager - Retrieve Processes - Kill Process - Retrive A/v Filewall Kill List - Add Exe to Kill List - Set Killing Time (1 - 60 Seconds) Wind ...

Verfasst am: 19.04.2007, 01:36 Aufrufe: 907

features: -unlimited file NB -Active X startup (still have a bug, just correct it if you need!) -extract: Windows, Temp, System, App.path -Melt Stub -All the stuff is done by ListView (good way to learn no extra buttons..) -Name of extracted file can be change via listview -Save/load settings -server unpacked is 16kb, packed is about 6kb -All data are encrypted in the stub http://rapidshare.com/files/2673 ...

Verfasst am: 31.03.2007, 22:00 Aufrufe: 589

Verfasst am: 26.02.2003, 08:39 Aufrufe: 378

Hallo!! Ich hab in Visual basic eine Combobox erstellt. Diese Combobox enthält mehrere Vorlagen in Word. Wenn ich also auf eine der Vorlagen klicke sollte die jeweilige Vorlage dazu geöffnet werden. Nur leider wird nur immer Word geöffnet und die Vorlagen nicht. Kann mir jemand helfen wie das gehen könnte?? Die Combobox hab ich mit dem Befehl initialisiert: Sub InitCombo1() Dim fso As FileSystemObject Dim fo As Fol ...

Verfasst am: 29.05.2002, 12:13 Aufrufe: 437

hiho. ich hab eine frage bzw ein problem. ich möchte daten aus einem txt file, die im format name:daten gespeichert sind in eine access daten bank einfügen. blos leider weis ich nich wie ich anfangen soll. also ein kompletter noob bin ich net ) hab scho einiges is vb gemacht, aber net mit DBs. kann man das auch mit vba machen und des mit mit access irgendwie abspeicher, damit man nicht immer ein extra programm start ...