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)
