Koneksi String SQL Server

Lagi coba belajar pemograman VB.Net dengan database MS SQL, sekarang lagi ngulik koneksi ke database SQL Server pake script :

imports system.Data.SqlClient

Public Class LoginForm1
Inherits System.Windows.Forms.Form 

Private xkoneksi As New SqlConnection
Private xadapter As New SqlDataAdapter
Private xcommand As New SqlCommand
Private xdataset As New DataSet
Private xreader As SqlDataReader 

Private Sub LoginForm1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim oRead As System.IO.StreamReader
Dim mIP As String
  oRead = IO.File.OpenText("IP.txt")
  mIP = oRead.ReadToEnd()
  xkoneksi.ConnectionString = "Server=" & mIP & ";Database=DATAHR;User ID=sa;Password=123"
  xkoneksi.Open()
End Sub

Keterangan… (menyusul lagi diujicoba dulu)

Membandingkan 2 kolom data di Ms Excel

Kebiasaan berkutat di jaringan, trus ada temen minta dibuatin macro untuk mempercepat pekerjaanya, terpaksa deh dikerjain sekalian belajar. Pasti atas bantuan om google – search kesana kemari, ga ketemu juga macro yang cocok untuk kasus seperti ini. Akhirnya corat-coret lagi algoritma untuk bikin program seperti ini.