Recherche:

Salut!
Je sais que c'est faisable avec Excel et Word. Regarde ci-dessous et essaye avec access.

Private Function SendExceltoScreen(ReportID As Long, ValueObjectPath As String, ReportTitle As...

Tu trouveras ta réponse dans la FAQ VB6 http://vb.developpez.com/faqs/

Essaie ce code. N'oublie pas d'ajouter les références ADO dans ton projet


Private Sub Command2_Click(Index As Integer)
Dim conexiune As new ADODB.Connection
Dim comandasql As new...

Un bel exemple en SQL. On a une table TABLE1 (Champ1, Champ2) où Champ2 est numérique.

DECLARE Cursor1 CURSOR FOR SELECT Champ1 FROM TABLE1

OPEN Cursor1
FETCH Cursor1 INTO @cVAR
WHILE...

Bonne nouvelle!! N'oublie pas le tag résolu :resolu: !!

Je ne comprend pas trop où est le problème. J'ai testé ton code (j'ai ajouté next i pour finir la boucle) et cela fonctionne: les cellules barrées ont été remplacées par "sauf " + la valeur...

Bonjour!

Si il y a un object Crystal sur la forme (ici moncrystalreport)

moncrystalReport.ParameterFields(0) = "monparametre;" & lavaleurdemonparametre & ";True"

Si tu utilises l'activeX...

Bonjour!
Moi, je le mettrais plutôt dans l'évenement Click au lieu du change.
Vérifie aussi que tu rentres bien dans le "If-Then". C'est pour ça que j'ai mis des Debug.Print

Private Sub...

Bonjour! Je l'ai déjà fait avec CRXI en utilisant le composant CrystalActiveXReportViewer. Dans mon exemple, frmDisplayCrystal est la forme et CRDisplay le controle sur la forme.


Dim Application...

On oublie donc mon dernier post (merci ProgElecT). Et maintenant, je n'ai plus trop d'idées... Désolée!

Est-ce que ITEMS et ITEMS_CHOIX sont des variables ou des noms de tables. Si c'est le nom d'une table alors essaye avec des quotes


Select Case SORTE

Case "PROPOSITION"
Set REPORT =...

Et maintenant, ça fonctionne?
Si oui, merci de mettre le tag :resolu:
Si non, quelle ligne de fonctionne pas?

Ne devrais-tu pas fermer tous les objets encore ouverts?

Set REPORT = Nothing
Set Crystal = Nothing
Il reste peut-être un fichier ouvert quelquepart. Jette aussi un oeil dans les jobs actifs...

Salut,
La première idée qui me vient serait de créer une nouvelle table T_JOURNAL qui aurait par exemple les champs suivants:
Date_Creation datetime
Utilisateur varchar(50)
Action char(1) => les...

Bonjour!

Peux-tu nous donner un petit peu de code? Cela nous aiderait à voir plus clair.
D'avance merci!

Vérifie un peu dans tes composants cette fois la présence de crystl32.ocx. Cet oc est-il présent sur ton disque dur?

As-tu essayé de les ajouter manuellement via le bouton "Parcourir"?
Quand tu ouvres ton projet VB, fais-le continuer jusqu'au bout. Essaye d'ouvrir une forme en mode design. As-tu un message...

Quand tu ouvres la liste des références de ton projet (Projet ->References...), les références manquantes ont [MISSING] ([MANQUANT] dans les version française?). Tu vas devoir les intégrer...

Salut Pascal!

As-tu vérifier que les références de ton projet contiennent bien Crystal Report? Dans mon projet (qui utilise CR XI), j'ai des références à craxdrt.dll et à crviewer.dll

Bonne nouvelle! N'oublie pas de tagger ce problème comme résolu!
Le bouton :resolu: se trouve en dessous...

Salut!
je ne sais pas si j'ai bien compris ton problème. Je suppose que tu as une chaine du type "CCCCCRPABD154" et tu voudrais retrouver "ABD1; Si c'est ça ton souci voici de quoi t'aider

...

ooooh, la honte :oops:!! Merci thierryAim d'avoir relu mon commentaire.

benoit.r, voici une correction (soufflée par Thierry).


Private Sub Test_button_Click()
Dim A
Dim B
A = 0
B = Box_B

Salut!
Dans la FAQ, y a plein de bons exemples. regarde sur cette page
http://vb.developpez.com/faq/?page=Bdd#lienODBC
Il y a un chapitre Comment créer un lien ODBC à partir de VB ?

Salut,

Tu ne rentres jamais dans la boucle parce que A>B où A=0 ne va pas être vraie très souvent (pour pas dire jamais). Si tu changes > par < comme ci-dessous, ça devrait aller mieux.
...

Une erreur sur quelle ligne de code?
Est-ce que ta procédure tourne dans SQl server? Je veux dire, as-tu déjà essayer d'exécuter sp_Recod_Article manuellement


DECLARE @PARM_RES AS int
DECLARE...