Dov'è l'errore?!??!?

[beke82]

CHI MI AIUTA A TROVARE L'ERRORE IN QUESTA STRINGA?
dadClienti= new OleDBDataAdapter ("Select * From tblSottoCommesse Where tblSottoCommesse.Num_Comm='" & commessa & "' Order By Data_Sotto DESC", conn)

MI DICE : "Errore di sintassi (operatore mancante) nell'espressione della query 'tblSottoCommesse.Num_Comm=''PRO109VA'''.
QUI METTO IL CODICE DI TUTTA LA SUB

sub BindDataGrid 

dim commessa as string 
dim connessione as string 
dim conn as OleDBConnection 
dim dadCommessei as OleDBDataAdapter 
dim dstCommesse as DataSet 
commessa=TextBox1.Text 
connessione = ConfigurationSettings.AppSettings("conString") 
conn = New OleDbConnection(connessione) 
dadCommessei= new OleDBDataAdapter ("Select * From tblSottoCommesse Where tblSottoCommesse.Num_Comm='" & commessa & "' Order By Data_Sotto DESC", conn) 

dstClienti= New DataSet 
dadClienti.Fill( dstClienti ) 

DataGrid1.DataSource = dstCommesse 
DataGrid1.DataBind 

end sub

METTO DI SEGUITO ANCHE LA PAGE LOAD

Sub page_load 

if not ispostback then 

TextBox1.Text = Session("Commessa") 

BindDataGrid 

end if 

end sub

AIUTATEMI, PLEASE..

BEKE