| |
| Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für SolidEdge |
| |
| Prozessoptimierung in Teamcenter bei Bausch + Ströbel : BCT CheckIt für fehlerfreie Workflow-Durchläufe in Teamcenter (BCT CheckIt, Teamcenter, PDM, PLM, Teamcenter Datenvalidierung, Teamcenter Workflowoptimierung, BCT Software), ein Anwenderbericht
|
Autor
|
Thema: Datein per VB in ASM einfügen (1276 mal gelesen)
|
ChaosElch Mitglied CAD-Admininstrator
Beiträge: 143 Registriert: 07.06.2005 Windows XP sp2, SolidEdge v17 sp14, CadManager v17<P>Dell Precision 370 / 380, 2GB RAM, nVidia GeForce 4400 (512MB RAM)
|
erstellt am: 10. Nov. 2006 11:35 <-- editieren / zitieren --> Unities abgeben:
Hallo zusammen! Hat mir jemand einen "schnellen" Code zum Einfügen eines par/psm/pwd/asm, um dies in einem geöffneten ASM zu verbauen? Grund: Ich will aus SAP eine Datei auschecken, in den Zwischenspeicher kopieren, und dann aus dem Zwischenspeicher in das aktuelle geöffnete ASM einfügen. Den letzteren Teil einfügen hab ich schon, da ich aber keine Ahnung hab, wie ich mit ABAP in SAP was in den Zwischenspeicher schieb, hab ich gedacht ich kopier das File in ein lokales Temp-Verzeichnis, und hole es mir von dort mit einem VB-Makro (welches von SAP angestossen wird) nach SE... gruß, ChaosElch ------------------ Gruß, ChaosElch __________________________________________ http://www.linck-hvt.com Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
WZI Mitglied
Beiträge: 114 Registriert: 17.04.2002
|
erstellt am: 10. Nov. 2006 12:01 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
|
ChaosElch Mitglied CAD-Admininstrator
Beiträge: 143 Registriert: 07.06.2005 Windows XP sp2, SolidEdge v17 sp14, CadManager v17<P>Dell Precision 370 / 380, 2GB RAM, nVidia GeForce 4400 (512MB RAM)
|
erstellt am: 10. Nov. 2006 13:18 <-- editieren / zitieren --> Unities abgeben:
Hallo Wolfgang, in ferner Zukunft vielleicht mal ;-) In SAP haben wir einen Report, mit dem wir alle unsere Produktionsteile suchen. Von dort aus können wir auch direkt Teile in SE öffnen, aber eben nicht verbauen. Idee ist deshalb dies Teile in den Zwischenspeicher zu legen, und dann per STRG-V in SE einzufügen. Hier fehlt mir aber das WIE zum Laden einer Datei in den Zwischenspeicher. Alternativ Laden eines Files direkt ins ASM von einem Verzeichnis aus... gruß, ChaosElch ------------------ Gruß, ChaosElch __________________________________________ http://www.linck-hvt.com Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ChaosElch Mitglied CAD-Admininstrator
Beiträge: 143 Registriert: 07.06.2005 Windows XP sp2, SolidEdge v17 sp14, CadManager v17<P>Dell Precision 370 / 380, 2GB RAM, nVidia GeForce 4400 (512MB RAM)
|
erstellt am: 13. Nov. 2006 08:54 <-- editieren / zitieren --> Unities abgeben:
Hallo Leutels! Kann mir da tatsaechlich keiner helfen? Scheint wohl doch etwas komplexer zu sein als ich dachte... Nochmal Problem erklärt: Ich will ein bestimtmes Teil per VB ins ASM holen, etwa - per Drag&Drop - per Copy&Paste - oder anderen Verbau-Befehl Bin für alle Anregungen dankbar. gruß, ChaosElch ------------------ Gruß, ChaosElch __________________________________________ http://www.linck-hvt.com Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
BJ Mitglied PLM System Administrator
Beiträge: 488 Registriert: 20.12.2002
|
erstellt am: 13. Nov. 2006 09:11 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
Hallo! Als Anregung, in .Net sieht es so aus, wie du Files in die Zwischenablage kriegst: Clipboard.SetDataObject(File) Platziert wird mit dem entsprechenden StartCommand "AssemblyEditPaste". Gruß, BJ
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ChaosElch Mitglied CAD-Admininstrator
Beiträge: 143 Registriert: 07.06.2005 Windows XP sp2, SolidEdge v17 sp14, CadManager v17<P>Dell Precision 370 / 380, 2GB RAM, nVidia GeForce 4400 (512MB RAM)
|
erstellt am: 13. Nov. 2006 09:36 <-- editieren / zitieren --> Unities abgeben:
|
ChaosElch Mitglied CAD-Admininstrator
Beiträge: 143 Registriert: 07.06.2005 Windows XP sp2, SolidEdge v17 sp14, CadManager v17<P>Dell Precision 370 / 380, 2GB RAM, nVidia GeForce 4400 (512MB RAM)
|
erstellt am: 13. Nov. 2006 12:38 <-- editieren / zitieren --> Unities abgeben:
|
BJ Mitglied PLM System Administrator
Beiträge: 488 Registriert: 20.12.2002
|
erstellt am: 13. Nov. 2006 13:07 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
|
ChaosElch Mitglied CAD-Admininstrator
Beiträge: 143 Registriert: 07.06.2005 Windows XP sp2, SolidEdge v17 sp14, CadManager v17<P>Dell Precision 370 / 380, 2GB RAM, nVidia GeForce 4400 (512MB RAM)
|
erstellt am: 13. Nov. 2006 13:17 <-- editieren / zitieren --> Unities abgeben:
|
ChaosElch Mitglied CAD-Admininstrator
Beiträge: 143 Registriert: 07.06.2005 Windows XP sp2, SolidEdge v17 sp14, CadManager v17<P>Dell Precision 370 / 380, 2GB RAM, nVidia GeForce 4400 (512MB RAM)
|
erstellt am: 13. Nov. 2006 13:19 <-- editieren / zitieren --> Unities abgeben:
|
BJ Mitglied PLM System Administrator
Beiträge: 488 Registriert: 20.12.2002
|
erstellt am: 13. Nov. 2006 13:39 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
Hallo, sehr ungewöhnlich, aber egal, jeder hat seinen eigenen Programmierstil. "Clipboard.SetDataObject("E:\SAPWORK\A.PAR")" muss in VB6.0 so aussehen: "Clipboard.SetText("E:\SAPWORK\A.PAR")" Sollte dann funtionieren. Gruß, BJ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ChaosElch Mitglied CAD-Admininstrator
Beiträge: 143 Registriert: 07.06.2005 Windows XP sp2, SolidEdge v17 sp14, CadManager v17<P>Dell Precision 370 / 380, 2GB RAM, nVidia GeForce 4400 (512MB RAM)
|
erstellt am: 13. Nov. 2006 13:44 <-- editieren / zitieren --> Unities abgeben:
|
BJ Mitglied PLM System Administrator
Beiträge: 488 Registriert: 20.12.2002
|
erstellt am: 13. Nov. 2006 14:01 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
Nun, es sieht eben wie VB6 und nicht wie .Net(2005) aus. Hier ein paar Tipps: - ErrorHandler, Goto, Call ist "altes" VB6-Relikt statt ErrorHandler u. Goto nimm' Try/Catch Call-Anweisungen kannst du dir sparen, es fuktioniert auch ohne "Call" Bastle dir eine "SE-Klasse" mit entsprechenden Properties und Methoden, die du für deine Anwendung brauchst. Gruß, BJ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ChaosElch Mitglied CAD-Admininstrator
Beiträge: 143 Registriert: 07.06.2005 Windows XP sp2, SolidEdge v17 sp14, CadManager v17<P>Dell Precision 370 / 380, 2GB RAM, nVidia GeForce 4400 (512MB RAM)
|
erstellt am: 13. Nov. 2006 14:15 <-- editieren / zitieren --> Unities abgeben:
|
modeng Ehrenmitglied V.I.P. h.c.
Beiträge: 7061 Registriert: 10.12.2003
|
erstellt am: 13. Nov. 2006 14:23 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
Moin, [...] ErrorHandler, Goto, Call ist "altes" VB6-Relikt [...] dann ist es nicht 'alt' sondern eben VB6-Coding :-) modeng ------------------ For every problem there is one solution which is simple, neat, and wrong Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
BJ Mitglied PLM System Administrator
Beiträge: 488 Registriert: 20.12.2002
|
erstellt am: 13. Nov. 2006 14:36 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
|
ChaosElch Mitglied CAD-Admininstrator
Beiträge: 143 Registriert: 07.06.2005 Windows XP sp2, SolidEdge v17 sp14, CadManager v17<P>Dell Precision 370 / 380, 2GB RAM, nVidia GeForce 4400 (512MB RAM)
|
erstellt am: 15. Nov. 2006 15:17 <-- editieren / zitieren --> Unities abgeben:
|
modeng Ehrenmitglied V.I.P. h.c.
Beiträge: 7061 Registriert: 10.12.2003
|
erstellt am: 15. Nov. 2006 16:33 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
... und fuer so etwas braucht's mit .NET 500KB -- ich glaub mich tritt ein Pferd und die Source fehlt ... ... Copy & Paste oder Drag & Drop ist einfacher modeng ------------------ For every problem there is one solution which is simple, neat, and wrong [Diese Nachricht wurde von modeng am 15. Nov. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
BJ Mitglied PLM System Administrator
Beiträge: 488 Registriert: 20.12.2002
|
erstellt am: 15. Nov. 2006 17:14 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
|
modeng Ehrenmitglied V.I.P. h.c.
Beiträge: 7061 Registriert: 10.12.2003
|
erstellt am: 15. Nov. 2006 17:31 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
@BJ, kann ich also alles andere wegwerfen? Wohl kaum also muss das mit gezaehlt werden -- und das muss jedes pgm mitschleppen. Ich kann mir meine Platten auch selbst zumuellen. modeng ------------------ For every problem there is one solution which is simple, neat, and wrong Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
ChaosElch Mitglied CAD-Admininstrator
Beiträge: 143 Registriert: 07.06.2005 Windows XP sp2, SolidEdge v17 sp14, CadManager v17<P>Dell Precision 370 / 380, 2GB RAM, nVidia GeForce 4400 (512MB RAM)
|
erstellt am: 16. Nov. 2006 08:05 <-- editieren / zitieren --> Unities abgeben:
Na danke fuer die Kommentare für mein hart erkämpftes Projekt... ...das nächste behalt ich dann wohl lieber für mich, oder? modeng: Ok, Copy&Paste ist einfacher. Wie machst Du Copy&Paste von SAP nach SolidEdge? Wenns was besseres gibt, sags mir. gruß, ChaosElch ------------------ Gruß, ChaosElch __________________________________________ http://www.linck-hvt.com Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
modeng Ehrenmitglied V.I.P. h.c.
Beiträge: 7061 Registriert: 10.12.2003
|
erstellt am: 16. Nov. 2006 08:53 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
Moin, wenn du das File schon auf der Platte hast .... Die APABs sind in einer Sprache aehnlich REXX aufgebaut -- ist nur sooolange her das ich das mal gemacht habe man kann jdoch auf Windows-Funktionen zugreifen. modeng ------------------ For every problem there is one solution which is simple, neat, and wrong Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
VBSpawn Mitglied Programmierer
Beiträge: 514 Registriert: 23.08.2005 Sorgfältige Planung ersetzt niemals pures Glück.<P>S.W.X 2005/2006/2007 S.E 14-17 A.I.P 9-11 Win.XP + SP2
|
erstellt am: 16. Nov. 2006 09:21 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
Hi zusammen, zum Thema Clipboard hab ich auch noch was gefunden... sogar als batch file ;o) --> wenn nun dieser Batch noch im KontextMenue des WindowsExplorers eingebunden wird und als Parameter den Dateinamen erhält müsste man doch eigentlich nur das SE einfügen noch einbauen ... Code:
@echo off if {%1}=={} @echo Syntax: Parameter&goto :EOF if exist "%TEMP%\InClipboard.vbs" goto doit@echo Dim objArgs>"%TEMP%\InClipboard.vbs" @echo Set objArgs = Wscript.Arguments>>"%TEMP%\InClipboard.vbs" @echo Content = objArgs(0)>>"%TEMP%\InClipboard.vbs" @echo Set objIE = CreateObject("InternetExplorer.Application")>>"%TEMP%\InClipboard.vbs" @echo objIE.Navigate("about:blank")>>"%TEMP%\InClipboard.vbs" @echo objIE.document.parentwindow.clipboardData.SetData "text", Content>>"%TEMP%\InClipboard.vbs" @echo objIE.Quit>>"%TEMP%\InClipboard.vbs" :doit cscript //nologo "%TEMP%\InClipboard.vbs" %1
Gruß Micha
------------------ Stell dir vor, es geht, und keiner kriegts hin. Zitat: Interpunktion und Orthographie des Postings sind frei erfunden. Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
BJ Mitglied PLM System Administrator
Beiträge: 488 Registriert: 20.12.2002
|
erstellt am: 16. Nov. 2006 09:35 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
@modeng: .NET hat die Philosophie, das sämtliche COM-Verweise in den Programmordner kopiert, und aus diesem auch verwendet werden. Sollte sich eine gleichlautenden dll im Systemverzeichnis ändern, hat es den Vorteil, dass eventuelle Probleme vermieden werden. Das ist zwar eine Möglichkeit, muss aber zwingenderweise NICHT so gemacht werden! Man muss aber vorher dem Programm mitteilen, woher es die Verweise ziehen soll (für SE müssen dann die Verweise im GAC liegen). Dann funktioniert es wie gehabt in VB6, und dann reicht die EXE alleine. Gruß, BJ Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
modeng Ehrenmitglied V.I.P. h.c.
Beiträge: 7061 Registriert: 10.12.2003
|
erstellt am: 16. Nov. 2006 10:05 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
@BJ, schoen und nett, doch hat man Aufrufe von anderen Programmen/Funktionen schon vor Jahren besser und einfacher gemacht ohne einen solchen overhead wie .NET zu kreiren der obendrein noch unter Kompatibilitaetsproblemen leidet. Um VBspawn aufzugreifen -- quick & dirty siehe Anhang modeng ------------------ For every problem there is one solution which is simple, neat, and wrong
[Diese Nachricht wurde von modeng am 20. Nov. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
VBSpawn Mitglied Programmierer
Beiträge: 514 Registriert: 23.08.2005 Sorgfältige Planung ersetzt niemals pures Glück.<P>S.W.X 2005/2006/2007 S.E 14-17 A.I.P 9-11 Win.XP + SP2
|
erstellt am: 16. Nov. 2006 11:48 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
Zitat: Original erstellt von modeng: Um VBspawn aufzugreifen -- quick & dirty siehe Anhang
lol, auf sowas reagiere ich doch garnicht <fg> viele Wege führen zum Paste.... Ich finde trotzdem das du nicht ganz unrecht wenn es um die zusätzlichen Dateien aus .Net geht hat etwas von Kanone auf Spatzen.... Ist mir neulich auch passiert ( http://ww3.cad.de/foren/ubb/Forum2/HTML/011538.shtml#000011 ) Gruß Micha ------------------ Stell dir vor, es geht, und keiner kriegts hin. Zitat: Interpunktion und Orthographie des Postings sind frei erfunden. Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
modeng Ehrenmitglied V.I.P. h.c.
Beiträge: 7061 Registriert: 10.12.2003
|
erstellt am: 16. Nov. 2006 12:01 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
Moin, [...] lol, auf sowas reagiere ich doch garnicht <fg> [...] da hast Du wohl etwas missverstanden oder ich verstehhe die Bemerkung nicht. Das bezoeg sich auf dieses: [...] wenn nun dieser Batch noch im KontextMenue des WindowsExplorers eingebunden wird [...] was im .zip als Option enthalten ist. Und ein simpler Copy tut's nicht wenn es etwas komfortabel sein soll ... modeng ------------------ For every problem there is one solution which is simple, neat, and wrong [Diese Nachricht wurde von modeng am 16. Nov. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
VBSpawn Mitglied Programmierer
Beiträge: 514 Registriert: 23.08.2005 Sorgfältige Planung ersetzt niemals pures Glück.<P>S.W.X 2005/2006/2007 S.E 14-17 A.I.P 9-11 Win.XP + SP2
|
erstellt am: 16. Nov. 2006 12:19 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
Zitat: Original erstellt von modeng:
da hast Du wohl etwas missverstanden
nicht mein Tag heute... und hab dich falsch verstanden ... hatte das auch direkt ausprobiert, und scheiter leider an der Parameter Übergabe im Dos (IE Aufruf erfolgt ohne "Quotes" damit kann der Batch dann nix Anfangen [wenn Leerzeichen im Pfad sind]) Gruß Micha
------------------ Stell dir vor, es geht, und keiner kriegts hin. Zitat: Interpunktion und Orthographie des Postings sind frei erfunden. Eine Übereinstimmung mit aktuellen oder ehemaligen Regeln wäre rein zufällig und ist nicht beabsichtigt.
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
modeng Ehrenmitglied V.I.P. h.c.
Beiträge: 7061 Registriert: 10.12.2003
|
erstellt am: 16. Nov. 2006 12:34 <-- editieren / zitieren --> Unities abgeben: Nur für ChaosElch
Moin, hmm kann man nicht die Quotes mit \ maskieren? Irgendwo hatte ich mal so ein Script gesehen da musste es in " sein aber einfaches verdoppeln ging nicht. BTW: fuer das eingestellte Programm hab ich keine Verwendung, war nur schnell zusammenghackt weil das Original doch wohl mehr was fuer 'gute Tage' ist ;-) modeng ------------------ For every problem there is one solution which is simple, neat, and wrong [Diese Nachricht wurde von modeng am 16. Nov. 2006 editiert.] Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |