Discussion :

[doubleface2]

bonsoir,
j'ai utilisé crystalreport pour charger certaines données avec paramètre sur date. dans crystalreport, j'ai fixé les parametres à rangevalue, par defaut cela fonctionne bien. je veut recuperer ce code sur mon formulaire de recherche en utisant startvalue et endvalue, comment faire celà sans que le formulaire par defaut ne s'affiche?. avec un parametre j'ai ce code sans problème

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

nomdurapport.setparametervalue("nomparametre",textduparametre.text)

[Themacleod1980]

Salut,
je ne suis pas sûr d'avoir bien compris la problématique.
que veut dire ta phrase "j'ai fixé les paramètres à rangevalue", je ne vois que des types simples genre 'chaine' 'date heure' 'nombre' etc... dans CR, ern aucun cas de rangevalue.
au moment d'assigner la valeur au paramètre, dans le code, es-tu sûr d'avoir bien tapé le nom du paramètre ?
normalement le popup de demande de paramètre ne s'affiche que si le paramètre est manquant.
tu as aussi 'invite facultative' que tu peux mettre à false dans les 'options de valeur', mais je n'ai jamais eu à le faire dans mes souvenirs.

[doubleface2]

bonsoir
merci pour ta réaction, a force de créer des éventualités, j'ai fini par obtenir le résultat favorable
voici la solution pour les autres
il faut d'abord importer l'espace de nom crystal.decision

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 
private sub bouttonparmetre
'declaration de notre raport concu
dim rp as new notrerapport  
Dim champdesparametres As ParameterFieldDefinitions
Dim champduparametre As ParameterFieldDefinition
Dim valeurParameter As New ParameterValues
Dim plageValeur As New ParameterRangeValue
'nom de votre parametre
dim Nomparametre As String = "daterechecrhe"   
'recuperation des valeurs plages dans le formulaire personnalise
plageValeur.StartValue = plagedeparttextbox.text  
plageValeur.EndValue = plagefintextbox.text
 
 ' rp est le crystalreport des donnees
champdesparametres = rp.DataDefinition.ParameterFields 
champduparametre = champdesparametres.Item(Nomparametre)
valeurParameter= champduparametre.CurrentValues
 
 
valeurparameter.Clear()
valeurparameter.Add(crParameterRangeValue)
champduparametre.ApplyCurrentValues(valeurparameter)
Me.crystalreportviwer1.reportsource=rp
end sub