Live with Dot Net » VB .Net

How to Write bunch of text to a file

admin — Mon, 06 Feb 2012 13:35:15 +0000

Here is one of the way to Write bunch of text to flat file: 1 2 3 4 5 6 7 8 9 10 11 12 Public Sub WriteFile(ByVal sText As String, ByVal sFile As String, Optional ByVal bAppendMode As Boolean = True) Try Dim Stream_Writer As New IO.StreamWriter(sFile, bAppendMode) Stream_Writer.Write(sText & vbCrLf) Stream_Writer.Flush() Stream_Writer.Close() [...]

How to Write bunch of text to a file is a post from: Live with Dot Net

How to Check whether given file exists or not

admin — Sun, 05 Feb 2012 23:21:37 +0000

Here is the code to Check whether the given file exists or not in VB.Net: 1 2 3 Public Function IsFileExists(ByVal strFileName As String) As Boolean IsFileExists = System.IO.File.Exists(strFileName) End Function How to Check whether given file exists or not is a post from: Live with Dot Net

How to Check whether given file exists or not is a post from: Live with Dot Net

How to get System’s active printer name

admin — Sun, 05 Feb 2012 02:07:42 +0000

Here is the code to get the System's active printer name: 1 2 3 4 Private Function GetActivePrinter() As String Dim ps As New Drawing.Printing.PrinterSettings() Return ps.PrinterName End Function How to get System’s active printer name is a post from: Live with Dot Net

How to get System’s active printer name is a post from: Live with Dot Net

Using XML Nodes and implement RegEx in VB.Net

admin — Sat, 04 Feb 2012 01:31:35 +0000

Retrive the information from the XML File and evalute the string using the Regular expression. XML File which we will iterate and retrive data from: Pattern.xml:- 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 <?xml version="1.0" encoding="utf-8" ?> - <MatchingCriterias> - [...]

Using XML Nodes and implement RegEx in VB.Net is a post from: Live with Dot Net

How to import MS SQL Server Data into MS Access database

admin — Mon, 30 Jan 2012 10:50:18 +0000

The following simple code will import the MS SQL Server data/table into an Access Database. It uses ADO. 1 2 3 4 5 6 7 'Set Reference to ADODB Private Sub Import_MS_SQL_Server_Data_Into_MS_Access() Dim cn As New Adodb.Connection cn.Open "Driver={Microsoft Access Driver (*.mdb)};Dbq=Your_Access_Database.mdb;DefaultDir=C:\test;Uid=admin;Pwd=admin;" cn.Execute "SELECT * INTO [table_data] FROM [ODBC;Driver=SQL Server; SERVER=MySQL_Server;DATABASE=MySQL_DB;UID=MySQL_User;PWD=MySQL_Password;].[table_data];" cn = Nothing End [...]

How to import MS SQL Server Data into MS Access database is a post from: Live with Dot Net