Gestion d'erreurs toute bête sujet

Bonjour,
Je coince sur un truc tout bête et j'y perds mon latin (mon Delphi plutôt :D).
Voila un bout de code tout bête qui ouvre un fichier avec gestion d'erreur (try .. except). Volontairement le fichier n'existe pas, il y a donc une erreur 103 qui m'envoi dans le except. Normalement le except ne propage plus l'erreur, or à la fin du except j'ai une message box "erreur E/S 103". Comment éviter cela? Soit c'est l'age, soit je ne comprends plus rien aux exceptions! 8O
Voici le code:

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18

var Chem:String; F_Data:TextFile; S_Final:AnsiString; Erreur:Boolean; begin S_Final:='Test'; Chem:='C:\'; ForceDirectories(Chem); Erreur:=false; try AssignFile(F_Data,Chem+'Data.dat'); reset(F_Data); writeln(F_Data,S_Final); except Erreur:=true; end; CloseFile(F_Data);

---

Merci de vos lumières.

Gestion de produits avec liste de valeurs dans une autre table sujet

Bonjour,
Je travaille actuellement sur un site en PHP qui nécessite une liste de produits.
Les produits appartiennent à des catégories qui leur donnent des propriétés (pays, taille, etc).
Certaines valeur de propriétés sont stockées dans des tables externes.

J'ai donc :
- Une table produit
- Une table propriétés
- Une table de liens entre les produits et ses propriétés. Elle contient également la valeur de la propriété en question
- D'autres tables avec des listes de valeurs pour certaines propriétés

sgbd.jpg

Quelle serait la meilleur façon de récupérer un produit, ses propriétés et leurs valeurs dans le cas où celles-ci sont stockées dans d'autres tables en un minimum de requêtes ?
Les sgbd ont toujours été hélas ma grande faiblesse.

Merci d'avance.

Images attachées

• 
  
  sgbd.jpg
  (54,4 Ko)
  

[XL-2007] Gestion Erreur dans un userform - CDate sujet

Bonjour,
Dans un formulaire, on doit saisir plusieurs dates.
Pour ce faire, j'utilise le code suivant :

Code:

---

1 2 3 4 5 6 7 8 9 10 11

Private Sub TbxPeriod1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger) 'On accepte les chiffres et / Ou bien, si on tappe un double // dans la chaîne, elle est refusée. If InStr("0123456789/", Chr(KeyAscii)) = 0 Or InStr(TbxPeriod1.Value, "//") Then KeyAscii = 0: Beep: _ MsgBox "Saisie incorrect, recommencez, SVP.", vbExclamation, "ERREUR" TbxPeriod1.SetFocus Dim Valeur As Byte TbxPeriod1.MaxLength = 10 'nb caractères maxi autorisé dans le textbox Valeur = Len(TbxPeriod1) If Valeur = 2 Or Valeur = 5 Then TbxPeriod1 = TbxPeriod1 & "/" TbxPeriod1.AutoTab = True 'tabulation automatique End Sub

---

puis pour retour sur la feuille excel, dans la procédure de validation (bouton Ok) :

Code:

---

Range("C6") = CDate(TbxPeriod1.Value)

---

il reste à gérer les erreurs de saisie de type jour supérieur à 31 et mois supérieur à 12 ; j'ai donc mis une gestion d'erreur, toujours dans la procédure de validation de type

Code:

---

1 2 3 4 5 6 7 8

On Error GoTo ErrorGestion 'Gestion des erreurs notamment saisie d'un mois >12 Range("C6") = CDate(TbxPeriod1.Value) ... Unload Me Exit Sub ErrorGestion: MsgBox "Erreur de saisie incohérente" & Chr(10) & Chr(10) & " Vérifier les dates ?", vbCritical, "ERREUR" End Sub

---

Cela fonctionne pour les jours supérieurs à 31, mais pour les mois, si je saisie 01/13/2014, je n'ai pas de message d'erreur et dans le tableur, j'ai 13/01/2014 ---- HOREUR ! :calim2:
Quelqu'un peut-il m'aider svp.
Merci

Amélioration Performance Rapports - Gestion affichages sujet

Bonjour,

Je souhaiterais avoir vos avis sur la best-practice à utiliser pour gérer l'affichage de "sous" rapport.

Je suis situé côté MOA, dans pas technique. J'ai reçu une formation Report Studio (Cognos 10) et depuis, j'apprends sur le tas...
Donc dans la mesure du possible si vous pouviez me répondre sans utiliser de termes trop techniques, cela me permettrait de vous comprendre ;-)

Mon problème est le suivant :
Dans certains rapports, j'ai créé une page d'invite qui permet à l'utilisateur de faire ses sélections puis de sélectionner l'analyse qu'il souhaite (ex : tableau A ou tableau B).
Je souhaiterais optimiser le temps de traitement du rapport.
Afin d'orienter l'utilisateur vers le bon tableau, je connais les possibilités suivantes :
- mes tableaux sont sur deux pages différentes et je gère l'affichage de la page concernée via une variable de rendu
- mes tableaux sont sur la même page et je gère l'affichage du tableau concerné via une variable de rendu
- mes tableaux sont sur la même page et je gère l'affichage du tableau via une variable de style associée au type de zone "Aucun"

Quelle méthode est la plus performante? Y en existe-il une autre plus performante que les 3 ci-dessus?

Au niveau de requêtes, j'ai basé mes 2 tableaux sur la même requête. Est-ce plus performant? Est-ce la bonne méthode?

Merci d'avance

Fonction de gestion d'objets temporaires (missilles, balles) sujet

Bonsoir à tous
je voudrais savoir comment je peux programmer une fonction qui gère des objets temporaires comme
des balles de pistolet ou des missiles dans le cas d'un Shoot'em up


Y-a-t-il une façon simple de le faire?

L'ordinateur ne sait pas quand et combien de fois je vais tirer, alors je ne peux pas utiliser une variable ou un tableau à taille fixe je pense


merci pour vos réponses , idées et suggestions ! :P

[AC-2013] Besoin d'aide pour une base de gestion de booking sujet

Bonjour,

Je cherche à créer une base de données Access pour travailler avec des personnes de mon association (en réseau), mais je suis débutant dans le domaine, je tâtonne…. Bref j’aimerais avoir un conseil ou une aide. Nous travaillons actuellement sur fichiers Excel et l’utilisation est lourde, le risque de perte de données et d’erreurs est assez important.

Il faut déjà savoir que ceux qui travailleront sur cette base n’ont pas tous Access. Je crois qu’en utilisant le Runtime Microsoft, il est possible de travailler sur une base déjà créée, mais quelles sont les limites de cette utilisation ? (Si les limites sont trop importantes il sera possible de partager access pour d’autres on verra ….)

Le principe de cette base est un carnet d’adresse pour de la ressource et du booking (de groupes de musiques). Il y a donc des personnes s’occupant de remplir et d’actualiser ce carnet d’adresse et d’autres qui l’utilisent plus en lecture, qui modifie des infos de booking et qui peuvent également actualiser les infos si besoin.

- D’un côté une table structure avec : NOM | DESCRIPTIF | ADRESSE | SITE WEB | ainsi que :
o un type (salle, festival, café…) et plusieurs styles (rock, chanson, world…) via des listes je pense que c’est suffisant…. (ou une table style et une autre type permettant de chercher les structures suivant ces critères).
o Plusieurs contacts par structure
o Plusieurs lignes d’information booking (classée par date de contact)

- Une Table Contact avec NOM | PRENOM | MAIL | TEL ainsi que
o Le type de contact (accueil, billetterie, technique…)

- Une Table Booking avec DATE DU CONTACT | QUI A CONTACTE | COMMENTAIRES

Mon problème est que je ne sais pas exactement comment relier ces différentes tables sachant qu’il doit être possible de faire des recherche dans cette base via la localisation (département, code postal, ville, pays) via les contact (nom, prénom) via les noms, types ou styles de structures.
On doit enfin pouvoir avoir une fiche par structure résumant le tout :

NOM STRUCTURE | TYPE | STYLES
- Adresse
- Site Web
Descriptif :

CONTACTS
- Contact 1 : type, nom, prénom, tel, mail
- Contact 2 : type, nom, prénom, tel, mail
- …

BOOKING
- Date 1 : qui, commentaire
- Date 2 : qui, commentaire
- …

Je pense être assez clair mais c’est un peu compliqué quand on débute. Auriez-vous quelques conseils ? Quelqu’un serait-il prêt à m’aider ?
Merci d’avance pour vos réponses.
A bientôt.
Larbredort.

Gestion d'un site web hébergé sujet

bonjour

je viens de télécharger mon site créé avec Drupal sur ma machine via FTP et récupérer la base mysql.

Maintenant je veux mettre à jour mon site c'est à dire établir quelques modifications sur les pages du site, mais je n'arrive même pas à l'exécuter localement via le serveur WAMP, je ne sais c'est quoi le problème.
Veuillez m'aider s'il vous plaît.

Merci pour votre intérêt de m'aider.

[MPLAB simulation] Problème de gestion des sorties sujet

Bonsoir, je me lance actuellement dans une autre application du langage C que celle que j'avais jusqu'à présent : La programmation du microcontrôleur PIC16F877. Pour le moment, je ne dispose que du logiciel MPLAB et du compilateur CC5X, en attendant d'avoir tout le matériel, je me contente de simuler, j'essaie alors de simuler ce code tout simple censé faire clignoter une LED :

Code:

---

#define RA0 PORTA.0
 
void main(void)
{
    RA0=0;
    TRISA=0b00000000;
    while(1)
    {
        RA0=0;
        RA0=1;
    }
}

---

Mais lorsque je regarde la valeur binaire du port A en simulation, celle-ci reste égale à 0b00000000, même en simulant pas à pas ; je modifie alors le code :

Citation:

void main(void) { TRISA=0b00000000; while(1) { PORTA=0b00000000; PORTA=0b11111111; } }

Cette fois, la simulation affiche comme valeur binaire : 0b00010000 :help: J'avoue ne plus savoir quoi faire, jusqu'à preuve du contraire, la ligne PORTA=0b11111111 signifie que l'on met tous les bits du port A à 1 et pas seulement le 4ème, je me trompe ?

Voici une capture d'écran de ce que j'obtiens :



Quelqu'un a-t-il déjà été confronté à ce problème ?

XL 2013 Gestion des stocks Excel sujet

Bonjour

Je souhaiterai faire une gestion des stocks simples avec un UserForm, étant novice en VBA j'aurai besoin de votre aide pour réaliser cet UserForm et l'affecter aux feuilles pour qu'il calcule automatiquement la quantité restante en stock.

Cordialement.

Fichiers attachés

• 
  
  Gestion de stock.xlsx‎
  (20,3 Ko)
  

[XL-2013] géstion des taches excel sujet

Bonjour
J’ai des programme Excel qui précédemment sous Excel 2003 lorsque je lancé Excel sous « ThisWorkbook » lancé directement une VBA en réduisant la fenêtre Excel avec la commande 'Application.WindowState = xlMinimized et en fin de programme je retournais sur ma fenêtre Excel avec la commande 'Application.WindowState = xlMaximized

Hors si je fais cela avec Excel 2013 et mes collaborateurs aussi qui n’ont pas eu le choix que de basculer sur cette nouvelle version d’office, si nous avons un autre programme Excel ouvert en même temps sur l’ordinateur le message d’erreur « Erreur d’exécution’9’ : L’indice n’appartient pas à la sélection. »
L’une des constatations de l’informaticien est que Excel 2013 dans la gestion des taches n’ouvre qu’une seul procédure « excel.exe *32 » ce qui fais rentrer les différents fichiers Excel d’ouvert en conflit.

J’ai aussi le même problème si je veux programmer la copies de valeur d’un fichier Excel a un autre par macro car les Windows("truc.xls").Activate ; Windows("truc.xlsx").Activate ; Windows("truc.xlsm").Activate ne marche pas qui aurai une solution s’il vous plais ?

[Problème] gestion de l'autofocus en vidéo sur le GH3 ? sujet

Bonjour,

J'ai un GH3 ainsi qu'une optique 17mn ouvrant à 1.8.
Je compte l'utiliser avec un glidecam pour des déambulations. Donc sans pouvoir gérer moi même la mise au point.

J'ai essayé de mettre l'appareil en autofocus mais il avait vraiment du mal à faire la mise en point en fonction de mes déplacements. Quels types de mise au point me conseillez vous ? quel type d'autofocus aussi (il y en a deux si je me trompe pas) ?

MErci d'avance

[Débutant] [Demande d'aide] Gestion bibliothèque sujet

Bonsoir/Bonjour,

Je debut en VB.NET, je travail actuellement sur un petit programme que serais capable de classer tout mes livres indiquant dates auteurs et noms des livres mais aussi d'afficher l'image de la page de couverture que j'aurais scanner et enregistrer au format png

j'utilise VB express 2010

Mon problème:

Pour mieu expliquer je vais mettre quelque screen et mes code:

En premier je créer le livre :



en deuxième temps je doit afficher dans ma listbox le nom du livre puis juste en dessous quand je cliquerais sur le fichier dans ma listbox afficher les details c'est ici que je bloque je vous laisse ce que j'ai commencer.Si vous pouvez m'orienter quelque par je vous serais très reconnaissant :




les 2 codes utilisé :

1er:

Code:

---

Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        Dim l As String = TextBox2.Text
        Dim a As String = TextBox4.Text
        Dim d As String = TextBox3.Text
        Dim fichier As String = "l" + ".OmegionCM34"
        If Not l = "" Then
            If My.Computer.FileSystem.DirectoryExists("./livres/" + l) Then
                MsgBox("Ce livre existe déjà")
            End If
            If Not a = "" Then
                If Not d = "" Then
                    Dim sw As New StreamWriter("./livres/" + fichier)
                    sw.WriteLine(l) ' l = le nom du livre
                    sw.WriteLine(a) ' a = L'Auteur
                    sw.WriteLine(d) ' d = L'année de parution du livre
                    sw.Close()
                    'je fais créer un dossier du nom de mon livre dans mon répertoire "livre" dans le quel je créer un fichier
                    'l.OmegionCM34 qui contiendras ce que je lui es dit d'écrire
                Else
                    MsgBox("Vous avez oubliez la date ! Si vous ne la connaissez pas, mettez '0' comme valeur.")
                End If
            Else
                MsgBox("Vous avez oubliez le nom de l'Auteur !")
            End If
        Else
            MsgBox("Vous avez oubliez le nom du livre !")
        End If
    End Sub

---

2ieme:

Code:

---

Public Class Form1
    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

        Try
            Dim s = My.Computer.FileSystem.GetDirectories("./livres", FileIO.SearchOption.SearchAllSubDirectories)
            For Each a In s
                ListBox1.Items.Add(a)
            Next
        Catch ex As Exception

        End Try
    End Sub

---