absoluter anf?nger

absoluter anf?nger

___________________________
Greez Smartyx

___________________________
Greez Smartyx

absoluter anf?nger

___________________________
Greez Smartyx

absoluter anf?nger

absoluter anf?nger

SqlConnection1.Open()
        Dim dreader2 As SqlClient.SqlDataReader
 
        dreader2 = cmdtest.ExecuteReader()
        dreader2.Read()
        txttest.Text = dreader2(0)
 
        dreader2.Close()
 
 
        SqlConnection1.Close()

absoluter anf?nger

absoluter anf?nger

Imports System.Data.SqlClient
Public Class Form1
    Inherits System.Windows.Forms.Form
    Dim conn As SqlConnection
    Dim strSQL As String
    Dim cmd As SqlCommand
    Dim ds As DataSet
    Dim da As SqlDataAdapter
 
#Region " Vom Windows Form Designer generierter Code "
   #End Region
 
    Sub DB_Connection()
 
        Try
 
            conn = New SqlConnection("Data" & _
              "Source=BISTRO-CASH;Database=Northwind;uid=sa;pwd=passwort;Integ" & _
              "ated Security=SSPI")
            cmd = New SqlCommand("Select * from Customers", conn)
            ds = New DataSet
            da = New SqlDataAdapter(cmd)
            da.Fill(ds, "Customers")
            DataGrid1.DataSource = ds.Tables("Customers")
 
        Catch ex As Exception
            MessageBox.Show(ex.Message, "Fehler", MessageBoxButtons.OK, _
              MessageBoxIcon.Error, MessageBoxDefaultButton.Button1)
        End Try
 
    End Sub
 
End Class

absoluter anf?nger

absoluter anf?nger

absoluter anf?nger

xlMappe.SaveAs(src)
            xlMappe.Close()
            xlApp.Quit()

absoluter anf?nger