Pako

Voici un petit truc de notre ami Serge, pour supprimer tous les fichiers bons à jeter d'un répertoire ! Créer une routine ( avec Bloc-Notes ) nommée !SafeToDelete.bat qu'on place dans le répertoire où se retrouve les fichiers bons à jeter (ex: temp). Elle contient: del *.fas del *._* del *.bak ect.... exit Et on l'exécute... clic...clic...Magic ! Merci Serge ! Have Fun la gang !

Je suis d'accord avec Krynn, de plus si on participe régulièrement au forum, on vient à connaitre de plus en plus les membres actifs, leur région, leur profession, leur humeur, ect... ! Exemple, le sujet ouvert que Rebcao nous présente.........

Tu pourras peut-être trouver ta résonde : http:// http://www.forum.moteurprog.com/index.php?url=FORUM.php&forum=141

Pour créer un Menu Partiel, il m'a été conseillé de faire un fichier .MNU au lieu d'un .MNS ! Surtout lorsque tu es admin du Menu, car si un utilisateur fait le bordel dans le Menu, tu peux réinitialisé le fichier .MNS avec le fichier source .MNU....... * Je ne connais pas en détail tous les avantages et les inconvénients (si il y a lieu) du fichier .MNU, est-ce quelqu'un pourrait m'éclairer sur cette question ? Quand Menu va tous va ! :)

Merci Didier, pour ton aide ! Mais après exécution de ton code, le résultat est x=0 et y=0 . Le problème est toujours le même, c'est-à-dire la récupération des coordonnées d'une fenêtre de présentattion est impossible..... TableauXY = objEntite.Coordinates ' TableauXY est toujours empty (vide) :casstet: :casstet: :casstet: :casstet: :casstet: :casstet: :casstet: :casstet: :casstet: :casstet: :casstet: :casstet: :casstet: :casstet: :casstet: [Edité le 28/10/2004 par Pako]

Avec et sans fil, Microsoft dévoile une panoplie de nouveaux claviers et souris, y compris un lecteur d’empreintes digitales disponible soit en version autonome ou intégré au clavier ou à la souris. Force est de constater qu’avec les années, la catégorie des périphériques occupe de plus en plus de place dans l’offre de Microsoft dont les premières souris ont été dévoilées il y a vingt ans. La fournée d’automne comprend neuf nouveaux claviers et souris optiques, sans fil et filaires, de même que – fait nouveau chez Microsoft – un lecteur d’empreintes digitales offrant un moyen sécurisé, personnalisé et simplifié d’accéder aux ressources informatiques. Le lecteur est disponible soit en version autonome, dans quel cas on le branche à l’ordinateur, soit en tant qu’élément intégré au clavier ou à la souris. Doté d’une surface de lecture où l’utilisateur appose son doigt, le lecteur met fin à l’utilisation des systèmes de mots de passe, puisqu’il permet, en une opération, de vérifier l’identification de l’utilisateur et de lui donner accès aux ressources auxquelles il a droit et à ses préférences d’utilisation (par exemple : sa liste de sites Web préférés). L’utilisation du lecteur nécessite l’enregistrement préalable de l’empreinte digitale de l’utilisateur, pour un doigt donné, et de ses préférences d’utilisation. L’empreinte peut également servir pour valider l’accès aux sites Web qui nécessitent l’utilisation d’un mot de passe. Les technologies de biométrie étant relativement jeunes, le lecteur s’avère quelque peu capricieux à utiliser, dans la mesure où il faut parfois recommencer l’exercice pour s’assurer de l’identification correcte de l’utilisateur. À l’instar des souris dévoilées en 2003, les nouvelles souris sans fil de cette année tirent profit d’une pile longue durée (sa longévité peut atteindre six mois) et d’une roulette multidirectionnelle, caractéristiques introduites avec la précédente fournée. Elles comportent aussi, de même que le nouveau clavier Digital Media Pro filaire, un bouton de zoom permettant d’agrandir facilement les images et les documents affichés à l’écran. http://www.adoskuat.com/mes_images/image1098965442_799.jpg L’offre du fabricant comprend également les souris de la gamme IntelliMouse Explorer. Disponible en version sans fil ou filaire, elles sont dotées d’une roulette de défilement inclinée permettant de faire défiler l’écran à la verticale et à l’horizontale et de cinq boutons programmables. Fait nouveau cette année, l’offre du fabricant comprend une souris sans fil pour bloc-notes, qu’on pose lorsqu’on ne l’utilise pas sur un petit récepteur inséré à la base du dispositif pour préserver sa pile dont l’autonomie est d’environ trois mois. Le designer industriel français Philippe Starck a, en outre, prêté son talent pour la conception d’une souris optique filaire S+ARCK, la première souris griffée de Microsoft. Arborant des lignes épurées et flanqué en son centre d’une bande lumineuse qui la partage en deux parties égales, faisant office de bouton droit et de bouton gauche. http://www.adoskuat.com/mes_images/image1098965655_881.jpg L’ergonomie revisitée On trouve, au niveau des claviers, un clavier ergonomique sans fil, appelé Wireless Optical Desktop 3.0 , plus « standard » que le précédent clavier ergonomique courbé introduit en 1994 et dont les touches étaient partagées en deux groupes distincts placés en angle, de part et d’autre du clavier. À défaut d’être séparées en deux groupes, les touches sur ce clavier sont disposées en angle, ce qui favorise le positionnement des mains et des poignets. L’offre du fabricant comprend également des souris et des claviers sans fil compatibles avec la technologie Bluetooth, dotés d’un émetteur-récepteur USB offrant une portée de 30 pieds, en l’occurrence l’ensemble souris-clavier Elite pour Bluetooth et la souris IntelliMouse Explorer pour Bluetooth. http://www.adoskuat.com/mes_images/image1098965686_390.jpg http://www.adoskuat.com/mes_images/image1098965701_908.jpg Pour plus de détails : En anglais : http://www.microsoft.com/hardware/mouseandkeyboard/default.mspx En français : http://www.microsoft.com/france/chezvous/accessoires/default.asp

Peut-on récuperer les coordonnées d'un viewport en rectangulaire ou autre forme ? Dans les propriétés, on retrouve le X, Y du centre du viewport ( vItem ), mais pour un viewport de forme non-rectangulaire, comme trouver ses coordonées à partir de ces coordonnées du centre ? ? ? :casstet: Merci ! :casstet: Voici le début de mon programme, le but est de récuprer les coordonnées de tous les viewports (rectangulaire ou non ) dans mon dessin : Public Sub Recherche() On Error Resume Next Dim iDxfCode(0 To 1) As Integer Dim vDxfValeur(0 To 1) As Variant Dim vItem As Variant Dim dCoordX As Double If ValiderSelect("Filtre1") Then ObjSelection.Clear iDxfCode(0) = 0: vDxfValeur(0) = "VIEWPORT" iDxfCode(1) = 8: vDxfValeur(1) = "NOMduLAYER" ObjSelection.Select acSelectionSetAll, , , iDxfCode, vDxfValeur End If For Each vItem In ObjSelection dCoordX = vItem.Center.Center(0) MsgBox dCoordX, vbQuestion 'AUCUNE VALEUR RÉCUPERER ??? Next End Sub [Edité le 27/10/2004 par Pako]

Sujet traité : http://www.cadxp.com/modules.php?op=modload&name=XForum&file=viewthread&tid=3710 Sacré AutoCAD, il joue à la cachette avec ses utilisateurs ! Je suis content de voir que ton problème est résolu et je t'invite, au lieu de me payer un verre, de faire un don à CADxp. C'est grâce, à ce moyen de communication qu'on peut réglé des problèmes.... Clic sur ce lien: http://www.cadxp.com/modules.php?op=modload&name=XForum&file=viewthread&tid=2044#pid [Edité le 26/10/2004 par Pako]

Effectivement, elle est ou cette sal...... Voici comment j'ai procédé pour retrouver ma barre : - Désactiver tous les icônes et les tableaux ( properties, design center, ect...) - Désactiver dans les options, les barres de défillement - Agrandir le logiciel Ensuite, je me suis promener avec mon curseur autour de mon écran, en essayant d'étirer le contour....... Et Oupp ! ma barre de commande est apparue !

Expérience vécu cette semaine..... J'avais perdu mon barre de commande....après plusieurs tentatives de récupération, elle était réduite à droite de mon écran, vraiment pas facile à retrouver sa cachette était bonne.... Lors que tu tape aveuglément un commande, est-ce qu'elle s'exécute, si oui, touve ça cachette ? À vérifer attentivement......

La variable ACADVER ( si disponible ne LT) te permet de voir la version du logiciel utilisé : exemple pour la version 2004 : Command: acadver ACADVER = "16.0s (LMS Tech)" (read only) A+

On est 9789 membres inscrits dont 28 donateurs qui partage ton avis ! Voici un petit geste pour garder ce site en ligne , et encourager son webmaster ! Clic sur ce lien: http://www.cadxp.com/modules.php?op=modload&name=XForum&file=viewthread&tid=2044#pid Sincèrement,

Salut Nanard, Que veux-tu dire ? avant = paperspace et arrière = modelspace ? Développe ta question ? Comme dirait Didier, soit plus clair ! A+ ;) [Edité le 25/10/2004 par Pako]

Salut la gang ! C'est devenu une mode de changer la langue de son logiciel ! Cric Crack Croc ! Comment tu fais CRASH pour acheter un logiciel, pis te trompé de langue ???? La meilleur solution pour toi, c'est d'apprendre l'anglais, trompe toé pas de dictionnaire ! Haîe ! Pat , il y a t-il un politique pour parler de Crack sur ce site ? Devrait-on HELP'é ce genre de message ? [Edité le 25/10/2004 par Pako]

Bienvenue karichek sur CadXP, :laugh: Appelle ton revendeur ou fait la demande pour un CD Évulation en Français ! [Edité le 8/12/2004 par Pako]

Je te conseille le vaudou du VBA, mon ancien prof M. Albert Thalheim. ;) voici le lien : http://www.thalheim.ca http://www.adoskuat.com/mes_images/image1098192485_95.jpg

Merci les boys !

Aucune idée ! nobless .... La seule solution suggérée est de diminuer le temps de la variable : SAVETIME et te croiser les doigts avant que ça plante ...... Par contre à la source, il doit y avoir une raison pourquoi tu plantes si souvent, car la 2002 est assez stable.... [Edité le 15/10/2004 par Pako]

Voici un début : Dim theExcel As Excel.Application Set theExcel = _ CreateObject("Excel.Application") theExcel.Visible = True Une recherche dans GOOGLE peut aussi t'aider , ou dans les forums, comme dit mon ami Tramber ! Have Fun !

En tous cas, avec 2004 ... ddrename est inconnu.... Command: _ddrename Unknown command "DDRENAME". Press F1 for help.

cric crack croc ! :casstet:

La compagnie japonaise Seiko Epson a récemment présenté un mini-robot ressemblant à un hélicoptère qui pourrait un jour servir aux parents pour qu'ils surveillent leurs enfants sans avoir à être avec eux. Ce mini-robot, qui serait le plus léger au monde selon Epson, pourra suivre n'importe quel événement à distance; il suffira de le télécommander depuis un ordinateur et d’observer ce qui se passe grâce sa caméra intégrée. Le « i FR-II » ou micro-robot volant II, ne pèserait que 12,3 grammes, soit moins qu'une canette de cola vide, et présenterait un rayon de 6,8 cm et une hauteur de 8,5 cm, ce qui lui permettrait de rester discret. Le but d’Epson dans la création de ce minirobot serait de veiller à la sécurité des êtres humains. Ils prévoient qu’outre surveiller des enfants à distance, ce mini-robot pourrait possiblement effectuer d’autres tâches comme des missions de surveillance ou la localisation de survivants après une catastrophe. Cependant, il reste toujours en développement et jusqu’à maintenant, il n’aurait pas réussi à terminer un trajet en raison de sa courte autonomie de vol de trois minutes. Gageons que plusieurs parents dans le monde rêvent d’une telle innovation! http://www.adoskuat.com/mes_images/image1097762793_350.jpg Feriez-vous confiance à un robot ?

Voici un exemple d'un commandButton: Private Sub cmdListe_Click() Dim Index As Integer CommonDialog1.FileName = "A.LST" CommonDialog1.DefaultExt = ".lst" CommonDialog1.DialogTitle = "Identifier le nom de fichier" CommonDialog1.Filter = "Liste|*.lst" CommonDialog1.FilterIndex = 1 CommonDialog1.Flags = &H10 CommonDialog1.Action = 1 strFichier = CommonDialog1.FileName If Dir(strFichier) <> "" Then Open strFichier For Input As #1 Input #1, strRepertoire cmdRepertoire.Caption = strRepertoire lstListe.Clear Do While Not EOF(1) Input #1, strNom If Dir(strRepertoire & strNom) <> "" Then lstListe.AddItem strNom End If Loop Close #1 Else MsgBox "Aucun fichier identifié." End If End Sub [Edité le 14/10/2004 par Pako]

Tu peux toujours installer le SP1 en français pour AutoCAD 2002. voici le lien : http://usa.autodesk.com/adsk/servlet/ps/dl/item?siteID=123112&id=2524974&linkID=2475161 voici la liste des correctifs : http://adeskftp.autodesk.com/prodsupp/downloads/acad2002fra_sp1.htm Bonne Chance ! [Edité le 14/10/2004 par Pako]

test