Форум программистов [Powered by Invision Power Board]

Версия для печати темы
Нажмите сюда для просмотра этой темы в оригинальном формате

Форум программистов > VB .NET > Подскажите с ado.net ом

Автор: gsa 13.1.2008, 17:36

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        Dim strconn, strSQL As String
        strconn = "data source=Sdrfgwer-8c51a5;" & "initial catalog=northwind; Trusted_connection=No;"
        Dim cn As New SqlConnection(strconn)
        cn.Open()

        strSQL = "UPDATE Products SET UnitPrlce = UnitPrice * 0.65 " & "WHERE CategorylD = 3:" & "UPDATE Products SET UnitPrice = UnitPrice • 1.15 " & "WHERE CategorylD = 4;" & "UPDATE Products SET UnitPrice = UnitPrice * 0.75 " & "WHERE CategorylD = 5;"
        Dim cmd As New SqlCommand(strSQL, cn)
        AddHandler cmd.StatementCompleted, _
        AddressOf HandleStatementCompleted
        Dim intTotalRowsAffected As Integer = cmd.ExecuteNonQuery()
        Console.WriteLine("TotalRowsAffected: {0}  row(s)", intTotalRowsAffected)
        cn.Close()
Public Sub HandleStatementCompleted(ByVal sender As Object. _
ByVal e As StatementCompletedEventArgs)
        Console.WriteLine("Statement Affected    {0} row(s)", e.RecordCount)

что тут не правильно написано. вроде все правильно , но никак не компилируется ....

Автор: Experimenter 23.1.2008, 12:21

А End Sub умышленно не вставил? И что за ошибка выскакивает?