sql database fejl
Hej E.Jeg har nedenstående kode:
Men der kommer en fejl når jeg prøvet at åbne min connection.
(se her: http://www.dotdk.dk/exp/error.asp)
Er der en som kan hjælpe mig videre.
Jeg har prøvet med :
SqlConnection("server=(local);database=pubs;uid=;pwd=")
Da jeg burger windows logon til at logge på sql databasen.
Imports System.Data
Imports System.Data.SqlClient
Public Class Form1
Inherits System.Windows.Forms.Form
Dim myConnection As SqlConnection = New _
SqlConnection("server=(local);database=pubs;uid=jakob;pwd=jakob")
Dim myDataAdapter As New SqlDataAdapter()
Dim myDataSet As DataSet = New DataSet()
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'set the selectcommand properties...
myDataAdapter.SelectCommand = New SqlCommand()
myDataAdapter.SelectCommand.Connection = myConnection
myDataAdapter.SelectCommand.CommandText = _
"Select au_lname, au_fname, title, price" & _
"From authors " & _
"Join titleauthor on authors.au_id = titleauthor.au_id " & _
"Join titles on titleauthor.title_id = titles.title_id " & _
"Order By au_lname, au_fname"
myDataAdapter.SelectCommand.CommandType = CommandType.Text
'Open the connection
myConnection.Open()
'now execute the command
myDataAdapter.SelectCommand.ExecuteNonQuery()
'Fill the dataset object with data
myDataAdapter.Fill(myDataSet, "Authors")
'lukker igen
myConnection.Close()
grdAuthorTitles.DataSource = myDataSet
grdAuthorTitles.DataMember = "authors"
End Sub
End Class
