URGENT - problème de requête -HELP

Dim connstring As String="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" &dbPath 

Dim sql As String ="SELECT COUNT(*) FROM News WHERE News_titre = " & news("title").InnerText 

Dim conn As New OleDbConnection() 
conn.ConnectionString = connstring 
conn.Open() 
Dim cmd As New OleDbCommand(sql, conn) 
Dim nb as integer = cmd.ExecuteNonQuery() 
conn.Close() 

If nb > 0 Then 
Msgbox("Le titre suivant existe déjà:"&news("title").InnerText) 
Else 
InsertDatabase() 
End If