Guest - zum - Postado Junho 25, 2003 Denunciar Share Postado Junho 25, 2003 Dim res As String res = MsgBox("Deseja salvar", vbYesNo, vbQuestion) If res = vbYes Then Data1.Recordset.Update data2.recordset.update End If Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Eddie_666 Postado Junho 25, 2003 Denunciar Share Postado Junho 25, 2003 Qual erro está retornando? Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 igorSM Postado Junho 28, 2003 Denunciar Share Postado Junho 28, 2003 tente colocar isso:Dim res As Stringres = MsgBox("Deseja salvar", vbYesNo, vbQuestion)If res = 6 ThenData1.Recordset.Updatedata2.recordset.updateEnd If Citar Link para o comentário Compartilhar em outros sites More sharing options...
0 Eddie_666 Postado Junho 28, 2003 Denunciar Share Postado Junho 28, 2003 Dim res as integer, ele retorna um número inteiro... Citar Link para o comentário Compartilhar em outros sites More sharing options...
Pergunta
Guest - zum -
Dim res As String
res = MsgBox("Deseja salvar", vbYesNo, vbQuestion)
If res = vbYes Then
Data1.Recordset.Update
data2.recordset.update
End If
Link para o comentário
Compartilhar em outros sites
3 respostass a esta questão
Posts Recomendados
Participe da discussão
Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.