FOROS PROFESIONALES
WINDEV
,
WEBDEV
y
WINDEV Mobile
Inicio
|
Mensajes recientes
|
Conéctese...
|
Desconectar
|
Español
Inicio
→
WINDEV 25
→
WD - Como criar um campo de pesquisa em meu aplicativo?
WD - Como criar um campo de pesquisa em meu aplicativo?
Iniciado por BOLLER ADRIANO, 28,jun. 2016 18:29 - No hay respuesta
Conéctese…
BOLLER ADRIANO
#1
Miembro registrado
3.661 mensajes
Popularité : +175 (223 votes)
Publicado el 28,junio 2016 - 18:29
Prezados
Como criar um campo de pesquisa em meu aplicativo?
Normalmente, você quer fazer uma pesquisa como "todas as palavras que começam com".
Como podemos garantir que o usuário final não se preocupam com as restrições do texto completo e ele sair que alguns dos termos de busca, separados por espaços?
Ex: "Configurações Req" para Motion e configurações. código de exemplo no SQL puro:
//Exemplo
MaRequeteVoyage est une
chaîne
MaSourceVoyage est une
Source de Données
MaConnexionCDM est une Connexion
Texte_A_Rechercher est une
chaîne
// Connexion aux fichiers des voyages
// Paramètres de la connexion
MaConnexionCDM
..
Provider
=
hAccèsHFClientServeur
MaConnexionCDM
..
Utilisateur
=
"Utilisateur"
MaConnexionCDM
..
MotDePasse
=
"mot de passe"
MaConnexionCDM
..
Serveur
=
"adresse IP serveur HF"
MaConnexionCDM
..
BaseDeDonnées
=
"Nom Base de données"
MaConnexionCDM
..
Cryptage
=
hCryptageNon
// Ouverture de la connexion
HOuvreConnexion
(
MaConnexionCDM
)
// Requête a exécuter, le %1 sera le paramètre
MaRequeteVoyage
= [
SELECT DISTINCT MATCH(voyage.Titre, voyage.Detail, voyage.Pays, voyage.Ville, voyage.Commentaires) AGAINST ALL ('%1') AS PertinenceFullText1, voyage.HTTPLien AS HTTPLien FROM voyage WHERE PertinenceFullText1 > 0 AND voyage.HTTPLien <> '' ORDER BY PertinenceFullText1 DESC
]
// C’est ICI que l’on formate les paramètres à la place de l’utilisateur final
POUR
TOUTE CHAINE
s
ChaîneExtraite
,
n
Rang DE TexteRecherche SEPAREE
PAR
" "
Texte_A_Rechercher
+
= [
"+"
] +
s
ChaîneExtraite
+ [
"* "
]
FIN
MaRequeteVoyage
=
ChaîneConstruit
(
MaRequeteVoyage
,
Texte_A_Rechercher
)
SI PAS
HExécuteRequêteSQL
(
MaSourceVoyage
,
MaConnexionCDM
,
hRequêteDéfaut
,
MaRequeteVoyage
)
ALORS
Erreur
(
HErreurInfo
(
)
)
RETOUR
FIN
// Ajout des résultat dans une zone répétée
POUR
TOUT
MaSourceVoyage
ZoneRépétéeAjouteLigne
(
ZR_
Resultat_Recherche
,
MaSourceVoyage.HTTPLien
,
MaSourceVoyage.HTTPLien
)
FIN
--
Adriano José Boller
______________________________________________
Consultor e Representante Oficial da
PcSoft no Brasil
+55 (41) 9949 1800
adrianoboller@gmail.com
skype: adrianoboller
http://wxinformatica.com.br/
Informar
0
0
→ Volver a WINDEV 25
WINDEV 25
Français
English
Español
Portuguesa
Fermer cette fenêtre
Búsqueda Tipo
Sólo temas
Todos los mensajes
Periodo Buscar
Cualquier fecha
Última hora
Última 24 horas
Última semana
Último mes
Último año
Cancelar
Vista previa del mensaje
Añadiendo una imagen
Importar una imagen desde una URL
Enviar una imagen desde un archivo de su disco
Arrastrar un archivo o click en "Examinar..."
o
Cancelar
0%
WLanguage
SQL
XML, HTML
JAVA, Javascript
Texto