Skip to Content

Register Login

Industry Online Support

Technical Forum

Navigation

Project path when using VBS

Created by: GrahamS at: 4/24/2007 10:29 AM (4 Replies)

Rating (2)

Thanks 1

5 Entries

4/24/2007 10:29 AM	Rate (0)
GrahamS Posts: 17 Rating: (0)	Hi All, Instead of hard coding the project path, for example: objExcelApp.Workbooks.Open "C:\Program Files\Siemens\Step7\S7Proj\Recipe\wincproj\Recipe\Recipes\ExcelExample.xls" Is there a way to code the project path, so that if the project is moved you dont have to manually change progect path?
GrahamS Posts: 17 Rating: (0)
Suggestion To thank Quote Answer

4/24/2007 11:06 AM	Rate (0)
Ikkezelf Posts: 1084 Rating: (72)	Hi, In VBscript you can ask for the "AccessPath" property of ie a picture/object etc. This will return the complete accesspath to the picture, maybe you can do something with that? Or you can use something like the code below. (I have created a folder "Documents" with the wincc project folder). [code]dim fso, f, s Set fso = CreateObject("Scripting.FileSystemObject") Set f = fso.GetFile("An_Existing_Mimic.PDL") s = UCase(f.Path) s = Ucase(f.ParentFolder.ParentFolder) & "\Documents\excelFile.xls" [/code] Now you have a refrence to the excelfile within the variable "s". with regards, Ikkezelf
Ikkezelf Posts: 1084 Rating: (72)
Suggestion To thank Quote Answer

4/25/2007 4:31 PM	Rate (2)
pinky Experienced Member Joined: 10/17/2006 Last visit: 9/19/2023 Posts: 97 Rating: (17)	What about: dim strFile strFile = HMIRuntime.ActiveProject.Path & "\Documents\myFile.xls"

Suggestion To thank Quote Answer
This contribution was helpful to 1 thankful Users AutoGen_372853

4/26/2007 9:44 AM	Rate (0)
Ikkezelf Posts: 1084 Rating: (72)	Even better
Ikkezelf Posts: 1084 Rating: (72)
Suggestion To thank Quote Answer

11/1/2018 3:41 AM	Rate (0)
AutoGen_372853 Experienced Member Joined: 9/23/2013 Last visit: 5/8/2023 Posts: 1 Rating: (0)	Thank.

Suggestion To thank Quote Answer

|

Share this page:

Share this page on...

Follow us on