Requête sql sous VBscript

Bonjour,

Voici mon problème:

Je souhaite lancer une requête SQL sous dans script au format .ebs (VBScript je pense) pour retrouver la valeur d'un champ. Cette valeur est de type "P-0000454"

Ma requête prend la forme suivante :

SimpleQuerybis.SelectStatement = "select OBJECT_ID, CLASS_ID from TN_DOCUMENTS where CLASS_ID = "
SimpleQuerybis.SelectStatement = SimpleQuerybis.SelectStatement & Str$(class_id)
SimpleQuerybis.SelectStatement = SimpleQuerybis.SelectStatement & "And TDM_ID =" & (obj1.data.value("TDM_ID"))
SimpleQuerybis.SelectStatement = SimpleQuerybis.SelectStatement & " And STATE =" & Str$(2) & ""

Le problème intervient à "And TDM_ID =" & (obj1.data.value("TDM_ID"))

Le message d'erreur m'affiche qu'il ne reconnait pas "P". Je pense que je dois informer la nature de la variable (obj1.data.value("TDM_ID")) pour qu'il prenne en compte la totalité de la valeur du champs : "P-0000454"

J'ignore comment.

Je vous remercie d'avance pour votre aide.