Public Class frmadmin
    Private ConnectionString As String = "Integrated Security=SSPI;" + _
            "Initial Catalog=;" + "Data Source=192.168.1.1;" + "User" & _
            "Id=christoph;Password=chanri;"
 
    Private reader As SqlClient.SqlDataReader = Nothing
    Private conn As SqlClient.SqlConnection = Nothing
    Private cmd As SqlClient.SqlCommand = Nothing
    Private AlterTableBtn As System.Windows.Forms.Button
    Private sql As String = Nothing
    Private CreateOthersBtn As System.Windows.Forms.Button
    Private button1 As System.Windows.Forms.Button
 
 
    Private Sub ExecuteSQLStmt(ByVal sql As String)
        ' Open the connection
        If conn.State = ConnectionState.Open Then
            conn.Close()
        End If
        ConnectionString = "Integrated Security=SSPI;" + "Initial" & _
          "Catalog=mydb;" + _
                        "Data Source=localhost;"
        conn.ConnectionString = ConnectionString
        conn.Open()
        cmd = New SqlClient.SqlCommand(sql, conn)
        Try
            cmd.ExecuteNonQuery()
        Catch ae As SqlClient.SqlException
            MessageBox.Show(ae.Message.ToString())
        End Try
    End Sub 'ExecuteSQLStmt
 
    Private Sub cmdDB_erstellen_Click(ByVal sender As System.Object, ByVal e As _
      System.EventArgs) Handles cmdDB_erstellen.Click
        ' Create a connection
        conn = New SqlClient.SqlConnection(ConnectionString)
        ' Open the connection
        If conn.State <> ConnectionState.Open Then
            conn.Open()
        End If
        Dim sql As String = "CREATE DATABASE mydb ON PRIMARY" + _
                        "(Name=test_data, filename = 'C:\mysql\mydb_data.mdf'," & _
                        "size=3," + _
                        "maxsize=5, filegrowth=10%)log on" + _
                        "(name=mydbb_log," & _
                        "filename='C:\mysql\mydb_log.ldf',size=3," + _
                        "maxsize=20,filegrowth=1)"
        ExecuteSQLStmt(sql)
 
    End Sub
END Class

 
conn.Open()

Zitat:

Fehler beim Herstellen einer Verbindung mit dem Server. Beim Herstellen einer Verbindung mit SQL Server 2005 kann dieser Fehler dadurch verursacht werden, dass unter den SQL Server-Standardeinstellungen Remoteverbindungen nicht zulässig sind. (provider: Named Pipes-Provider, error: 40 - Verbindung mit SQL Server konnte nicht geöffnet werden)DaveS schrieb: