AccueilCodesTutorielsForumsEmploiLivresGuide achatConnexion

  • CodeS-SourceS
  • RSS CodeS-SourceS
  • CodyxBot, le Bot GTalk & MSN qu'il vous faut !
  • Générez des revenus avec vos codes, scripts et tutoriaux
  • Aide à la navigation du site
begin process at 2009 07 10 13:04:02
Vous ne trouvez pas de réponse à votre problème ? Alors posez la question dans le forum. Souvenez-vous qu'il n'y a jamais de question bête, mais rester dans l'ignorance parce que l'on n'ose pas poser une question, ça c'est une erreur !

8 commentaire(s) de keke4483 sur des sources sur tout CodeS-SourceS

Le : 11/12/2004 14:37:34
Source : DEVINER LE MOT ;; UN JEU AVEC TROIS NIVEAUX "FACILE // MOYEN // MASTER"
Bonjour à tous,
pour essayer de résoudre ton problème, il faut te dire que la fonction split("texte",argument) permet de transferer une chaine de caractere en un table de string. Le principe est le suivant la chaine est scanner et à chaque fois que le caractère argument est trouvé le morceaux du mot scanner auparavant est transmis dans une colonne de tableau.
Ex :
Dim strTableauMot() as string
mot = "Je fais un test"
strTableauMot = Split(mot," ")
'alors le tableau de string strTableauMot contiendra les 'infos suivantes :
'strTableauMot (0)  <=> "Je"
'strTableauMot (1)  <=> "fais"
'strTableauMot (2)  <=> "un"
'strTableauMot (3)  <=> "test"

Donc ce que je te suggère de faire est une boucle :
Private function Split() as string()
Dim intBoucle as integer
Dim tMots() as string
redim tMots(0)
For intBoucle = 1 to len(mot)
if Mid(mot,intBoucle,1) = vbCrLf) then
      redim preserve tMots(ubound(tMots)+1)
else
     tMots(ubound(tMots))=Mid(mot,intBoucle,1)
end if
next intBoucle
split=tMots
end function

Bon voila je sais pas si ca marche mais la logique c'est a peux près ca, le mieux c meme de passer en parametre le mot et son argument, mais comme g plus VB6 j'ai pas pu tester, désolé.

Je suis pas sur que le code marche directe apres un copier coller dans votre source, n'hésitez pas a poster vos correction.

@++

Le : 13/11/2004 01:45:08
Source : REDIMENSIONNEMENT DE CONTROL
Pour tout vous dire je ne pensais pas ouvrir, par l'intermédiaire de cette source, un débat sur les languages de programmation. Mais bon, comme dis si bien notre collègue Scalpweb :"Chacun ses gouts c'est tout", l'essentiel c'est d'être animé de la même passion ;)

Le : 10/11/2004 21:14:02
Source : GESTION DES STAGIAIRES
Salut j'ai observé ton code, et j'ai quelques obrservations.
Attention tout ce que je dis ci-dessous n'est pas fait pour critiquer ta méthode de programmation
mais pour te proposer d'autre solution qui sur le moment m'ony semblées plus efficace.

- La première remarque concerne les différents control que tu as placé :
Presque aucun des contrôles présent sur tes feuilles n'ont été renommé, rien ne vaut un bon NAME parlant, l'habitude veut
qu'ils soient préfixé de trois lettres et qu'ils aient un nom parlant.
Exemple pour un CommandButton : cmdValider, une Textbox : txtNom ...
Actuellement rien ne me dis que le Command4 est le bouton Modifier, alors que cmdModifier est très parlant.

- J'ai vu que dans ton module tu as créé une fonction pour faire ta connexion à ta BDD, excellent. Mais si la base est défectueuse
tu ne sais pas d'ou viens le problème l'appli se ferme violemment. Une gestion d'erreur aurait été nécessaire :
Tu transforme ta sub en function booléenne
"Public function connectionbd() as boolean
connectionbd = false
On error goto GESTIONERROR
    connection.Provider = "microsoft.jet.oledb.4.0;"
    connection.Open "provider=microsoft.jet.oledb.4.0;" & "data source=" & App.Path & "\" & "mlr1.mdb;"
    
    commande.ActiveConnection = connection
    
    record.CursorLocation = adUseClient
    record.CursorType = adOpenDynamic
    record.LockType = adLockOptimistic
    connectionbd = true
    exit function
GESTIONERROR:
    connectionbd = false
    MsgBox Err.Description
End Sub"

Et la tu sais si ta connexion s'est bien passée. Nhésite pas aussi à faire une fonction de déconnexion.
Parce que avec Acces par exemple si ton appli se faire violemment, il est possible que ta base reste ouvert, et là
c'est terminé ta base est morte.

- Dans le load de ta fenetre principale, tu écris Module1.connectionbd. L'extension Module1 n'est pas nécessaire

Pour la suite j'ai parcouru les fenetres les une apres les autres.

"ajouter" --> personnellement je préfère mettre frmAjouter

- Ici "ajouter.Command2.Caption" ajouter est inutile car tu es déjà dans "ajouter"
- Dans la sub "Command2_Click", le problème de renommage de control est très visible : a quoi correspond tel TextBox ?
- Pour l'insertion de données l'update de record n'est pas conseillé, mieux vaut un bon INSERT SQL.
commande.CommandText = "INSERT INTO stagiaire (NOMSTAGIAIRE, PRENOMSTAGIAIRE,....) VALUES ('TOTO','TATA',....)"
- De plus apparamment tu sais que tel TextBox sert pour tel requete alors fais des contrôles indexés pour ainsi faire des
  boucles :
   for i = 1 to 16
   txtSalarie(i) = Record.Fields(i)
   next i
-Pour finir sur la form "ajouter", n'hésite pas à encadrer tes insertions par une transaction (ca évite de mettre en l'air
ta base quand seulement la moitié des actions se font suite à une erreur).

"infoetab", "infomaitre", "infostagiaire"

- Ne charge pas les informations à partir de la fenêtre appelante, crée des sub de chargement dans chaque fenetre, et passe
l'identifiant de la personne traité par le module "Public intIdentPersonne as integer"

"main"

- La première chose que j'ai fais, c'est de saisir du texte dans la combo et de cliquer sur Modifier....
Plantage, il faudra rajouter un petit control sur la validité de la saisie ou tout simplement l'empeché.
- J'ai remarqué aussi que tu faisais des "select * from ..." évite, précise les champs ramenés, parce que si tu rajoutes
le champs PSEUDOSALARIE dans ta table entre le nom et le prenom, tout tes "select" deviennent bancales.
- L'appel de ta fenetre "ajouter" n'est pas modal je peux donc ouvrir deux fenêtres de modification en même temps.

Voila j'en ai terminé pour les solutions possibles.

Je te souhaite une bonne continuation et bonne prog.

Le : 09/11/2004 17:57:02
Source : MA CAM TO JPG : CAPTURE DE WEBCAM ET SAUVEGARDE AU FORMAT JPG.
"Est t'il possible de gerer plusieurs webcams  avec l'api intel? "

L'API Intel ne sert pas pour gerer la webcam mais pour faire la conversion en JPG, la webcam est gerer par un transfert d'image dans le presse papier.

"Quels sont les avantages d'utiliser cet api?"

Tout dépend de ce que tu faire avec tes JPG.
La conversion par API est apparemment plus rapide mais propose un taux de compression inférieur, à l'inverse la class que notre collègue programmeur jack nous a proposé :
"Ca peut toujours être interessant
http://www.Planet-Source-Code.com/vb/scripts/ShowCode.asp?txtCodeId=50065&lngWId=1"

est apparemment moins rapide pour faire la conversion mais propose un meilleur taux.

Pour la gestion multi cam, il faut réussir à récupérer dans le presse papier l'image de l'une puis de l'autre.

Voila j'espere avoir repondu aux questions.

Bonne prog.

Le : 09/11/2004 17:56:57
Source : MA CAM TO JPG : CAPTURE DE WEBCAM ET SAUVEGARDE AU FORMAT JPG.
"Est t'il possible de gerer plusieurs webcams  avec l'api intel? "

L'API Intel ne sert pas pour gerer la webcam mais pour faire la conversion en JPG, la webcam est gerer par un transfert d'image dans le presse papier.

"Quels sont les avantages d'utiliser cet api?"

Tout dépend de ce que tu faire avec tes JPG.
La conversion par API est apparemment plus rapide mais propose un taux de compression inférieur, à l'inverse la class que notre collègue programmeur jack nous a proposé :
"Ca peut toujours être interessant
http://www.Planet-Source-Code.com/vb/scripts/ShowCode.asp?txtCodeId=50065&lngWId=1"

est apparemment moins rapide pour faire la conversion mais propose un meilleur taux.

Pour la gestion multi cam, il faut réussir à récupérer dans le presse papier l'image de l'une puis de l'autre.

Voila j'espere avoir repondu aux questions.

Bonne prog.

Le : 07/11/2004 20:05:12
Source : MA CAM TO JPG : CAPTURE DE WEBCAM ET SAUVEGARDE AU FORMAT JPG.
Voila une nouvelle mis a jour
Maintenant, un nouvel élément de comparaison est disponible : le temps de traitement.
A bientot surement

Le : 07/11/2004 17:00:09
Source : MA CAM TO JPG : CAPTURE DE WEBCAM ET SAUVEGARDE AU FORMAT JPG.
"Dans un cas comme dans l'autre, pourrais-tu nous tenir au courant de tes essais et conclusions ?"

Voila, je ne répondrais pas volontairement à cette question (du moins pas directement). J'ai rajouté un petit module de comparaison entre les deux méthodes, ainsi vous pourrez vous même juger les cotés positifs et négatifs de chaque méthode (notez que le taux de compression et la qualité d'image ne sont pas les seuls éléments à prendre ne compte...).
Je ne voulais pas vous imposer une conclusion (la mienne) qui ne va peut être pas dans le sens de ce que vous recherchez, je vous laisse la liberté de juger par vous même.
Bonne prog à tous.


Le : 06/11/2004 13:11:57
Source : MA CAM TO JPG : CAPTURE DE WEBCAM ET SAUVEGARDE AU FORMAT JPG.
Salut jack,
C'est fait la slidebar est mise en place.
J'ai été voir le lien que tu a déposé et la source à l'air vraiment pas mal.
Avant de la mettre en place je vais quand même vérifier qu'elle donne d'aussi bon résultat que l'API INTEL. Si elle mieux c'est clair que je l'utiliserais


1


Nos sponsors

Sondage...

CalendriCode

Juillet 2009
LMMJVSD
  12345
6789101112
13141516171819
20212223242526
2728293031  

Consulter la suite du CalendriCode

Comparez les prix Nouvelle version


Nabaztag:tag, lapin communicant + mini-lapin RFID Nano:ztag
Entre 129€ et 130€


Visiter le guide achat

Photothèque Nouveau !

Photo friends at the beach.Photo alphabet langue des sourds
Photo accident de la route 

Visiter la photothèque


Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés
Temps d'éxécution de la page : 0,250 sec

Google Coop CodeS-SourceS Google Coop CodeS-SourceS


Certaines images présentes sur le site (notament certains avatars) sont issues des collections IconShock, donc si vous souhaitez utiliser ces icons vous devez les acheter, ne les copiez pas et ne utilisez pas dans vos sites et applications sans les avoir commandé.