non so se con il web component è uguale, cmq con i report io uso questo codice:
	codice:
	Private Sub Report_Initialize()
   Dim DBTable As CRAXDRT.DatabaseTable
   Dim CPProperties As CRAXDRT.ConnectionProperties
                
   For Each DBTable In Me.Database.Tables
                
       Set CPProperties = DBTable.ConnectionProperties
                
       CPProperties.DeleteAll
       CPProperties.Add "Provider", "SQLOLEDB"
       CPProperties.Add "Data Source", "NomeServer"
       CPProperties.Add "Initial Catalog", "NomeDatabase"
       CPProperties.Add "User ID", "lady"
       CPProperties.Add "Password", "lady"
                                          
   Next
End Sub
 
in pratica riassegno l'origine dei dati al report ogni volta che lo apro.