Artikel |

5. Oktober 2015
von Centron GmbH
Kommentare deaktiviert für ODBC.NET Datenquellen (Data Provider) (System.Data.ODBC)

ODBC.NET Datenquellen (Data Provider) (System.Data.ODBC)

Die Open Database Connectivity (ODBC) .NET Datenquellen (Data Provider) stellen den Zugriff auf native ODBC-Treiber auf dieselbe Art und Weise zur Verfügung wie die OLE DB .NET Datenquellen (Data Provider) den Zugriff auf native OLE DB Datenquellen ermöglicht.

Hinweis: Die folgenden Inhalte werden nur in Version 1.1 des .NET Frameworks unterstützt.

Verwendung des SQL Server ODBC-Treibers:

' VB.NET 
Imports System.Data.Odbc 
... 
Dim oODBCConnection As OdbcConnection 
Dim sConnString As String = _
    "Driver={SQL Server};" & _
    "Server=MySQLServerName;" & _
    "Database=MyDatabaseName;" & _
    "Uid=MyUsername;" & _
    "Pwd=MyPassword" 
oODBCConnection = New Odbc.OdbcConnection(sConnString) 
oODBCConnection.Open()

' VB.NET

Imports System.Data.Odbc

...

Dim oODBCConnection As OdbcConnection

Dim sConnString As String = _

"Driver={SQL Server};" & _

"Server=MySQLServerName;" & _

"Database=MyDatabaseName;" & _

"Uid=MyUsername;" & _

"Pwd=MyPassword"

oODBCConnection = New Odbc.OdbcConnection(sConnString)

oODBCConnection.Open()

Verwendung des Oracle ODBC-Treibers:

' VB.NET 
Imports System.Data.Odbc 
... 
Dim oODBCConnection As OdbcConnection 
Dim sConnString As String = _ 
    "Driver={Microsoft ODBC for Oracle};" & _ 
    "Server=OracleServer.world;" & _ 
    "Uid=myUsername;" & _ 
    "Pwd=myPassword" 
oODBCConnection = New Odbc.OdbcConnection(sConnString) 
oODBCConnection.Open()

' VB.NET

Imports System.Data.Odbc

...

Dim oODBCConnection As OdbcConnection

Dim sConnString As String = _

"Driver={Microsoft ODBC for Oracle};" & _

"Server=OracleServer.world;" & _

"Uid=myUsername;" & _

"Pwd=myPassword"

oODBCConnection = New Odbc.OdbcConnection(sConnString)

oODBCConnection.Open()

Verwendung des Access (JET) ODBC-Treibers:

' VB.NET 
Imports System.Data.Odbc 
... 
Dim oODBCConnection As OdbcConnection 
Dim sConnString As String = _ 
    "Driver={Microsoft Access Driver (*.mdb)};" & _ 
    "Dbq=c:\somepath\mydb.mdb;" 
oODBCConnection = New Odbc.OdbcConnection(sConnString) 
oODBCConnection.Open()

' VB.NET

Imports System.Data.Odbc

...

Dim oODBCConnection As OdbcConnection

Dim sConnString As String = _

"Driver={Microsoft Access Driver (*.mdb)};" & _

"Dbq=c:\somepath\mydb.mdb;"

oODBCConnection = New Odbc.OdbcConnection(sConnString)

oODBCConnection.Open()

Verwendung des Sybase System 11 ODBC-Treibers:

' VB.NET 
Imports System.Data.Odbc 
... 
Dim oODBCConnection As OdbcConnection 
Dim sConnString As String = _ 
    "Driver={Sybase System 11};" & _ 
    "SRVR=mySybaseServerName;" & _ 
    "DB=myDatabaseName;" & _ 
    "UID=myUsername;" & _ 
    "PWD=myPassword" 

oODBCConnection = New OdbcConnection(sConnString) 
oODBCConnection.Open()

' VB.NET

Imports System.Data.Odbc

...

Dim oODBCConnection As OdbcConnection

Dim sConnString As String = _

"Driver={Sybase System 11};" & _

"SRVR=mySybaseServerName;" & _

"DB=myDatabaseName;" & _

"UID=myUsername;" & _

"PWD=myPassword"

oODBCConnection = New OdbcConnection(sConnString)

oODBCConnection.Open()

Verwendung anderer ODBC-Treiber:

' VB.NET 
Imports System.Data.Odbc 
... 
Dim oODBCConnection As OdbcConnection 
Dim sConnString As String = _
    "Dsn=myDsn;" & _
    "Uid=myUsername;" & _ 
    "Pwd=myPassword" 
oODBCConnection = New Odbc.OdbcConnection(sConnString) 
oODBCConnection.Open()

' VB.NET

Imports System.Data.Odbc

...

Dim oODBCConnection As OdbcConnection

Dim sConnString As String = _

"Dsn=myDsn;" & _

"Uid=myUsername;" & _

"Pwd=myPassword"

oODBCConnection = New Odbc.OdbcConnection(sConnString)

oODBCConnection.Open()

5. Oktober 2015
von Centron GmbH
Kommentare deaktiviert für MySQLDirect .NET Datenquellen (Data Provider) – CoreLab (CoreLab.MySql)

MySQLDirect .NET Datenquellen (Data Provider) – CoreLab (CoreLab.MySql)

MySQLDirect.NET ist eine Datenquelle (Data Provider) für den direkten Zugriff auf einen MySQL-Datenbank-Server mit Hilfe von Microsofts .NET Framework und dem .NET Compact Framework. Es basiert vollständig auf den ActiveX Data Objects für das .NET Framework (ADO.NET). ADO.NET stellt ein großes Angebot an Komponenten zur Herstellung von verteilten Applikationen zum Datenaustausch bereit. Es ist ein integraler Bestandteil des .NET Frameworks, da es Zugriff sowohl auf relationale Daten, XML und Anwendungsdaten liefert.

Der MySQLDirect.NET Datenquellen (Data Provider) kann auf die selbe Weise wie der SQL Server .NET oder der OLE DB .NET Datenquellen (Data Provider) genutzt werden. Dabei kann er auf den MySQL Server entweder mit dem nativen MySQL Netzwerkprotokoll oder direkt über die MySQL Client-Bibliothek zugreifen. Er erlaubt die Herstellung von einfachen und schnellen Applikationen, die mit MySQL zusammen arbeiten.

Verwenden von C#:

using CoreLab.MySql; 
... 
MySqlConnection oMySqlConn = new MySqlConnection(); 
oMySqlConn.ConnectionString = 
"User ID=myUsername;" + 
    "Password=myPassword;" + 
"Host=localhost;" + 
"Port=3306;" + 
"Database=myDatabaseName;" + 
"Direct=true;" + 
"Protocol=TCP;" + 
"Compress=false;" + 
"Pooling=true;" + 
"Min Pool Size=0;" + 
"Max Pool Size=100;" + 
"Connection Lifetime=0"; 
oMySqlConn.Open();

using CoreLab.MySql;

...

MySqlConnection oMySqlConn = new MySqlConnection();

oMySqlConn.ConnectionString =

"User ID=myUsername;" +

"Password=myPassword;" +

"Host=localhost;" +

"Port=3306;" +

"Database=myDatabaseName;" +

"Direct=true;" +

"Protocol=TCP;" +

"Compress=false;" +

"Pooling=true;" +

"Min Pool Size=0;" +

"Max Pool Size=100;" +

"Connection Lifetime=0";

oMySqlConn.Open();

Verwenden von VB.NET:

Imports CoreLab.MySql 
... 
Dim oMySqlConn As MySqlConnection = New MySqlConnection() 
oMySqlConn.ConnectionString = _
    "User ID=myUsername;" & _ 
"Password=myPassword;" & _ 
"Host=localhost;" & _ 
"Port=3306;" & _ 
"Database=myDatabaseName;" & _ 
"Direct=true;" & _ 
"Protocol=TCP;" & _ 
"Compress=false;" & _ 
"Pooling=true;" & _ 
"Min Pool Size=0;" & _ 
"Max Pool Size=100;" & _ 
"Connection Lifetime=0" 
oMySqlConn.Open()

Imports CoreLab.MySql

...

Dim oMySqlConn As MySqlConnection = New MySqlConnection()

oMySqlConn.ConnectionString = _

"User ID=myUsername;" & _

"Password=myPassword;" & _

"Host=localhost;" & _

"Port=3306;" & _

"Database=myDatabaseName;" & _

"Direct=true;" & _

"Protocol=TCP;" & _

"Compress=false;" & _

"Pooling=true;" & _

"Min Pool Size=0;" & _

"Max Pool Size=100;" & _

"Connection Lifetime=0"

oMySqlConn.Open()

5. Oktober 2015
von Centron GmbH
1 Kommentar

Microsoft SQL Server .NET Datenquellen (Data Provider) (System.Data.SqlClient)

Der Microsoft SQL Server .NET Datenquellen (Data Provider) erlaubt es Ihnen, sich mit einer Microsoft SQL Server 7.0, 2000 und 2005-Datenbank zu verbinden; ältere Versionen werden nicht unterstützt. Für Microsoft SQL Server 6.5 und frühere Versionen müssen Sie den OLE DB .NET Datenquellen (Data Provider) verwenden.

Verwenden von C#:

using System.Data.SqlClient; 
... 
SqlConnection oSQLConn = new SqlConnection(); 
oSQLConn.ConnectionString = 
"Data Source=(local);" + 
"Initial Catalog=myDatabaseName;" +
    "Integrated Security=SSPI";
// Alternativ 
// "Server=(local);" + 
// "Database=myDatabaseName;" + 
// "Trusted_Connection=Yes";
oSQLConn.Open(); 
... 
oSQLConn.Close();

using System.Data.SqlClient;

...

SqlConnection oSQLConn = new SqlConnection();

oSQLConn.ConnectionString =

"Data Source=(local);" +

"Initial Catalog=myDatabaseName;" +

"Integrated Security=SSPI";

// Alternativ

// "Server=(local);" +

// "Database=myDatabaseName;" +

// "Trusted_Connection=Yes";

oSQLConn.Open();

...

oSQLConn.Close();

Wenn Sie eine Verbindung öffnen, müssen Sie diese natürlich auch wieder schließen. Sollten Sie dies nicht tun, kehrt die Verbindung nicht in den Connection Pool zurück.
Hinweis: der SqlDataAdapter wird die Verbindung für Sie öffnen und schließen, wenn er auf die Fill- und Update-Methoden verwendet. Wenn aber die Verbindung bereits geöffnet ist, wird auch der SqlDataAdapter diese geöffnet lassen.

Verwenden von VB.NET:

Imports System.Data.SqlClient 
... 
Dim oSQLConn As SqlConnection = New SqlConnection() 
oSQLConn.ConnectionString = _
"Data Source=(local);" & _ 
"Initial Catalog=myDatabaseName;" & _
    "Integrated Security=SSPI" 
oSQLConn.Open()

Imports System.Data.SqlClient

...

Dim oSQLConn As SqlConnection = New SqlConnection()

oSQLConn.ConnectionString = _

"Data Source=(local);" & _

"Initial Catalog=myDatabaseName;" & _

"Integrated Security=SSPI"

oSQLConn.Open()

Falls Sie sich mit einem entfernten Server über eine IP-Adresse verbinden:

oSQLConn.ConnectionString = _
"Network Library=DBMSSOCN;" & _ 
"Data Source=xxx.xxx.xxx.xxx,1433;" & _ 
"Initial Catalog=myDatabaseName;" & _ 
"User ID=myUsername;" & _ 
"Password=myPassword"
oSQLConn.Open()

oSQLConn.ConnectionString = _

"Network Library=DBMSSOCN;" & _

"Data Source=xxx.xxx.xxx.xxx,1433;" & _

"Initial Catalog=myDatabaseName;" & _

"User ID=myUsername;" & _

"Password=myPassword"

oSQLConn.Open()

Hinweise:

“Network Library=DBMSSOCN” veranlasst SqlClient dazu, TCP/IP zu verwenden
xxx.xxx.xxx.xxx ist die IP-Adresse des entfernten SQL-Servers
1433 ist der Port des SQL-Servers; siehe Q269882 und Q287932
Für die Verwendung der Windows-eigenen Verschlüsselung können Sie noch “Encrypt=yes” hinzufügen

5. Oktober 2015
von Centron GmbH
Kommentare deaktiviert für Datenbank-Anbindung mit .NET-Datenquellen (Data Provider)

Datenbank-Anbindung mit .NET-Datenquellen (Data Provider)

Die Anbindung einer Datenbank via .NET ist eine sehr zeitgemäße Methode, um z.B. Websites, die mit den Microsoft Internet Information Services (IIS) gehostet werden, an verschiedene Datenbanksysteme anzubinden.
Im Folgenden nun eine Liste der verschiedenen Möglichkeiten und unterstützten Datenbanken:

5. Oktober 2015
von Centron GmbH
Kommentare deaktiviert für Microsoft DataShape Provider

Microsoft DataShape Provider

Microsoft DataShape mit einem SQL Server OLE DB Provider:

oConn.Open "Provider=MSDataShape;" & _
           "Data Provider=SQLOLEDB;" & _
           "Data Source=mySQLServerName;" & _
           "Initial Catalog=myDatabase;" & _
           "User ID=myUsername;" & _
           "Password=myPassword"

oConn.Open "Provider=MSDataShape;" & _

"Data Provider=SQLOLEDB;" & _

"Data Source=mySQLServerName;" & _

"Initial Catalog=myDatabase;" & _

"User ID=myUsername;" & _

"Password=myPassword"

Microsoft DataShape mit einem JET OLE DB Provider:

oConn.Open "Provider=MSDataShape;" & _
           "Data Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Dbq=c:\somepath\mydb.mdb;" & _
           "User ID=myUsername;" & _
           "Password=myPassword"

oConn.Open "Provider=MSDataShape;" & _

"Data Provider=Microsoft.Jet.OLEDB.4.0;" & _

"Dbq=c:\somepath\mydb.mdb;" & _

"User ID=myUsername;" & _

"Password=myPassword"

Danach benutzen Sie bitte einen Shape-Befehl mit SQL-Strings:

sSQL = "SHAPE {select * from authors} " & _
     "APPEND ({select * from titleauthor} AS chapter " & _
     "RELATE au_id TO au_id)"

sSQL = "SHAPE {select * from authors} " & _

"APPEND ({select * from titleauthor} AS chapter " & _

"RELATE au_id TO au_id)"

Alternativ können Sie auch einen Prozeduren speichernden Shape-Befehl verwenden:

sSQL = "SHAPE {exec spAuthors_LoadAll} " & _
     "APPEND ({exec spTitleAuthor_LoadAll} AS chapter " & _
"RELATE au_id TO au_id)"

sSQL = "SHAPE {exec spAuthors_LoadAll} " & _

"APPEND ({exec spTitleAuthor_LoadAll} AS chapter " & _

"RELATE au_id TO au_id)"

5. Oktober 2015
von Centron GmbH
Kommentare deaktiviert für Microsoft Remote

Microsoft Remote

Die nun folgenden Connection Strings verwenden den Remote Provider von Microsoft (MS Remote). Diese Datenquellen veranlassen ADO dazu, mit dem entfernten Server über die RDS DataFactory eine Verbindung aufzunehmen, um den dort installierten Remote Provider zu verwenden.

WARNUNG: RDS wird von Microsoft als veraltet angesehen

— MS Remote – Access (Jet)

Wenn Sie eine ODBC-DSN auf dem entfernten Server verwenden möchten:

oConn.Open "Provider=MS Remote;" & _
           "Remote Server=http://myServerName;" & _ 
           "Remote Provider=MSDASQL;" & _
           "DSN=AdvWorks;" & _
           "Uid=myUsername;" & _
           "Pwd=myPassword"

oConn.Open "Provider=MS Remote;" & _

"Remote Server=http://myServerName;" & _

"Remote Provider=MSDASQL;" & _

"DSN=AdvWorks;" & _

"Uid=myUsername;" & _

"Pwd=myPassword"

Wenn Sie einen OLE DB-Provider auf dem entfernten Server verwenden möchten:

oConn.Open "Provider=MS Remote;" & _ 
           "Remote Server=http://myServerName;" & _
           "Remote Provider=Microsoft.Jet.OLEDB.4.0;" & _
           "Data Source=c:\somepath\mydb.mdb", _
            "admin", ""

oConn.Open "Provider=MS Remote;" & _

"Remote Server=http://myServerName;" & _

"Remote Provider=Microsoft.Jet.OLEDB.4.0;" & _

"Data Source=c:\somepath\mydb.mdb", _

"admin", ""

Wenn Sie einen OLE DB-Provider auf dem entfernten Rechner verwenden möchten:

oConn.Open "Provider=MS Remote;" & _ 
           "Remote Server=http://myServerName;" & _
           "Handler=MSDFMAP.Handler;" & _
           "Data Source=MyAdvworksConn"

oConn.Open "Provider=MS Remote;" & _

"Remote Server=http://myServerName;" & _

"Handler=MSDFMAP.Handler;" & _

"Data Source=MyAdvworksConn"

Der entsprechende Eintrag in der Datei \%WinDir%\Msdfmap.ini lautet:

[connect MyAdvworksConn]
Access = ReadWrite
Connect = "Provider=Microsoft.Jet.OLEDB.4.0;
           Data Source=mydb.mdb;
           User Id=admin; 
           Password="               (schreiben Sie alles in eine einzelne Zeile!)

[connect MyAdvworksConn]

Access = ReadWrite

Connect = "Provider=Microsoft.Jet.OLEDB.4.0;

Data Source=mydb.mdb;

User Id=admin;

Password=" (schreiben Sie alles in eine einzelne Zeile!)

— MS Remote – SQL Server

Wenn Sie ODBC-DSN auf dem entfernten Rechner verwenden möchten:

oConn.Open "Provider=MS Remote;" & _
           "Remote Server=http://myServerName;" & _ 
           "Remote Provider=MSDASQL;" & _
           "DSN=myDatabaseName;" & _
           "Uid=myUsername;" & _
           "Pwd=myPassword"

oConn.Open "Provider=MS Remote;" & _

"Remote Server=http://myServerName;" & _

"Remote Provider=MSDASQL;" & _

"DSN=myDatabaseName;" & _

"Uid=myUsername;" & _

"Pwd=myPassword"

Wenn Sie einen OLE DB Provider auf dem entfernten Rechner verwenden möchten:

oConn.Open "Provider=MS Remote;" & _ 
           "Remote Server=http://myServerName;" & _
           "Remote Provider=SQLOLEDB;" & _
           "Data Source=myServerName;" & _
           "Initial Catalog=myDatabaseName;" & _
           "User ID=myUsername;" & _
           "Password=myPassword"

oConn.Open "Provider=MS Remote;" & _

"Remote Server=http://myServerName;" & _

"Remote Provider=SQLOLEDB;" & _

"Data Source=myServerName;" & _

"Initial Catalog=myDatabaseName;" & _

"User ID=myUsername;" & _

"Password=myPassword"

Wenn Sie einen OLE DB Provider auf dem entfernten Rechner verwenden möchten:

oConn.Open "Provider=MS Remote;" & _ 
           "Remote Server=http://myServerName;" & _ 
           "Handler=MSDFMAP.Handler;" & _
           "Data Source=MyPubsConn"

oConn.Open "Provider=MS Remote;" & _

"Remote Server=http://myServerName;" & _

"Handler=MSDFMAP.Handler;" & _

"Data Source=MyPubsConn"

Der entsprechende Eintrag in der Datei \%WinDir%\Msdfmap.ini würde lauten:

[connect MyPubsConn]
Access = ReadWrite
Connect = "Provider=SQLOLEDB;
          Data Source=myServerName;
          Initial Catalog=myDatabaseName;
          User ID=myUsername;
          Password=myPassword"        (schreiben Sie alles in eine einzelne Zeile!)

[connect MyPubsConn]

Access = ReadWrite

Connect = "Provider=SQLOLEDB;

Data Source=myServerName;

Initial Catalog=myDatabaseName;

User ID=myUsername;

Password=myPassword" (schreiben Sie alles in eine einzelne Zeile!)

5. Oktober 2015
von Centron GmbH
Kommentare deaktiviert für Data Link File (UDL)

Data Link File (UDL)

Absolute Pfadangabe

oConn.Open "File Name=c:\somepath\myDatabaseName.udl"

1	oConn.Open "File Name=c:\somepath\myDatabaseName.udl"

Relative Pfadangabe

oConn.Open "File Name=myDatabaseName.udl"

1	oConn.Open "File Name=myDatabaseName.udl"

Hinweis:
Ab Windows 2000 ist das Menü “Neu | Microsoft Datenverbindung” nicht mehr vorhanden. Sie können es aber durch Ausführen der Registrierungs-Datei X:\Programme\Gemeinsame Dateien\System\OleDB\newudl.reg” hinzufügen. Danach können Sie wie unter Windows NT mit Hilfe eines Rechtsklicks und der Auswahl des Punkts “Neu | Microsoft Datenverbindung” auf den Desktop eine neue Microsoft Datenverbindung hinzufügen.

Alternativ können Sie auch einfach eine Textdatei erstellen und die Dateiendung von .txt in .udl ändern.

5. Oktober 2015
von Centron GmbH
Kommentare deaktiviert für ADO Recordset URL

ADO Recordset URL

ADO 2.5 (oder höher) erlaubt es Ihnen, ein auf XML basierendes ADO Recordset aus einer ASP-Datei über HTTP zu öffnen. Dieses Feature nutzt kein RDS.

Um Einträge aus einer entfernten Datenbank zu holen:

oRs.Open "http://myServer/AuthorsGetByState.asp?state=CA",, _
          adOpenStatic, adLockBatchOptimistic

1 2	oRs.Open "http://myServer/AuthorsGetByState.asp?state=CA",, _ adOpenStatic, adLockBatchOptimistic

(der Inhalt der Datei AuthorsGetByState.asp wird unten angezeigt)

Um Änderungen zu speichern:

' Save Recordset into Stream
Set oStm = New ADODB.Stream
oRs.Save  oStm, adPersistXML

' Save Recordset into Stream

Set oStm = New ADODB.Stream

oRs.Save oStm, adPersistXML

' Use MSXML's XMLHTTP object to open ASP 
Set oXMLHTTP = New MSXML2.XMLHTTP30
oXMLHTTP.Open "POST", "http://myServerName/AuthorsSave.asp"
oXMLHTTP.Send  oStm.ReadText

' Use MSXML's XMLHTTP object to open ASP

Set oXMLHTTP = New MSXML2.XMLHTTP30

oXMLHTTP.Open "POST", "http://myServerName/AuthorsSave.asp"

oXMLHTTP.Send oStm.ReadText

' If an error occurred
If oXMLHTTP.Status = 500 Then
    Debug.Print  oXMLHTTP.statusText
End If

' If an error occurred

If oXMLHTTP.Status = 500 Then

Debug.Print oXMLHTTP.statusText

End If

(der Inhalt der Datei AuthorsSave.asp wird unten angezeigt)

AuthorsGetByState.asp

Dim oConn
Dim oRs
Dim sSQL
Dim sState

On Error Resume Next

Const adPersistXML = 1
Const adStateOpen = 1
Const adOpenStatic = 3
Const adLockBatchOptimistic = 4
Const adCmdText = 1

' Eine neue Verbindung erstellen und öffnen
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "provider=sqloledb;" & _
     "data source=(local);" & _
     "initial catalog=pubs;" & _
     "user id=myUsername;" & _
     "password=myPassword;"
If Err.Number <> 0 Then
   Response.Status = "500 " & Err.Source & ": " & Err.Description
 Response.End
End If

' Erstellen und Öffnen eines veränderbaren Recordsets
Set oRs = Server.CreateObject("ADODB.Recordset")
sState = Request.QueryString("state") & ""
If Len(sState) Then
    sSQL = "Select * From Authors Where State = '" & sState & "'"
Else
    sSQL = "Select * From Authors"
End If
oRs.Open sSQL, oConn, adOpenStatic, adLockBatchOptimistic, adCmdText
If Err.Number <> 0 Then
   Response.Status = "500 " & Err.Source & ": " & Err.Description
   Response.End
End If

' ' Speichert Daten in ein Response Object (IIS4.0)
' Set oStream = Server.CreateObject("ADODB.Stream")
' oRs.Save oStream, adPersistXML
' Response.Write oStream.ReadText
 
' Speichert Daten in ein Respone Object (IIS5.0)
Response.ContentType = "text/xml"
oRs.Save Response, adPersistXML
If Err.Number <> 0 Then
   Response.Status = "500 " & Err.Source & ": " & Err.Description
   Response.End
End If

' Räumt auf
Set oRs = Nothing
If oConn.State = adStateOpen Then
 oConn.Close
End If
Set oConn = Nothing

Dim oConn

Dim oRs

Dim sSQL

Dim sState

On Error Resume Next

Const adPersistXML = 1

Const adStateOpen = 1

Const adOpenStatic = 3

Const adLockBatchOptimistic = 4

Const adCmdText = 1

' Eine neue Verbindung erstellen und öffnen

Set oConn = Server.CreateObject("ADODB.Connection")

oConn.Open "provider=sqloledb;" & _

"data source=(local);" & _

"initial catalog=pubs;" & _

"user id=myUsername;" & _

"password=myPassword;"

If Err.Number <> 0 Then

Response.Status = "500 " & Err.Source & ": " & Err.Description

Response.End

End If

' Erstellen und Öffnen eines veränderbaren Recordsets

Set oRs = Server.CreateObject("ADODB.Recordset")

sState = Request.QueryString("state") & ""

If Len(sState) Then

sSQL = "Select * From Authors Where State = '" & sState & "'"

Else

sSQL = "Select * From Authors"

End If

oRs.Open sSQL, oConn, adOpenStatic, adLockBatchOptimistic, adCmdText

If Err.Number <> 0 Then

Response.Status = "500 " & Err.Source & ": " & Err.Description

Response.End

End If

' ' Speichert Daten in ein Response Object (IIS4.0)

' Set oStream = Server.CreateObject("ADODB.Stream")

' oRs.Save oStream, adPersistXML

' Response.Write oStream.ReadText

' Speichert Daten in ein Respone Object (IIS5.0)

Response.ContentType = "text/xml"

oRs.Save Response, adPersistXML

If Err.Number <> 0 Then

Response.Status = "500 " & Err.Source & ": " & Err.Description

Response.End

End If

' Räumt auf

Set oRs = Nothing

If oConn.State = adStateOpen Then

oConn.Close

End If

Set oConn = Nothing

AuthorsSave.asp

Dim oConn
Dim oRs

On Error Resume Next

' Erstellen und Öffnen einer neuen Verbindung
Set oConn = Server.CreateObject("ADODB.Connection")
oConn.Open "provider=sqloledb;" & _
           "data source=(local);" & _
           "initial catalog=pubs;" & _
           "user id=myUsername;" & _
           "password=myPassword;"
If Err.Number <> 0 Then
   Response.Status = "500 " & Err.Source & ": " & Err.Description
   Response.End
End If

' Erstellen und Öffnen eines neuen Recordset
Set oRs = Server.CreateObject("ADODB.Recordset")
oRs.Open Request
If Err.Number <> 0 Then
   Response.Status = "500 " & Err.Source & ": " & Err.Description
   Response.End
End If

' Aktualisiert die Datenbank
oRs.ActiveConnection = oConn
oRs.UpdateBatch
If Err.Number <> 0 Then
   Response.Status = "500 " & Err.Source & ": " & Err.Description
   Response.End
End If

' Räumt auf
Set oRs = Nothing
If oConn.State = adStateOpen Then
 oConn.Close
End If
Set oConn = Nothing

Dim oConn

Dim oRs

On Error Resume Next

' Erstellen und Öffnen einer neuen Verbindung

Set oConn = Server.CreateObject("ADODB.Connection")

oConn.Open "provider=sqloledb;" & _

"data source=(local);" & _

"initial catalog=pubs;" & _

"user id=myUsername;" & _

"password=myPassword;"

If Err.Number <> 0 Then

Response.Status = "500 " & Err.Source & ": " & Err.Description

Response.End

End If

' Erstellen und Öffnen eines neuen Recordset

Set oRs = Server.CreateObject("ADODB.Recordset")

oRs.Open Request

If Err.Number <> 0 Then

Response.Status = "500 " & Err.Source & ": " & Err.Description

Response.End

End If

' Aktualisiert die Datenbank

oRs.ActiveConnection = oConn

oRs.UpdateBatch

If Err.Number <> 0 Then

Response.Status = "500 " & Err.Source & ": " & Err.Description

Response.End

End If

' Räumt auf

Set oRs = Nothing

If oConn.State = adStateOpen Then

oConn.Close

End If

Set oConn = Nothing

14. Februar 2013
von Centron GmbH
Kommentare deaktiviert für SQL Server 2008

SQL Server 2008

.NET Framework Data Provider for SQL Server

Typ: .NET Framework Class Library
Verwendung: System.Data.SqlClient.SqlConnection
Hersteller: Microsoft

Standard Sicherheit

Server=yourServerAddress;Database=yourDataBase;User Id=yourUsername;Password=yourPassword;

1	Server=yourServerAddress;Database=yourDataBase;User Id=yourUsername;Password=yourPassword;

Trusted Verbindung

Server=yourServerAddress;Database=yourDataBase;Trusted_Connection=True;

1	Server=yourServerAddress;Database=yourDataBase;Trusted_Connection=True;

Verbindung zu einer SQL Server-Instanz

The server/instance name syntax used in the server option is the same for all SQL Server connection strings.

Server=yourServerName\myInstanceName;Database=yourDataBase;User Id=yourUsername;Password=yourPassword;

1	Server=yourServerName\myInstanceName;Database=yourDataBase;User Id=yourUsername;Password=yourPassword;

Verbinden über eine IP-Adresse

DBMSSOCN=TCP/IP is how to use TCP/IP instead of Named Pipes. At the end of the Data Source is the port to use. 1433 is the default port for SQL Server.

Data Source=aaa.bbb.ccc.ddd,1433;Network Library=DBMSSOCN;Initial Catalog=yourDataBase;User ID=yourUsername;Password=yourPassword;

1	Data Source=aaa.bbb.ccc.ddd,1433;Network Library=DBMSSOCN;Initial Catalog=yourDataBase;User ID=yourUsername;Password=yourPassword;

Aktiviere MARS

Server=yourServerAddress;Database=yourDataBase;Trusted_Connection=True;MultipleActiveResultSets=true;

1	Server=yourServerAddress;Database=yourDataBase;Trusted_Connection=True;MultipleActiveResultSets=true;

SQL Server Native Client 10.0 OLE DB Provider

Typ: OLE DB Provider
Verwendung: Provider=SQLNCLI10
Hersteller: Microsoft

Standard Sicherheit

Are you using SQL Server 2008 Express? Don’t miss the server name syntax Servername\SQLEXPRESS where you substitute Servername with the name of the computer where the SQL Server 2008 Express installation resides.

Provider=SQLNCLI10;Server=yourServerAddress;Database=yourDataBase;Uid=yourUsername;Pwd=yourPassword;

1	Provider=SQLNCLI10;Server=yourServerAddress;Database=yourDataBase;Uid=yourUsername;Pwd=yourPassword;

13. Februar 2013
von Centron GmbH
Kommentare deaktiviert für SQL Server 2012

SQL Server 2012

.NET Framework Data Provider for SQL Server

Typ: .NET Framework Class Library
Verwendung: System.Data.SqlClient.SqlConnection
Hersteller: Microsoft

Standard Sicherheit

Server=yourServerAddress;Database=yourDataBase;User Id=yourUsername;Password=yourPassword;

1	Server=yourServerAddress;Database=yourDataBase;User Id=yourUsername;Password=yourPassword;

Trusted Verbindung

Server=yourServerAddress;Database=yourDataBase;Trusted_Connection=True;

1	Server=yourServerAddress;Database=yourDataBase;Trusted_Connection=True;

Verbindung zu einer SQL Server-Instanz

The server/instance name syntax used in the server option is the same for all SQL Server connection strings.

Server=yourServerName\myInstanceName;Database=yourDataBase;User Id=yourUsername;Password=yourPassword;

1	Server=yourServerName\myInstanceName;Database=yourDataBase;User Id=yourUsername;Password=yourPassword;

Verbinden über eine IP-Adresse

DBMSSOCN=TCP/IP is how to use TCP/IP instead of Named Pipes. At the end of the Data Source is the port to use. 1433 is the default port for SQL Server.

Data Source=aaa.bbb.ccc.ddd,1433;Network Library=DBMSSOCN;Initial Catalog=yourDataBase;User ID=yourUsername;Password=yourPassword;

1	Data Source=aaa.bbb.ccc.ddd,1433;Network Library=DBMSSOCN;Initial Catalog=yourDataBase;User ID=yourUsername;Password=yourPassword;

Aktiviere MARS

Server=yourServerAddress;Database=yourDataBase;Trusted_Connection=True;MultipleActiveResultSets=true;

1	Server=yourServerAddress;Database=yourDataBase;Trusted_Connection=True;MultipleActiveResultSets=true;

SQL Server Native Client 11.0 OLE DB Provider

Typ: OLE DB Provider
Verwendung: Provider=SQLNCLI11
Hersteller: Microsoft

Standard Sicherheit

Are you using SQL Server 2012 Express? Don’t miss the server name syntax Servername\SQLEXPRESS where you substitute Servername with the name of the computer where the SQL Server 2012 Express installation resides.

Provider=SQLNCLI11;Server=yourServerAddress;Database=yourDataBase;Uid=yourUsername;Pwd=yourPassword;

1	Provider=SQLNCLI11;Server=yourServerAddress;Database=yourDataBase;Uid=yourUsername;Pwd=yourPassword;