For Each drow In dsData.Tables(0).Rows
     thedate = drow("thedate")
     Exit For
Next

Morro de rir com esse site.


Deixe um comentário

O seu endereço de e-mail não será publicado. Campos obrigatórios são marcados com *