Newsgroup: it.comp.appl.access
Titolo: Ado e MsgBox e cancellazioni

Buon giorno a tutti
mi trovo con un problema nella cancellazione di record
In un programma ho le seguenti istruzioni:
Private Sub ComandoCancella_Click()
On Error GoTo Err_ComandoCancella_Click
If MsgBox("Vuoi cancellare il cliente" & Chr(13) &
Me.ClienteRagioneSociale & "?", _
           276, "A T T E N Z I O N E") = vbYes Then
 
        DoCmd.SetWarnings False
        DoCmd.RunCommand acCmdDeleteRecord
        DoCmd.SetWarnings True
        Me.Requery
End If
    Me.ComandoNuovo.SetFocus
Exit_ComandoCancella_Click:
    Exit Sub
Err_ComandoCancella_Click:
    MsgBox Err.Description
    Resume Exit_ComandoCancella_Click
End Sub
Queste istruzioni funzionano correttamente in un PC con win98, ma non
funzionano in uno con winXP.
Ho notato che nei riferimenti c'e' ADO 2.6 nel win98 e ADO 2.7 nel winXP.
Ma la cosa strana è che nel pc con ADO 2.7 se premo il tasto ALT
l'istruzione funziona.
Come ultima cosa strana se tolgo la parte con MSGBOX funziona.
Come mai questa cosa??
C'e' un problema dell'istruzione MSGBOX con le varie librerie ADO ???
Grazie a tutti.
Saluti.
-- 
Raffaele Alberoni
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

                    Il 12 Ago 2004, 11:27, Raff...@Romagnacom.com (Raffaele Alberoni) ha
scritto:

          Aggiungi i riferimenti dao, credo che il problema sia chr
MAssimiliano
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

MA ha scritto:


Grazie per l'interessamento MAssimiliano, ma è stata la prima cosa che ho
fatto.
Direi che la parte dei riferimenti è a posto, l'unica differenza è come
dicevo sopra ADO 2.6 e 2.7 e di conseguenza MSGBOX da dei problemi...
Ciao



Hai provato a scaricare le ultime service pack di MSJet a volte con problemi
strani su XP funziona! (non si sa mai!!!)
Cinzia


Ciao Raffaele,
ADO non partecipa assolutamente alle istruzioni che hai postato. Sarebbe
interessante sapere cosa vuol dire *Non Funziona* (esce un messaggio di
errore ?) e la versione di Access e suo Sp che usi su WinXp
Ciao Giorgio

 Ciao
Né ADO né DAO hanno niente a che fare con Msgbox() e con Chr().
Sostituisci invece il Chr(13) con il vbcrlf (il ritorno a capo è
chr(13)&chr(10), non solo chr(13)), e sostituisci il 276 con i nomi delle
relative costanti (es: vbyesno+vbquestion).
Namor
-- 
namor at inwind punto it


 Ciao Giorgio
Effettivamento devo essere un po piů completo nel spiegare il problema:
La versione č Office 2000. e non ho installato nessun SP (forse questo č
il primo problema!!!)
Il comportamento che mi fa dire non funziona č il seguente:
Se lancio la mia applicazione su Win98, il programma mi chiede se voglio
cancellare il record ..... e io confermando Si o No faccio o meno la
cancellazione.
Nell'altra macchina, invece, io premo il pulsante Cancella, il programma
rimane "fermo", e solo se premo il tasto "ALT" (provato casualmente) mi
chiede la conferma di cancellazione.
Perchč questa cosa??
Devo dire che in altre parti del programma dove c'e' MSGBOX non esegue ciň
Per me la cosa č strana
Ciao.


namor ha scritto:





Provato subito anche questo, ma non conta il programma come ho spiegato si
"ferma" e solo premendo ALT mi attiva il msgbox.
Ciao
-- 
Raffaele Alberoni


 Ciao
Prova a togliere l'msgbox dall'if
dim risp as integer
  risp=msgbox "testo",opzioni,"titolo"
  if risp=vbyes then
  ...
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 


 il primo problema!!!)
[CUT]
Ciao Raffaele,
come avrai intuito di fronte a un problema cosě strano la prima cosa da fare
č l'aggiornamento alle ultime Sp.
Ciao Giorgio

 Namor
Provato anche questo, ma non cambia niente, si ferma e vuole l'ALT...
(che gioco di parole!!!!!)
Ciao
-- 
Raffaele Alberoni


 Ciao Giorgio
Ho installato la SP2 di Office2000, ma non è cambiato niente..
Forse esistono ulteriori Sp ??? 
Ciao


 Ciao
Io ho l'SP3, versione libreria vba 6.0.89.67 e non riesco a riprodurre il
tuo errore, funziona sempre. Prova mettere come opzioni (al posto del 276)
solo un vbyesno, forse è il defaultbutton che gli dà problemi.
Namor
-- 
namor at inwind punto it
questo articolo e` stato inviato via web dal servizio gratuito 


 Namor
Dopo uno spuntino veloce..... ho fatto anche queste prove, caricato la
SP3, cambiato le varie versioni di opzioni del MSGBOX, ma nulla da fare...
Forse è andato in ferie....
Saluti
-- 
Raffaele Alberoni
