Hallo,

funktioniert leider immer noch nicht. Habe es jetzt so abge�ndert:

Function Main()
        Dim conn
        Dim rs
        Set conn = CreateObject("ADODB.Connection")
        conn.Open = "Provider=SQLOLEDB.1;Data Source=(local); Initial 
Catalog=QUAMD;user id = 'qudb_admin';password=''_quadmin"
        Set rs = CreateObject("ADODB.Recordset")
        SQL="INSERT INTO qudb_admin.tb_maillistenutzer(name) values('sven')"
        rs.Open SQL, conn, 3, 3
        Main = DTSTaskExecResult_Success
End Function

Folgender Fehler:

"Format of the initialization string does not conform to the OLE DB specification."
Line 4



Gruss Sven



-----Urspr�ngliche Nachricht-----
Von: Jutta Kavalier [mailto:[EMAIL PROTECTED]
Gesendet: Thursday, October 23, 2003 10:53 AM
An: [EMAIL PROTECTED]
Betreff: Re: [Database.asp] DTS Package auf SQL Server


Hallo Sven,

in einem ActiveXScript gist Du die Connection ohne "Server" an, also

CreateObject("ADODB.Connection") statt
Server.CreateObject("ADODB.Connection")

Gruss
Jutta



----- Original Message ----- 
From: <[EMAIL PROTECTED]>
To: <[EMAIL PROTECTED]>
Sent: Thursday, October 23, 2003 10:41 AM
Subject: [Database.asp] DTS Package auf SQL Server


Hallo,

ich habe auf dem SQL-Server ein DTS-Package erstellt. Ich m�chte jetzt ein
ActiveX-script einbinden, da� ein SQL-Statemant ausf�hrt, welches an ein
paar Bedingungen gekn�pft ist (deshalb kein einfacher SQL-Execute-Task). Wie
kann ich im ActiveX-script eine Verbindung zur DB erstellen und ein
Recordset aufbauen?

Hab es so versucht:

Function Main()
Dim conn
Dim rs

Set conn = Server.CreateObject("ADODB.Connection")
Set rs = Server.CreateObject("ADODB.Recordset")

conn.Open = "Provider=SQLOLEDB.1;Data Source=(local); Initial
Catalog=QUAMD;user id = 'qudb_admin';password=''_quadmin"

SQL="INSERT INTO qudb_admin.tb_maillistenutzer(name) values('test')"
rs.Open SQL, conn, 3, 3

Main = DTSTaskExecResult_Success
End Function

Das SQL-Statement ist noch nicht das richtige, sollte nur zum Testen sein!
Als Fehler erhalte ich immer:

Error Description: Error Code: 0
Error Source=Laufzeitfehler in Microsoft VBscript
Error Description: Object erforderlich: 'Server'
Error on Line 8

Kann mir jemand helfen?

Gruss Sven



_______________________________________________
Database.asp mailing list
[EMAIL PROTECTED]
http://www.glengamoi.com/mailman/listinfo/database.asp

_______________________________________________
Database.asp mailing list
[EMAIL PROTECTED]
http://www.glengamoi.com/mailman/listinfo/database.asp

_______________________________________________
Database.asp mailing list
[EMAIL PROTECTED]
http://www.glengamoi.com/mailman/listinfo/database.asp

Antwort per Email an