rsResults.Source = "SELECT artist_name, Occasion, category, cost, ID, image_path, ref_number, rrp_price, type FROM Occasions INNER JOIN (artists INNER JOIN products ON artists.artist_id = products.artist_id) ON Occasions.occasion_ID = products.occasion_id; WHERE products.artist_id = " & Replace(rsResults__artistName, "'", "''") & " and products.occasion_id = " & Replace(rsResults__occasionType, "'", "''") & ""
// Olha que eu saiba para conctebnar strings o caracter do VB e do VBS e do ASP é o "&" não o "+" o "+" é o operador de adição.