Requete VB (numero auto)

Recherche :

Mot : Pseudo : Filtrer
Bas de page
Auteur	Sujet : Requete VB (numero auto)

Sataneo85

Code :

Private Sub cmd_valid_Click()
Dim requete As String
Dim requete2 As String
Dim maxcarte As Recordset
Dim numcartemax As Integer
requete2 = "SELECT MAX(NumCarte) FROM Carte"
maxcarte.OpenRecordset (requete2.dbOpenSnapshot)
numcartemax = maxcarte(0)
numcartemax = numcartemax + 1
requete = "Insert into Carte VALUES "
requete = requete & "(numcartemax,'" & txt_nomcarte & "', '" & txt_designationcarte & "', " & txt_prixcarte & ", " & txt_qtecarte & " )"
bdd.Execute (requete)
End Sub

Voila donc maintenant je pose le probleme ... erreure a la ligne : maxcarte.OpenRecordset (requete2.dbOpenSnapshot)
sur requete2

Je pense que c'est donc ma requête qui foire ... erreure de syntaxe ?

Je fait tout ca pour pouvoir chercher le numcarte max (donc numéro de la derniere entrée) et entré un nouvel enregistrement

Publicité

olivthill

C'est un peu plus compliqué que cela car les requêtes peuvent retourner plusieurs colonnes et plusieurs lignes. Dans ton cas, voici une solution qui devrait marcher.

Au lieu de :

maxcarte.OpenRecordset (requete2.dbOpenSnapshot)

écrire :

Dim rst as RecordSet
...
Set rst = CurrentDb.OpenRecordset(requete2)
if (not rst.EOF) then
maxcarte = rst.NumCarte
' ou bien peut-être maxcarte = rst.Fields(0)
End-If

Sataneo85

ca marche ! bon par contre ca bloque la

requete = requete & "(numcartemax,'" & txt_nomcarte & "', '" & txt_designationcarte & "', " & txt_prixcarte & ", " & txt_qtecarte & " )"

je peu pas attribuer une variable ? je suis obliger de passer par un objet ?

Sataneo85

c bon g trouver g oublier " & numcartemax & "

FORUM HardWare.fr

Programmation

VB/VBA/VBS

Requete VB (numero auto)

Sujets relatifs
Script de vérification de numéro de téléphone qui marche pas	Requete SQL
requete bizard	[ACCESS] probleme cumul sur requete
Frames et scrolling auto	Problème Requete / Timestamp
[SQL - ORACLE] Requete un peu complexe (pour moi)	Sauvegarde auto des favoris avec Firefox
Comment faire cette requête SQL avec des combinaisons	Probléme avec une requete
Plus de sujets relatifs à : Requete VB (numero auto)

Page générée en 0.032 secondes