| | |  | Gut zu wissen: Hilfreiche Tipps und Tricks aus der Praxis prägnant, und auf den Punkt gebracht für Autodesk Produkte |
|
Autor
|
Thema: Datum (794 mal gelesen)
|
inventomas
Mitglied
Techniker
   Beiträge: 94
Registriert: 25.12.2004 AIS10 SP1, ACADM2006, P4 3,4 GHz, 2 GB RAM, 160 GB HD, Win XP Pro SP2
|
erstellt am: 20. Apr. 2005 08:58  <-- editieren / zitieren -->   Unities abgeben:          
Hallo Forum, ich habe mir eine eigenes Programm für die iProperties gemacht.
Dort schreibe ich auch das Vorhandene Feld für das Erstellerdatum um. Wenn jetzt jemand in diesem Feld etwas anderes als das Datum eingibt bekommt man einen Laufzeitfehler. Ich will wenn jemand so etwas eingibt, dass er eine Fehlermeldung erhält.
Wie kann man so etwas machen? Hätte es mal so probiert, funktioniert aber nicht: If tx_date.Value = Format(tx_date.Value, "DD.MM:YYYY") Then
oDoc.PropertySets("{32853F0F-3444-11d1-9E93-0060B03C1CA6}").Item("Creation Time").Value = tx_date.Value
Else
E = MsgBox(Msg, vbCritical, "Warnung")
End If Vielen Dank
Thomas
Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
Fan-ME10
Mitglied
DV-Adminstrator, Konstrukteur
Beiträge: 543
Registriert: 21.08.2001 Erare humanum est
|
erstellt am: 20. Apr. 2005 10:10 <-- editieren / zitieren --> Unities abgeben: Nur für inventomas 
Hallo inventomas, So: On error goto Fehler oDoc.PropertySets("{32853F0F-3444-11d1-9E93-0060B03C1CA6}").Item("Creation Time").Value = tx_date.Value Fehler:
MsgBox(Msg, vbCritical, "Warnung")
End (oder: Exit Sub) ------------------
Gruß Wilfried  Eine Antwort auf diesen Beitrag verfassen (mit Zitat/Zitat des Beitrags) IP |
inventomas
Mitglied
Techniker
Beiträge: 94
Registriert: 25.12.2004 AIS10 SP1, ACADM2006, P4 3,4 GHz, 2 GB RAM, 160 GB HD, Win XP Pro SP2
|
erstellt am: 20. Apr. 2005 10:14 <-- editieren / zitieren --> Unities abgeben:
|
| Anzeige.:
Anzeige: (Infos zum Werbeplatz >>)
 |
Foren auf CAD.de (alle Foren)
| 
