SiePortal

The integrated platform for your product selection, buying and support workflow - bringing together Industry Mall and Online Support.

Products & Services
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
Support Support
{{(apiData.Support | filter:{'rank':1}:true)[0].title}} Support
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
MySiePortal MySiePortal
{{(apiData.MySiePortal | filter:{'rank':1}:true)[0].title}} MySiePortal
- Menu temporary not available
- Menue temporary not available
- {{item.title}}
Cart ({{apiData.CartCount}})

Navigation

File Browser

2/16/2007 9:03 PM	Rate (0)
sepp99 Posts: 18 Rating: (0)	I am looking for a file browser. With this browser i want to select a file in a specified folder. is this possible with winCC flexible? Is there some one who know a standart active X wich i can include in my project
sepp99 Posts: 18 Rating: (0)
Suggestion To thank Quote Answer

2/19/2007 1:40 PM	Rate (0)
The Brain Posts: 1611 Rating: (121)	Hi, if you use Sm@rt Service you can call the Internetsiteof the panel. On this site, youhave access to the Files on thepanels. Look the follwoings manual, chapter 4 => http://support.automation.siemens.com/WW/view/de/18657078/0/en greetings,
The Brain Posts: 1611 Rating: (121)
Suggestion To thank Quote Answer

2/19/2007 2:32 PM	Rate (0)
sepp99 Posts: 18 Rating: (0)	This is not that what i am loocking for. I like to browse a file to move the selected filename into a internal var(XYZ)Typ String for using it in a script
sepp99 Posts: 18 Rating: (0)
Suggestion To thank Quote Answer

2/24/2007 11:52 PM	Rate (0)
sepp99 Posts: 18 Rating: (0)	hello, in the german forum i found under MsgBox a half solution for my problem. i extended this script, the result is follow script Deklaration von Skript-Variablen/ declaration of skript variable Dim fso, o, d, da, s,Verzeichniss Verzeichniss = "C:\" 'folder for file indexing Set fso = CreateObject("Scripting.FileSystemObject") Set o = fso.GetFolder(Verzeichniss) Set da= o.Files For Each d In da s = s & d.Name s = s & vbCr 'File index Next 'following sequence is Mr. nemos idea Dim WSHShell, Text, Duration_in_s, Titel, Buttons, ReturnValue Text = s'"This text is displayed." 'Ausgabetext in der Box; displayed text in the box Duration_in_s = 10 'Anzeigedauer der Box in Sekunden; display duration in seconds Titel = "INDEX" 'Titel des Dialogfensters; Title of the dialogbox Buttons = TASTEN 'Die einzelnen Werte für Symbole und Buttons müssen addiert werden ' 51 = Ausrufezeichen (Symbol) + Ja + Nein + Abbrechen (Buttons) 'Aufruf der PopUp-Methode als Funktion, damit der
sepp99 Posts: 18 Rating: (0)
Suggestion To thank Quote Answer

Share this page:

Share this page on...