sql="INSERT INTO ProductNames (ProductName) VALUES ('bla') ; "
			conn.execute sql
 
				set connection = server.CreateObject("ADODB.Connection")
				set recordset = server.CreateObject("ADODB.RecordSet")
				connection.open "MSDN_Test"
 
				sql = "SELECT Prod_Index FROM ProductNames WHERE ProductName = 'bla'  "
				recordset.open sql, connection
 
				'Zuweisungen in der Schleife nicht möglich, da EOF			
				While not recordset.EOF
 
					prodIndex = recordset("Prod_Index")
					Response.Write "test"
					recordset.MoveNext
				Wend
				recordset.close
 
				set connection = Nothing
				set recordset = Nothing