Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations cowski on being selected by the Eng-Tips community for having the most helpful posts in the forums last week. Way to Go!

Date format in drawing frame 1

Status
Not open for further replies.

gorses

Automotive
Joined
Jul 30, 2003
Messages
10
Location
GB
I have modified the default CATScript to my requirements but I can't get the date to a dd/mm/yy format. Please help!
Can anyone suggest a good user guide for Catia VB?


Thanks

AndyRich
 
Hi there.

The only written guide to CATScript and CATIA VB that I know of is a german book:( Had to buy a dictionary to :) )

CATIA V5 - Effizientes Konstruieren mit Makros.
by Dieter R. Ziethen (Author)

It only deals with Parts (Part/Surface/Sketcher workbenches) and not drawings or assemblies. Its quite useful for building parts though.It was written for R10 I believe.

The question you post about date format is more general for VB/VBA and there are several books on these topics. Personally I got started with "VBA for dummies", which is OK to get going, and then I bought some books from Oreilly: "VB/VBA in a nutshell", "VBScript in a nutshell" and finally "Visual Basic Controls in a nutshell".
(Can't guarantee the title-names are 100% correct)

These are very good books for finding what you need quickly.Also if you have any office applications installed, for example excel,the helpfiles for VBA contains lots of good information on general use of VBA with code examples.

-Bjod
 
Thanks bjod,

I had a hunt around the web last night and found plenty of sites with VBScript help - being a good one - also a sister site of this forum.

BTW the script i ended up with is -

' Setting for UK date formating

Dim strUKDate, MYdd, MYmm, MYyy
MYdd = DatePart("d", date())
MYmm = DatePart("m", date())
MYyy = DatePart("yyyy", date())
if len(MYdd) < 2 then
MYdd = "0" & MYdd
end if
if len(MYmm) < 2 then
MYmm = "0" & MYmm
end if
strUKDate = (MYdd & "/" & MYmm & "/" & right(MYyy,2))

' End of UK date setting
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top