A
Ashe Sjedic
Imports Microsoft.VisualBasic
Imports System.Data
Imports System.Data.SqlClient
Public Class Claim
Sub getrecordset()
Dim connstring As String
ConnString = "Data
Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\Movie_Data.MDF;Integrated
Security=True;User Instance=True"
Dim dbconn As New System.Data.SqlClient.SqlConnection(ConnString)
Dim dbCommand As New System.Data.SqlClient.SqlCommand(dbconn)
TheOneValue = dbCommand.ExecuteScalar()
End Sub
End Class
Imports System.Data
Imports System.Data.SqlClient
Public Class Claim
Sub getrecordset()
Dim connstring As String
ConnString = "Data
Source=.\SQLEXPRESS;AttachDbFilename=|DataDirectory|\Movie_Data.MDF;Integrated
Security=True;User Instance=True"
Dim dbconn As New System.Data.SqlClient.SqlConnection(ConnString)
Dim dbCommand As New System.Data.SqlClient.SqlCommand(dbconn)
TheOneValue = dbCommand.ExecuteScalar()
End Sub
End Class