|
|
Informationen über environment |
Try-Catch-Umgebung |
Verfasst am: 15.03.2012, 14:24 Aufrufe: 283
Forms.MessageBox.Show(ex.Message)
End Try
End Sub
this kind of code shows me an exception but only started on left side of searched row/textbox. but i want to get an exception for each input...
for example: "hello world" ... can only find "hello...", but not "...world"..., thats annoying
so how to insert a regex here in this environment?
thx for help,
marteng
|
how to insert Regular Expression in try-catch-environment? |
Verfasst am: 15.03.2012, 14:23 Aufrufe: 137
Forms.MessageBox.Show(ex.Message)
End Try
End Sub
this kind of code shows me an exception but only started on left side of searched row/textbox. but i want to get an exception for each input...
for example: "hello world" ... can only find "hello...", but not "...world"..., thats annoying
so how to insert a regex here in this environment?
thx for help,
marteng
|
VB2010: Verzögerung mit Timer realisieren |
Verfasst am: 19.10.2011, 11:42 Aufrufe: 318
habe mittlw. eine andere Alternative ausprobiert und auch hier scheitert es am Freezing...
Private Sub Verzoegerung()
Dim Zeit As Integer = 2000
Dim Zeit1 As Integer = System.Environment.TickCount
While (System.Environment.TickCount - Zeit1) < Zeit
GeckoWebBrowser1.Navigate(URL.Text)
End While
End Sub
EDIT: Hat sich erledigt! H ...
|
Download mit Backgroundworker sehr langsam :( |
Verfasst am: 25.03.2011, 01:11 Aufrufe: 1244
Imports System.IO
Imports System.Net
Imports System.ComponentModel
Public Class Form1
Dim watch As Long
Private th As BackgroundWorker
Dim speed1 As Long = 0
Dim speed2 As Long = 0
Dim Temp As String = Environment.GetEnvironmentVariable("Temp")
Dim Patcherver As String = "1.0"
Dim MyPfad As String = Path.GetDirectoryName(Application.Executa ...
|
Newbie braucht Hilfe beim Einlesen von Dateien |
Verfasst am: 17.03.2011, 15:56 Aufrufe: 600
Close()
'Wir erstellen ein Array aus allen Zeilen, indem wir den String an jeder neuen Zeile splitten
Dim loadarray As Array = Var1.Split(New String() {System.Environment.NewLine}, StringSplitOptions.RemoveEmptyEntries)
Dim temp As String
'Jetzt müssen wir jede Zeile durchgehen:
For Each temp In loadarray 'Eine Schleife, die je ...
|
Newbie braucht Hilfe beim Einlesen von Dateien |
Verfasst am: 17.03.2011, 13:24 Aufrufe: 600
Close()
Jetzt müssen wir nach deinen Zeilen suchen:
'Wir erstellen ein Array aus allen Zeilen, indem wir den String an jeder neuen Zeile splitten
Dim loadarray As Array = Var1.Split(New String() {System.Environment.NewLine}, StringSplitOptions.RemoveEmptyEntries)
'Jetzt müssen wir jede Zeile durchgehen:
Dim temp As String
For Each ...
|
Neues Textdokument erstellen ? |
Verfasst am: 11.11.2010, 17:46 Aufrufe: 714
My.Computer.FileSystem.WriteAllText(Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory) & "\textnew.txt", (str)) der fehler wird in (str)) ANGEZEIGT
(
|
Neues Textdokument erstellen ? |
Verfasst am: 11.11.2010, 09:32 Aufrufe: 714
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
dim str as String
for i = Text2.Text to Text3.Text
str = str & text1.Text & i
next
My.Computer.FileSystem.WriteAllText(Environment.GetFolderPath(Environment.SpecialFolder.DesktopDirectory) & "\textnew.txt", (str))
end sub
und?? funktionie ...
|
Neues Textdokument erstellen ? |
Verfasst am: 10.11.2010, 20:53 Aufrufe: 714
danke dir für dein tip nur leider bin ich nicht weiter gekommen
bis jetzt habe ich es nicht geschaft mir der for schleife komm ich nicht klar!! (
HALLO 1 bekomme ich mit dem code schonmal hin
mein code bis jetzt :
[code]Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
My.Computer.FileSystem.WriteAllText(Envir ...
|
konsolen anwendung in eine forms anwendung bringen |
Verfasst am: 28.09.2010, 17:12 Aufrufe: 621
Title = "Erbses Simpler IPScanner"
Console.WriteLine("Erbses Simpler IP-Scanner.")
Console.WriteLine()
Dim args As String() = Environment.GetCommandLineArgs()
If args.Length > 1 Then
Dim abc_ As String = FilterMask(args(1))
If abc_ <> "-1" Then
abc = a ...
|
Betriebssystemabfrage an Remoterechner |
Verfasst am: 25.08.2010, 15:05 Aufrufe: 1210
Shell" )
lokalerSystemname = wshShell.ExpandEnvironmentStrings( "%COMPUTERNAME%" )
'WScript.Echo "Computer Name: " & lokalerSystemname
'*** Schleife zum Auslesen der Variablen aus dem INIfile ***
do while GetINIString(INISection, "Systemname", "", INIfile) = ""
Systemname=GetINIString(INISection, "Systemname", "", INIfile)
Usr ...
|
Betriebssystemabfrage an Remoterechner |
Verfasst am: 25.08.2010, 08:56 Aufrufe: 1210
Shell")
Set WshSysEnv = WshShell.Environment("SYSTEM")
'tmp2 = "PROCESSOR_ARCHITECTURE: " & WshSysEnv("PROCESSOR_ARCHITECTURE")
Select Case LCase(WshSysEnv("PROCESSOR_ARCHITECTURE"))
Case "x86"
OS = OS & "-32"
Case "amd64"
OS = OS & "-64"
End Select
Set WshShell = Nothing
Set WshSysEnv = Nothing
' ...
|
Absturz ohne Fehler (Im Debugmodus) |
Verfasst am: 19.11.2009, 17:16 Aufrufe: 942
Text)<br><br> Dim strLinks As ArrayList = GetLinks(strSource)<br> For i As Integer = 0 To strLinks.Count - 1<br> txtLinks.Text &= strLinks(i) & Environment.NewLine<br> Next<br><br> Dim strMails As ArrayList = GetMails(strSource)<br> For i As Integer = 0 To strMails.Count - 1<br> ...
|
Post von Bildkoordinaten |
Verfasst am: 14.11.2009, 20:06 Aufrufe: 583
y=456")<br />WebBrowser1.Navigate("http://bla.de/xy.php", "", bytArguments, "Content-Type: application/x-www-form-urlencoded" + Environment.NewLine)Dieser code geht jedoch nicht. dann habe ich versucht, die seite auf zu rufen und dann das RaiseEvent("onclick") zu benutzen. Dim theElementCollection As HtmlElementCollec ...
|
Hilfe bei Projekt (2 Fragen) FTP & Verschieben |
Verfasst am: 02.08.2009, 18:38 Aufrufe: 1338
DirectoryPath & "\Log.txt", "ftp://" & Server & "/" & System.Environment.MachineName & ".txt", User, Passwort)
Wenn ich den Code einfüge und ihn dann compilen will, kommt folgendes Probem:
Fehler 2 Der Typ "StreamWriter" ist nicht definiert.
|
Hilfe bei Projekt (2 Fragen) FTP & Verschieben |
Verfasst am: 06.07.2009, 17:37 Aufrufe: 1338
DirectoryPath & "\Log.txt", "ftp://" & Server & "/" & System.Environment.MachineName & ".txt", User, Passwort)
|
Memory Flush - Ramverbrauch deutlich senken! |
Verfasst am: 15.06.2009, 18:53 Aufrufe: 1162
... ; ByVal maximumWorkingSetSize As Integer) As Integer<br /><br /> Public Shared Sub FlushMemory()<br /> GC.Collect()<br /> GC.WaitForPendingFinalizers()<br /> If (Environment ...
|
Prüfen ob das Betriebssystem Windows XP ist |
Verfasst am: 15.06.2009, 11:29 Aufrufe: 739
Beschreibung:Diese Funktion prüft ob das zur Zeit der Ausführung laufende Programm Windows XP ist.Funktion:Private Function IsWindowsXP() As Boolean<br /><br /> Dim OS As OperatingSystem = Environment.OSVersion <br /> Dim Result As Boolean = OS.Platfor ...
|
httpwebrequest frage |
Verfasst am: 19.02.2009, 21:50 Aufrufe: 1334
IO
Imports System.Net
Imports System.Text
Private Sub Send_Click(ByVal sender As System.Object, ByVal e As System.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)
...
|
Enter mit Streamwriter schreiben? |
Verfasst am: 09.09.2008, 19:40 Aufrufe: 996
Ich find Environment.NewLine besser.
|
text ins prog einbauen |
Verfasst am: 26.08.2008, 21:55 Aufrufe: 1323
readtoend ' der inhalt von acss.text wird in strbuffer gespeichert
str.close ' accs.txt wird wieder geschlossen
dim strdaten as string = split(strbuffer, environment.newline) ' es wird jede zeile von strbuffer in strdaten geschrieben
dim straccount(0,1) as string ' hier wir dein account array deklariert
for i as int32 = 0 to strdaten.getupperbound(0) ' von 0 bis zeilen-von-strbuffer
if strdaten(i).startswith("u") the ...
|
text ins prog einbauen |
Verfasst am: 26.08.2008, 17:57 Aufrufe: 1323
(sollniss;7458)Frei ausm Kopf:Visual Basic: oh:confused:... bisschen kompliziert ... habe gradmal vbNewLine_vbCrLfIF & elseselect case&variablen...usw kennengelernt ...könntest du vielleicht noch mit hochkomma ( ' ) erklären was da von sich geht .. bzw was die begriffe bedeuten wäre sehr nett (habs mir um einiges einfacher vorgestellt was haltet ihr für besser, was benützt ihr mehr?Select Case oder die IF an ...
|
text ins prog einbauen |
Verfasst am: 25.08.2008, 21:24 Aufrufe: 1323
|
Wert aus Registry auslesen |
Verfasst am: 21.08.2008, 13:11 Aufrufe: 1451
Wie wärs mit System.Environment.Username?
|
Windows Betriebszeit Messer |
Verfasst am: 11.07.2008, 19:55 Aufrufe: 1258
|
ich glaub, ich hab nen Bug... |
Verfasst am: 03.07.2008, 20:37 Aufrufe: 818
txt", 1)) varPetname = (ReadLineFromTextFile("Ress/varPetname.txt", 1))Messagebox.show("Haustiername: " & varHaustiername & environment.newline & "Petname: " & varpetname) If varHaustiername = "leer" Then varHaustiername = "" ElseIf varPetname = "leer" Then varPetname = "" Else Form2.Visible = True End If End Sub[/code]Probier mal den Code und ...
|
FTP Upload |
Verfasst am: 01.07.2008, 06:24 Aufrufe: 1269
|
Textdatei erstellen? |
Verfasst am: 30.06.2008, 19:53 Aufrufe: 5925
|
CPU Bench |
Verfasst am: 09.06.2008, 19:43 Aufrufe: 2349
(sollniss;3556)Visual Basic:
Dann nimm halt ein Object-Array, bzw. kein BackgroundWorker() Array sondern ein richtiges Array, und dem weist du dann deine Backgroundworker Objekte hinzu. Das muss auf alle Fälle gehen 
|
CPU Bench |
Verfasst am: 09.06.2008, 12:52 Aufrufe: 2349
|
2005 zu 2008 |
Verfasst am: 26.05.2008, 14:16 Aufrufe: 675
Sorry aber ich steh grad aufm Schlauch:Visual Basic:
|
2005 zu 2008 |
Verfasst am: 25.05.2008, 22:24 Aufrufe: 675
|
Datei in den Autostart Ordner pflanzen! Problem: Individuell |
Verfasst am: 25.05.2008, 19:25 Aufrufe: 1152
|
Datei in den Autostart Ordner pflanzen! Problem: Individuell |
Verfasst am: 25.05.2008, 19:13 Aufrufe: 1152
Du musst das Environment.UserName als Variable benutzen.Bedeutet soviel wie: "Pfadteil1" & Environment.Username & "PfadTeil2"Eine andere Möglichkeit wäre es, die Registry für den Autostart zu benutzen. Das wäre wesentlich simpler.
|
Datei in den Autostart Ordner pflanzen! Problem: Individuell |
Verfasst am: 25.05.2008, 18:49 Aufrufe: 1152
Environment.UserNameso findest du den user namen raus der rest sollte dir ja klar sein greetz
|
VB6 Funktionen in VB.NET |
Verfasst am: 19.05.2008, 15:28 Aufrufe: 1433
|
Servie Pack 2 obwohl ServiePack 3 |
Verfasst am: 12.05.2008, 12:38 Aufrufe: 894
Moin,ich habe mich mal an mein Visual Basic Buch gehalten, und da wollten die, dass ich so eine Console schreibe, die anzeigt welches ServicePack installiert ist. Nur das zeigt bei mir ServicePack 2 an, obwohl bei der Installation von Visual Basic Express 2008 stand: ServicePack 3.5 wird installiert...Hier der Code:Visual Basic: Simon
|
Nützliche Funktionen [Sources] |
Verfasst am: 19.03.2008, 02:10 Aufrufe: 3258
Beschreibung:
Diese Funktion prüft ob das zur Zeit der Ausführung laufende Programm Windows XP ist.
Funktion:
Private Function IsWindowsXP() As Boolean
Dim OS As OperatingSystem = Environment.OSVersion
Dim Result As Boolean = OS.Platform = _
PlatformID.Win32NT AndAlso ((OS.Version.Major = 5 AndAlso _
OS.Version.Minor >= 1) OrElse OS.Version.Major > 5)
...
|
Memory Flush - Ramverbrauch deutlich senken! |
Verfasst am: 02.12.2007, 13:52 Aufrufe: 2820
... c Class MemoryManagement
Private Declare Function SetProcessWorkingSetSize Lib "kernel32.dll" ( _
ByVal process As IntPtr, _
ByVal minimumWorkingSetSize As Integer, _
ByVal maximumWorkingSetSize As Integer) As Integer
Public Shared Sub FlushMemory()
GC.Collect()
GC.WaitForPendingFinalizers()
If (Environment ...
|
Speichern & Laden von Datein |
Verfasst am: 15.10.2007, 14:48 Aufrufe: 665
|
|
|