SIMPLE oledb FILL Gridview connectionstring

Imports System.Data.OleDb
Imports System.Data

        Dim cn As New oledbConnection
        Dim ds As New DataSet
        Dim da As New oledbDataAdapter
 cn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=|DataDirectory|bupdate.mdb")

        Dim cm As New OleDbCommand("select * from bupdate", cn)
        da = New oledbDataAdapter(cm)
        da.Fill(ds)
        GridView1.DataSource = ds.Tables(0)
        GridView1.DataBind()

MS Access Table Import from ane database to another

VB.NET Place ICON of your website into Browser AddressBar

//Go to Source Page from Design View and write this line after "head tag"

// Where folder path is C:/inetpub/wwwroot/Yourwebsitefolder/images/n.ico

.Net SQLExpress ConnectionString

 Imports System.Data.Sql
Imports System.Data.SqlClient
Imports System.Data

 Dim cn As New SqlConnection

cn = New SqlConnection("Data Source=.\SQLExpress;Integrated Security=True;User Instance=True;AttachDBFilename=|DataDirectory|mydb.mdf")

ASP.NET Web Services

click window key and + to enlarge otherwise use the link below to see a clear view....

A Simple Web Service in ASP.NET

VB.NET SQL Connection fill GridView

     Imports system.data.sqlclient
     Imports system.data

         Dim cn As New SqlConnection
        Dim sql As String
        Dim ds As New DataSet
        Dim da As New SqlDataAdapter
        cn = New SqlConnection("server=localhost;database=NLAB 2012-2013;integrated security=true")
        sql = "select * from mainmaster"
        Dim cm As New SqlCommand(sql, cn)
        da = New SqlDataAdapter(cm)
        da.Fill(ds)
        GridView1.DataSource = ds.Tables(0)
        GridView1.DataBind()

VB.NET Access connectionstring with database password & server.mappath

Imports System.Data.OleDb
Imports System.Data

Dim oConn As OleDbConnection
        Dim oComm As OleDbDataAdapter
        Dim sConn As String
        Dim sComm As String
        Dim oDataSet As New DataSet
 sConn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("ivashi2011.mdb") & ";Jet OLEDB:Database Password=k12i07s2002s;"

        oConn = New OleDbConnection(sConn)
        sComm = "select * FROM mainmaster"
        oComm = New OleDbDataAdapter(sComm, oConn)
        oComm.Fill(oDataSet, "mainmaster")

        DataGrid1.DataSource = oDataSet.Tables("mainmaster").DefaultView
        DataGrid1.DataBind()

VB.NET OPEN any Type of file

Imports System.Diagnostics

 Dim p As New System.Diagnostics.Process
        Dim s As New System.Diagnostics.ProcessStartInfo("d:\report1.rpt")
        s.UseShellExecute = True
        s.WindowStyle = ProcessWindowStyle.Normal
        p.StartInfo = s
        p.Start()

VB.NET READ TEXT FILE

Imports System.IO.File

Dim fileText As String = My.Computer.FileSystem.ReadAllText("c:\sample.txt")
        Console.WriteLine(fileText)
OR
        Button1.Text = System.IO.File.ReadAllText("c:\sample.txt")

CAST in VB6

 dim date1 as date
date1=datetimepicker1.value

CAST('" & Format(date1, "mm/dd/yyyy") & "')