!!!!help!!!! vb access 2000

Signaler
Messages postés
77
Date d'inscription
mercredi 17 décembre 2003
Statut
Membre
Dernière intervention
9 mai 2006
-
Messages postés
77
Date d'inscription
mercredi 17 décembre 2003
Statut
Membre
Dernière intervention
9 mai 2006
-
VBes, VBeuses

Voila mon probléme :

quand je lance mon appli, mon programme bloque sur :

"erreur d'execution '3211'

Le moteur de la base de données n'a pas pu verrouiller la table 'temp_suivis_tests'car elle est déja utilisée par une autre personne ou un autre processus"

Pourtant je ferme bien cette espéce de table!
avez vous une idée

Je vous laisse mon code au cas ou il bloke sur
sql2 = "DROP TABLE temp_suivis_tests"
db1.Execute sql2

code

Private Sub Commande10_Click()
'-----------------------afficher tout les enregistrement--------------------------------------------------

'declara
Dim sql As String
Dim sql1, sql2 As String
Dim rs As DAO.Recordset
Dim rs1 As DAO.Recordset
Dim cmp, last, I, J, timer As Integer
Dim db1 As DAO.Database

Set db1 = CurrentDb
DoCmd.Close , ""
DoCmd.Close acForm, "temps_tests"
DoCmd.Close acForm, "sous_form_temps_tests"

db1.Close
Set db1 = CurrentDb

'

DoCmd.Close acTable, "temp_suivis_tests"

'efface la table temp

sql2 = "DROP TABLE  temp_suivis_tests"
db1.Execute sql2

'recopi table suivis dan le temp
'sql = "CREATE TABLE temp_suivis_tests"
'db1.Execute sql
sql1 = "SELECT suivis_tests.* INTO temp_suivis_tests FROM suivis_tests"
db1.Execute sql1

DoCmd.OpenForm "Temps_tests", acNormal, "", "", , acNormal

db1.Close

 

End Sub

2 réponses

Messages postés
2169
Date d'inscription
vendredi 20 avril 2001
Statut
Membre
Dernière intervention
30 juin 2009
8
5 messages pour le meme probléme y'en a con pas trop de respect qu'en même !!!

It@li@
Messages postés
77
Date d'inscription
mercredi 17 décembre 2003
Statut
Membre
Dernière intervention
9 mai 2006

probleme de mozzilla
escusez moua...
sa arrive koi...