Ciao il msgbox mi da un errore di autorizzazione negata cosa può essere?


Dim cnn
dim str
dim strsql
dim valore
valore = MsgBox("sei sicuro di voler eliminare il record",vbYesNo)
if valore = vbyes then
strsql = "delete from Tblnews where id=" & cInt(Request("Txtelimina"))
set cnn = Server.CreateObject("ADODB.Connection")
cnn.Open "provider=microsoft.jet.oledb.4.0; data source=C:\Inetpub\wwwroot\intranet\news\news.mdb;Persist Security Info = False"
cnn.Execute(strsql)
cnn.Close
else
..............