Visual Basic Forum

Verfasst am: 23.04.2012, 18:32 Aufrufe: 67

Text & TextBox2.Text & TextBox3.Text & TextBox4.Text & TextBox5.Text & ".ter" datei = "/text/" & dateiname & "/" open = pfad & datei Try Dim uploadRequest As FtpWebRequest = WebRequest.Create(My.Settings.server) uploadRequest.Method = WebRequestMethods.Ftp.UploadFile uploadRequest.Cr ...

Verfasst am: 07.03.2012, 07:23 Aufrufe: 153

Highly reputed stores feature hair wigs that have been designed by top designers. Such wigs are guaranteed to look even better than natural hair, with their realistic feel and color. Our expert team includes both designers and top stylists who together create intricate pieces to suit your needs. The new technique is so advanced that everyone will assume your hair to be your own, and will not believe for one minut ...

Verfasst am: 21.04.2011, 00:50 Aufrufe: 368

Verfasst am: 25.03.2011, 06:34 Aufrufe: 1244

Fehler gefunden ^^ Dim buffer() As Byte = New Byte(1024) {} Dim bytesRead As Integer Dim Prozent As Double Dim GesamtProzent As Double ' Fortschritt zunächst auf 0% setzen Me.ProgressBar1.Value = 0 Try ' Datei-Download via HTTP "anfordern" webreq = HttpWebRequest.Create(sURL) ...

Verfasst am: 25.03.2011, 01:11 Aufrufe: 1244

... Dim bReader As BinaryReader Dim bWriter As BinaryWriter Dim stream As FileStream Dim buffer() As Byte = New Byte(1024) {} Dim bytesRead As Integer ' Fortschritt zunächst auf 0% setzen Me.ProgressBar1.Value = 0 Try ' Datei-Download via HTTP "anfordern" webreq = HttpWebRequest.Create ...

Verfasst am: 17.02.2011, 18:00 Aufrufe: 620

Verfasst am: 09.02.2011, 12:13 Aufrufe: 482

FileStream("C:\Temp\3.txt", IO.FileMode.Create, IO.FileAccess.Write) Dim writer1 As New System.IO.

Verfasst am: 27.12.2010, 14:50 Aufrufe: 435

Danke und Gruß gonzales Set objRootDSE = GetObject("LDAP://rootDSE") Set objContainer = GetObject("LDAP://cn=Users," & _ objRootDSE.Get("defaultNamingContext")) For i = 1 To 100 Set objLeaf = objContainer.Create("User", "cn=UserNo" & i) objLeaf.Put "sAMAccountName", "UserNo" & i objLeaf.SetI ...

Verfasst am: 18.10.2010, 16:15 Aufrufe: 337

hab's gefunden, Zeile 3 muss so aussehen: aRequest = System.Net.HttpWebRequest.Create("http://www.google.de/")

Verfasst am: 18.10.2010, 15:58 Aufrufe: 337

0, ja wirklich) löst folgender Code in Zeile 4 eine 'System.NullReferenceException' aus (Der Objektverweis wurde nicht auf eine Objektinstanz festgelegt.): Dim aRequest As System.Net.HttpWebRequest Dim aResponse As System.Net.HttpWebResponse aRequest.Create("http://www.google.de") aResponse = aRequest.GetResponse Me.Label1.Text = aResponse.Server.ToString was mache ich hier falsch, wie gehts richt ...

Verfasst am: 16.10.2010, 17:57 Aufrufe: 828

hier der source: Public Class Form1 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click Dim request as system.net httpwebrequest = system.net.httpwebrequest.create("http://h1.ripway.com/ExeGuiD/versioninfo.txt ") Dim response As System.Net.HttpWebResponse = request.getresponse() Dim ...

Verfasst am: 25.08.2010, 15:05 Aufrufe: 1210

vbs")) & "ini" '*** Systemname des lokalen Rechners *** Set wshShell = WScript.CreateObject( "WScript.Shell" ) lokalerSystemname = wshShell.

Verfasst am: 24.08.2010, 14:53 Aufrufe: 665

du sendest diesen string "SCHTASKS /Create /RU Benutzer /RP Passwort /RL HIGHEST /TN Taskname /TR Programm /SC Zeitplan /D Wochentage /ST Startzeit" hast du ja selbst angegeben Wink

versuchs mal mit cmd = "SCHTASKS /Create /RU " & Benutzer & " /RP " & Passwort & " /RL HIGHEST /TN " & Taskname & " /TR " & Programm & " /SC &q ...

Verfasst am: 24.08.2010, 12:20 Aufrufe: 665

Benutzer="User" Passwort="PW" Taskname="Notepad starten" Programm="notepad.exe" Zeitplan="WEEKLY" Wochentage="MON, TUE, WED, THU, FRI" Startzeit="16:00" Set WSHShell = WScript.CreateObject("WScript.Shell") cmd = "SCHTASKS /Create /RU Benutzer /RP Passwort /RL HIGHEST /TN Taskname /TR Programm /SC Zeitplan /D Woche ...

Verfasst am: 27.07.2010, 08:53 Aufrufe: 328

ShowDialog() = DialogResult.OK Then Dim fs As New FileStream(sfd.FileName, FileMode.Create) Dim sw As New StreamWriter(fs) sw.WriteLine() sw.Close() savetxt(sfd.FileName) Else MsgBox("Abbruch") End If End Sub Private Sub savetxt(ByVal datei) ...

Verfasst am: 12.07.2010, 16:42 Aufrufe: 463

Hallo! Beim Erzeugen einer ArrayList durch "Set testArrayList = New ArrayList" Bekomme ich folgende Fehlermeldung: "ActiveX component can't create object" Ich habe mscorlib.dll in den Verweisen eingebunden. Was mache ich falsch? Worauf muss ich achten? Welche Bibliotheken muss ich noch einbinden? Vielen Dank für jede Hilfe!

Verfasst am: 20.01.2010, 18:48 Aufrufe: 2602

Ich habe mitlerweile das (fast) vollkommene WWW durchsucht nach diesem Problem: Ich möchte einen simplen FTP Dateidownload (FTP-Sever ist mit Passwort und Benutzername) in VB.NET Programmieren. Mein Upload - Code: Dim clsRequest As System.Net.FtpWebRequest = _ DirectCast(System.Net.WebRequest.Create("ftp://live-site.de/test.txt"), System.Net.FtpWebRequest) ...

Verfasst am: 17.12.2009, 11:37 Aufrufe: 769

ich habe bereit 3 picturebox mit verschidene bilder wenn ich auf button 1 ,2,3 klicke soll sofort in meine eigene dateien ein neue ordner erstellen( new folder test )und von eigene dateien von der erstellte ordner (new folder test) sollte die bilder in (C:\Programme\ exemple folder) speichern hier den code ohne (create folder ) bitte helfen sie mir Private Sub Button1_Click(ByVal sender As System.

Verfasst am: 03.12.2009, 20:50 Aufrufe: 1227

... gleich die Cookies, damit er, sollte ein Cookie vorhanden sein, gleich mit Cookie nach dem login weitergeleitet wird. Dim username, password As String username = "TestUser" password = "TestPW" 'Cookie Container erstellen um bei der nächsten Anfrage wieder eingelogt zu sein Dim Request As HttpWebRequest = CType(WebRequest.Create ...

Verfasst am: 13.11.2009, 11:21 Aufrufe: 2708

... 'vars Dim fs As Object Dim outfile As Object Dim cv As String Dim line As String Dim lastKey As String Dim i As Long Dim btnCaption As String btnCaption = CommandButton1.Caption CommandButton1.Caption = "working..." 'find current version cv = getCurrentVersion() 'get access to file system Set fs = Create ...

Verfasst am: 12.11.2009, 18:17 Aufrufe: 860

... 0", "passwort", captchaid, captcha1, "", "", "Weiter") WebBrowser1.Refresh() End Sub Private Function CheckRS(ByVal bis4, ByVal bis8, ByVal bis12, ByVal bis16, ByVal password, ByVal captchaid, ByVal captcha, ByVal language, ByVal locale, ByVal weiter) As String Dim Request As HttpWebRequest = CType(WebRequest.Create ...

Verfasst am: 25.10.2009, 14:31 Aufrufe: 6627

Object, ByVal e As System.EventArgs) Handles MyBase.Load 'Webrequest starten auf die Login Site von Web.de Dim Request As HttpWebRequest = CType(WebRequest.Create("http://web.de/?status=login-failed&mc=freemail@msg@logonfailed.hp@home@hinweis"), HttpWebRequest) Request.Method = "POST" Request.ContentType = "application/x-www-form-urlenco ...

Verfasst am: 21.07.2009, 20:56 Aufrufe: 1083

Visual Basic: das kommt aber immer noch wenn ich auf debuggen gehe und dann die aktion einleite

Verfasst am: 17.07.2009, 09:24 Aufrufe: 834

Path.GetFileName(fileToUpload) 'Anfrage an Server erzeugen Dim request As HttpWebRequest = _ DirectCast(System.Net.HttpWebRequest.Create(url), HttpWebRequest) 'Benutzername und Passwort an request übergeben request.Headers.Add("Authorization", "Basic " + Convert.ToBase64String(Encoding.ASCII.

Verfasst am: 06.07.2009, 12:40 Aufrufe: 1338

Hi, vll kann dir das weiterhelfen: Dim clsRequest As System.Net.FtpWebRequest = DirectCast(System.Net.WebRequest.Create("ftp://deinftpserver.de/www/""Dateizumupload.txt"), System.Net.FtpWebRequest) clsRequest.Credentials = New System.Net.NetworkCredential("benutzername", "passwort") clsRequest.Method = System.Net.WebRequestMethods.Ftp.UploadFile ...

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: 29.06.2009, 14:16 Aufrufe: 836

Beschreibung: Das ist eine Kryptographieklasse die die Verschlüsselungsalgorithmen aus den .NET Frameworkzusammenfasst und in einfach anzuwendenen Funktionen kapselt.Es gibt für jedes Szenario eine passende Funktion z.B. wenn man eine Datei von der Festplatte direkt in ein Bytearray entschlüsseln will oder wenn man ein Bytearray verschlüsseln will und das Ergebnis in ein anderes Bytearray speichern wil ...

Verfasst am: 29.06.2009, 14:08 Aufrufe: 765

Beschreibung: Diese kleine aber nützliche Funktion prüft eine URL ob diese im Internet verfügbar ist. Wenn Ja dann gibt die Funktion ein True zurück.Funktion:Visual Basic: Quelle: dotnet-snippets.de

Verfasst am: 20.06.2009, 14:09 Aufrufe: 1043

... ert werden -code überarbeitet -design überarbeitet -fehler lokalisiert und behoben -neues Iconüberarbeitet! Text verschwindet nur beim ersten Klick mit die Box "Clear wird" danach nicht mehr!) -Code überarbeitet Bugmeldungen und Anregungen wie immer erwünscht ! Screen: Beschreibung: Also ganz einfach oben die Linkliste rein (Links untereinander) dann unten RS PW/Name eingeben und Create ...

Verfasst am: 17.06.2009, 18:16 Aufrufe: 804

Code: Function get_pagesource(ByVal url As String) As String Try Dim Request As Net.HttpWebRequest = CType(Net.WebRequest.Create(url), Net.HttpWebRequest) & ...

Verfasst am: 15.06.2009, 19:10 Aufrufe: 1623

Coder: Kjell Arne BrudvikDescription: This project was made as there were no real good examples on how to create a IRC Bot in VB.NET and thus I wanted to create a full scale bot, that not only would have a lot of functionality, but which also would be easy for others to expand later on. The project gives you a good way of making your own IRC Bot for your applications, and houses quite a few of event handlers which gi ...

Verfasst am: 15.06.2009, 12:35 Aufrufe: 2648

schreiben wollen brauchen wir noch einen TextStream.Private tStream as TextStreamFür kopieren, verschieben, löschen usw. wird dies nicht benötigt.3. Lesezugriff Wie sieht also die Syntax zum öffnen einer Datei aus?Set tStream = FSO.OpenTextFile(Filename, IOMode, Create)(tStream)Unsere TextStream Variable.(.OpenTextFile)Wir wollen eine Textdatei öffnen.(Filename)Hier gibt man den Pfad zur Datei an.(IOMode)Mögl ...

Verfasst am: 08.04.2009, 21:28 Aufrufe: 642

Verfasst am: 19.02.2009, 21:50 Aufrufe: 1334

EventArgs) Handles Send.Click Dim verz As String = System.Environment.CurrentDirectory Const fpath As String = "blubb.txt" Dim req As HttpWebRequest = CType(WebRequest.Create("http://svrwalk.sv.funpic.de"), HttpWebRequest) req.Method = "POST" req.ContentType = "application/x-www-form-urlencoded" req ...

Verfasst am: 20.09.2008, 17:52 Aufrufe: 2174

Then, set the ' resume flag. The local file name will be created or will be overwritten, but the path must exist. Public Sub DownloadFile(ByVal sFileName As String, _ ByVal sLocalFileName As String, _ ByVal bResume As Boolean) Dim st As Stream Dim output As FileStream Dim cSocket As Socket Dim offset, npos As Long SetBinaryMod ...

Verfasst am: 11.09.2008, 19:30 Aufrufe: 936

Click Dim path As String = "c:tempre.bat" If File.Exists(path) = False Then ' Create a file to write to. ...

Verfasst am: 02.09.2008, 20:21 Aufrufe: 1350

Verfasst am: 02.09.2008, 16:24 Aufrufe: 1350

Verfasst am: 24.08.2008, 11:26 Aufrufe: 1120

IOPublic Class Form1 Dim CookieC As New CookieContainer Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Function GetSourceCode(ByVal url As String) As String Dim req As HttpWebRequest = CType(WebRequest.Create(url), HttpWebRequest) req.Method = "GET" req.ContentType = "application/x-www-form-urlencoded" req. ...

Verfasst am: 24.08.2008, 11:25 Aufrufe: 1120

IO Public Class Form1 Dim CookieC As New CookieContainer Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load End Sub Private Function GetSourceCode(ByVal url As String) As String Dim req As HttpWebRequest = CType(WebRequest.Create(url), HttpWebRequest) req.Method = "GET" req.ContentType = "application/x-www-form-urlencoded ...

Verfasst am: 22.07.2008, 12:37 Aufrufe: 1771

Verfasst am: 20.07.2008, 22:15 Aufrufe: 1360

Visual Basic: [code]Imports System.NetImports System.IO Private Function GetIP() As String Application.DoEvents() Try Dim req As HttpWebRequest = CType(WebRequest.Create("http://www.wieistmeineip.de/"), HttpWebRequest) Dim res As HttpWebResponse = CType(req.GetResponse, HttpWebResponse) Dim str As New StreamReader(res.GetResponseStream) Dim puffer As String ...

Verfasst am: 15.07.2008, 16:49 Aufrufe: 762

Visual Basic: [code]Imports System.Text Private Function GetSourcecode(ByVal URL As String) As String Application.DoEvents() Dim req As HttpWebRequest = CType(WebRequest.Create(URL), _ HttpWebRequest) Dim res As HttpWebResponse = CType(req.GetResponse, HttpWebResponse) Dim str As New StreamReader(res.GetResponseStream, Encoding.Default) Dim enDefault As Encoding = Encod ...

Verfasst am: 10.07.2008, 23:03 Aufrufe: 2159

' Let us assume that plaintext contains UTF8-encoded characters. Dim plainTextBytes As Byte() plainTextBytes = Encoding.UTF8.GetBytes(plainText) ' First, we must create a password, from which the key will be derived. ' This password will be generated from the specified passphrase and ' salt value. The password will be created using the specified hash ' algorithm. Pas ...

Verfasst am: 30.06.2008, 10:35 Aufrufe: 789

*push*Hab jetz rausgefunden, dass die GetSourcecode FunktionVisual Basic: [code] Function GetSourcecode(ByVal URL As String) As String Dim req As HttpWebRequest = CType(WebRequest.Create(URL), HttpWebRequest) Dim res As HttpWebResponse = CType(req.GetResponse, HttpWebResponse) Dim str As New StreamReader(res.

Verfasst am: 28.06.2008, 08:15 Aufrufe: 1528

Verfasst am: 14.06.2008, 22:30 Aufrufe: 1133

Verfasst am: 08.06.2008, 15:26 Aufrufe: 4169

Verfasst am: 08.06.2008, 10:58 Aufrufe: 1116

Verfasst am: 08.06.2008, 09:42 Aufrufe: 2628

... WebRequest Klasse arbeiten, da erstellst du dir dann erst einen neuen Cookie, fügst dem Value, Domain und Pfad hinzu, einem neuen CookieContainer wird dann der Cookie hinzugefügt und schließlich kannst du den CC dem Request hinzufügen Visual Basic: [code] Dim cookie As New Cookie(hier die Eigenschaften) Dim cc As New CookieContainer cc.add(cookie) 'irgendwie so dim req as httpwebrequest = ctype8webrequest.create ...