Hat keiner eine Idee?
Sven
-----Urspr�ngliche Nachricht-----
Von: Kriehn, Sven
Gesendet: Monday, January 12, 2004 10:12 AM
An: [EMAIL PROTECTED]
Betreff: [Database.asp] Optimierung
Hi,
ich habe folgendes Script auf dem SQL-Server in einem DTS laufen:
Function Main()
Dim conn
Dim rs,rs2
Set conn = CreateObject("ADODB.Connection")
conn.Open = "Provider=SQLOLEDB.1;Data Source=vdrssql22\web; Initial
Catalog=QUSUPPLIER;user id = 'qudb_admin';password='_quadmin'"
Set rs = CreateObject("ADODB.Recordset")
QuellSQL="Select tb_SpecIndex_espec.Specnr, tb_SpecIndex_espec.Specdesc From
tb_SpecIndex, tb_SpecIndex_espec where tb_SpecIndex_espec.Specnr =
tb_SpecIndex.actSpecNr"
rs.Open QuellSQL, conn, 3, 3
Set rs2 = CreateObject("ADODB.Recordset")
Do while Not rs.EOF
UpSQL="Update tb_SpecIndex Set actSpecTitle ='" & rs("Specdesc") &"'
where actSpecNr = '"& rs("Specnr") & "'"
rs2.Open UpSQL, conn, 3, 3
rs.MoveNext
Loop
Set rs = nothing
Set rs2 = nothing
conn.close
Set conn = nothing
Main = DTSTaskExecResult_Success
End Function
Leider bekomme ich bei der Ausf�hrung immer ein Scripttimeout. Kan ich hier noch
irgendwas optimieren oder die Aufgabe irgendwie anders l�sen?
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
