ciao a tutti sto provando a sostituire l'apice utilizzando il replace ma continua a darmi errori

POtreste dare un'occhiata, grazie mille

dim num_tessera as string=replace(num_tessera,"'","§")



dim objconn as new oledbconnection ("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=" & server.MapPath("scuola_dansalsa2.mdb"))

dim objcmd as new oledbdataadapter ("select * from allievi where numero_tessera='"& num_tessera &"'", objconn)