Jag hittade precis den här kodbiten som tydligen är en simpel IRC-klient skriven i VB.net. (på sidan jag länkar till längst ner (källa) finns koden för CSharp om nån vill ha den. Det finns även…
Plocka ut filer ur katalog – VB.net Dim folderInfo As New IO.DirectoryInfo(”c:\windows”) Dim arrFilesInFolder() As IO.FileInfo Dim fileInFolder As IO.FileInfo arrFilesInFolder = folderInfo.GetFiles(”*.*”) For Each fileInFolder In arrFilesInFolder ListBox1.Items.Add(fileInFolder.Name) Next
Få HTML från Webbrowser-komponenten MsgBox(WebBrowser1.Document.Body.InnerHtml())
VB.net: Webbrowser-component – Change Combobox Value ska stå kvar… WebBrowser1.Document.GetElementById(”id_record_type”).SetAttribute(”value”, ”CANADA”)
Loopa igenom form-element i VB.net Dim elements = WebBrowser1.Document.Forms(0).Document.GetElementsByTagName(”input”) For Each element In elements MsgBox(element.name) If element.name = ”email” Then element.SetAttribute(”value”, ”[email protected]”) Next
VB.net MD5 – Create MD5 and Verify MD5 Imports System Imports System.Security.Cryptography Imports System.Text Module Example ’ Hash an input string and return the hash as ’ a 32 character hexadecimal string. Function getMd5Hash(ByVal input…
Remove item from array in VB.net: Ta bort sak från array i vb.net ’1. order is not preserved In this approach, but very simple MyArray(ItemToBeDeleted) = MyArray( Ubound (MyArray)) Redim Preserve MyArray( Ubound (MyArray) -…
Kolla vilket år det är. Check what year it is. If DateTime.Now.Year.ToString() = ”2011” Then MsgBox(”The BETA isn’t active anymore”) End End If
Läser in hela filen i en variabel – VB.net Public Function GetFileContents(ByVal FullPath As String, _ Optional ByRef ErrInfo As String = ””) As String Dim strContents As String Dim objReader As StreamReader Try objReader…
Så här sparar man enkelt ner något i txt-filer i VB.net Public Function SaveTextToFile(ByVal strData As String, _ ByVal FullPath As String, _ Optional ByVal ErrInfo As String = ””) As Boolean Dim…