Bonjour,
Je travaille sur un sujet qui consiste =E0 am=E9liorer le=20
WorkFlow de mon service.
Pour mon prototype l'id=E9e est la suivante:
1) Une page "identification.asp" qui demande le UID (qui=20
correspond =E0 Alias dans le carnet d'adresse de=20
Outlook2002) de l'utilisateur. Un script doit aller=20
chercher dans le carnet d'adresse tous les chmaps qui=20
correspond =E0 ce UID.
Exemple:=20
Si je tape UID27925, j'aimerais r=E9cuperer mon nom, mon=20
pr=E9nom, le num=E9ro de ma section (qui correspond =E0 Outlook=20
Custom Attribute 1, HEX ID:&H802D001E)....etc
2) Ces donn=E9es r=E9cup=E9r=E9es seront affich=E9es dans un=20
formulaire de mon "identification.asp"
3)le reste je ne d=E9taille pas
Le probl=E8me pour moi est donc:
(i) Je ne sais pas comment dois je ecrire ce script, j'ai=20
tent=E9 la chose suivante:
<script language=3D"VBScript">
'=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D
'Demander UID du demandeur
'=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D
'D=E9clarer des variables
DIM Message, Title, Default, UID
'Le message affich=E9 dans la bo=EEte
Message=3D"Veuillez entrer votre UID"
'Le title de la bo=EEte
Title=3D"Etape 1 : Votre identification UID"
'La valeur par d=E9fault dans le champs de la bo=EEte
Default=3D"UID"
'La bo=EEte messagerie qui s'affiche (La bo=EEte de demande)
UID=3DInputBox(Message, Title, Default)
'le UID de l'utilisateur est stock=E9 en tant que variable=20
UID
'=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D
'=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D
'Script pour manipuler Outlook..
'=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=3D=
=3D=3D=3D=3D=3D=3D=3D=3D=3D
'D=E9clarer des variables
DIM Outlook, MyNameSpace, ThisItem, MyInspector,=20
objCDOSession, update, NomReel
'Ouverture automatique d'Outlook
Set Outlook=3DCreateObject("Outlook.Application")
'Ouverture de l'objet cherch=E9
Sub Item_Open()
On Error Resume Next
Set MyNameSpace =3D Application.GetNameSpace("MAPI")
Set MyInspector =3D Item.GetInspector
Set ThisItem =3D MyInspector.CurrentItem
For Each cbar in Item.GetInspector.CommandBars
cbar.enabled=3DFalse
Next
End Sub =20
'V=E9rification de connexion
.
.
.(je n'ai pas continu=E9..)
</script>
Mais ce script ne permet pas d'ouvrir Outlook2002..=20
Message d'erreur affich=E9
Merci d'avance (je dois rendre le prototype avant Mercredi=20
prochain....)
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Louis" a écrit dans le message de news:161101c3827a$9bcf2210$ Bonjour, Je travaille sur un sujet qui consiste à améliorer le WorkFlow de mon service. Pour mon prototype l'idée est la suivante: 1) Une page "identification.asp" qui demande le UID (qui correspond à Alias dans le carnet d'adresse de Outlook2002) de l'utilisateur. Un script doit aller chercher dans le carnet d'adresse tous les chmaps qui correspond à ce UID. Exemple: Si je tape UID27925, j'aimerais récuperer mon nom, mon prénom, le numéro de ma section (qui correspond à Outlook Custom Attribute 1, HEX ID:&H802D001E)....etc 2) Ces données récupérées seront affichées dans un formulaire de mon "identification.asp" 3)le reste je ne détaille pas
Le problème pour moi est donc: (i) Je ne sais pas comment dois je ecrire ce script, j'ai tenté la chose suivante: <script language="VBScript"> '========================================================= 'Demander UID du demandeur '========================================================= 'Déclarer des variables DIM Message, Title, Default, UID
'Le message affiché dans la boîte Message="Veuillez entrer votre UID"
'Le title de la boîte Title="Etape 1 : Votre identification UID"
'La valeur par défault dans le champs de la boîte Default="UID"
'La boîte messagerie qui s'affiche (La boîte de demande) UID=InputBox(Message, Title, Default)
'le UID de l'utilisateur est stocké en tant que variable UID '========================================================= '========================================================= 'Script pour manipuler Outlook.. '========================================================= 'Déclarer des variables DIM Outlook, MyNameSpace, ThisItem, MyInspector, objCDOSession, update, NomReel
'Ouverture automatique d'Outlook Set Outlook=CreateObject("Outlook.Application")
'Ouverture de l'objet cherché Sub Item_Open() On Error Resume Next Set MyNameSpace = Application.GetNameSpace("MAPI") Set MyInspector = Item.GetInspector Set ThisItem = MyInspector.CurrentItem For Each cbar in Item.GetInspector.CommandBars cbar.enabledúlse Next End Sub
'Vérification de connexion . . .(je n'ai pas continué..) </script> Mais ce script ne permet pas d'ouvrir Outlook2002.. Message d'erreur affiché
Merci d'avance (je dois rendre le prototype avant Mercredi prochain....)
Bonjour.
es-tu sûr que access est le bon forum ?
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"Louis" <louis.wong@siemens.com> a écrit dans le message de
news:161101c3827a$9bcf2210$a301280a@phx.gbl...
Bonjour,
Je travaille sur un sujet qui consiste à améliorer le
WorkFlow de mon service.
Pour mon prototype l'idée est la suivante:
1) Une page "identification.asp" qui demande le UID (qui
correspond à Alias dans le carnet d'adresse de
Outlook2002) de l'utilisateur. Un script doit aller
chercher dans le carnet d'adresse tous les chmaps qui
correspond à ce UID.
Exemple:
Si je tape UID27925, j'aimerais récuperer mon nom, mon
prénom, le numéro de ma section (qui correspond à Outlook
Custom Attribute 1, HEX ID:&H802D001E)....etc
2) Ces données récupérées seront affichées dans un
formulaire de mon "identification.asp"
3)le reste je ne détaille pas
Le problème pour moi est donc:
(i) Je ne sais pas comment dois je ecrire ce script, j'ai
tenté la chose suivante:
<script language="VBScript">
'========================================================= 'Demander UID du demandeur
'========================================================= 'Déclarer des variables
DIM Message, Title, Default, UID
'Le message affiché dans la boîte
Message="Veuillez entrer votre UID"
'Le title de la boîte
Title="Etape 1 : Votre identification UID"
'La valeur par défault dans le champs de la boîte
Default="UID"
'La boîte messagerie qui s'affiche (La boîte de demande)
UID=InputBox(Message, Title, Default)
'le UID de l'utilisateur est stocké en tant que variable
UID
'=========================================================
'========================================================= 'Script pour manipuler Outlook..
'========================================================= 'Déclarer des variables
DIM Outlook, MyNameSpace, ThisItem, MyInspector,
objCDOSession, update, NomReel
'Ouverture automatique d'Outlook
Set Outlook=CreateObject("Outlook.Application")
'Ouverture de l'objet cherché
Sub Item_Open()
On Error Resume Next
Set MyNameSpace = Application.GetNameSpace("MAPI")
Set MyInspector = Item.GetInspector
Set ThisItem = MyInspector.CurrentItem
For Each cbar in Item.GetInspector.CommandBars
cbar.enabledúlse
Next
End Sub
'Vérification de connexion
.
.
.(je n'ai pas continué..)
</script>
Mais ce script ne permet pas d'ouvrir Outlook2002..
Message d'erreur affiché
Merci d'avance (je dois rendre le prototype avant Mercredi
prochain....)
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Louis" a écrit dans le message de news:161101c3827a$9bcf2210$ Bonjour, Je travaille sur un sujet qui consiste à améliorer le WorkFlow de mon service. Pour mon prototype l'idée est la suivante: 1) Une page "identification.asp" qui demande le UID (qui correspond à Alias dans le carnet d'adresse de Outlook2002) de l'utilisateur. Un script doit aller chercher dans le carnet d'adresse tous les chmaps qui correspond à ce UID. Exemple: Si je tape UID27925, j'aimerais récuperer mon nom, mon prénom, le numéro de ma section (qui correspond à Outlook Custom Attribute 1, HEX ID:&H802D001E)....etc 2) Ces données récupérées seront affichées dans un formulaire de mon "identification.asp" 3)le reste je ne détaille pas
Le problème pour moi est donc: (i) Je ne sais pas comment dois je ecrire ce script, j'ai tenté la chose suivante: <script language="VBScript"> '========================================================= 'Demander UID du demandeur '========================================================= 'Déclarer des variables DIM Message, Title, Default, UID
'Le message affiché dans la boîte Message="Veuillez entrer votre UID"
'Le title de la boîte Title="Etape 1 : Votre identification UID"
'La valeur par défault dans le champs de la boîte Default="UID"
'La boîte messagerie qui s'affiche (La boîte de demande) UID=InputBox(Message, Title, Default)
'le UID de l'utilisateur est stocké en tant que variable UID '========================================================= '========================================================= 'Script pour manipuler Outlook.. '========================================================= 'Déclarer des variables DIM Outlook, MyNameSpace, ThisItem, MyInspector, objCDOSession, update, NomReel
'Ouverture automatique d'Outlook Set Outlook=CreateObject("Outlook.Application")
'Ouverture de l'objet cherché Sub Item_Open() On Error Resume Next Set MyNameSpace = Application.GetNameSpace("MAPI") Set MyInspector = Item.GetInspector Set ThisItem = MyInspector.CurrentItem For Each cbar in Item.GetInspector.CommandBars cbar.enabledúlse Next End Sub
'Vérification de connexion . . .(je n'ai pas continué..) </script> Mais ce script ne permet pas d'ouvrir Outlook2002.. Message d'erreur affiché
Merci d'avance (je dois rendre le prototype avant Mercredi prochain....)
Louis
Peux tu me conseiller pour un autre forum sinon?
-----Message d'origine----- Bonjour.
es-tu sûr que access est le bon forum ?
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Louis" a écrit dans le message de
news:161101c3827a$9bcf2210$ Bonjour, Je travaille sur un sujet qui consiste à améliorer le WorkFlow de mon service. Pour mon prototype l'idée est la suivante: 1) Une page "identification.asp" qui demande le UID (qui correspond à Alias dans le carnet d'adresse de Outlook2002) de l'utilisateur. Un script doit aller chercher dans le carnet d'adresse tous les chmaps qui correspond à ce UID. Exemple: Si je tape UID27925, j'aimerais récuperer mon nom, mon prénom, le numéro de ma section (qui correspond à Outlook Custom Attribute 1, HEX ID:&H802D001E)....etc 2) Ces données récupérées seront affichées dans un formulaire de mon "identification.asp" 3)le reste je ne détaille pas
Le problème pour moi est donc: (i) Je ne sais pas comment dois je ecrire ce script, j'ai tenté la chose suivante: <script language="VBScript"> '======================== ========================= ======== =
'Demander UID du demandeur '======================== ========================= ======== =
'Déclarer des variables DIM Message, Title, Default, UID
'Le message affiché dans la boîte Message="Veuillez entrer votre UID"
'Le title de la boîte Title="Etape 1 : Votre identification UID"
'La valeur par défault dans le champs de la boîte Default="UID"
'La boîte messagerie qui s'affiche (La boîte de demande) UID=InputBox(Message, Title, Default)
'le UID de l'utilisateur est stocké en tant que variable UID '======================== ========================= ======== =
'Script pour manipuler Outlook.. '======================== ========================= ======== =
'Déclarer des variables DIM Outlook, MyNameSpace, ThisItem, MyInspector, objCDOSession, update, NomReel
'Ouverture automatique d'Outlook Set Outlook=CreateObject("Outlook.Application")
'Ouverture de l'objet cherché Sub Item_Open() On Error Resume Next Set MyNameSpace = Application.GetNameSpace("MAPI") Set MyInspector = Item.GetInspector Set ThisItem = MyInspector.CurrentItem For Each cbar in Item.GetInspector.CommandBars cbar.enabledúlse Next End Sub
'Vérification de connexion .. .. ..(je n'ai pas continué..) </script> Mais ce script ne permet pas d'ouvrir Outlook2002.. Message d'erreur affiché
Merci d'avance (je dois rendre le prototype avant Mercredi prochain....)
.
Peux tu me conseiller pour un autre forum sinon?
-----Message d'origine-----
Bonjour.
es-tu sûr que access est le bon forum ?
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"Louis" <louis.wong@siemens.com> a écrit dans le message
de
news:161101c3827a$9bcf2210$a301280a@phx.gbl...
Bonjour,
Je travaille sur un sujet qui consiste à améliorer le
WorkFlow de mon service.
Pour mon prototype l'idée est la suivante:
1) Une page "identification.asp" qui demande le UID (qui
correspond à Alias dans le carnet d'adresse de
Outlook2002) de l'utilisateur. Un script doit aller
chercher dans le carnet d'adresse tous les chmaps qui
correspond à ce UID.
Exemple:
Si je tape UID27925, j'aimerais récuperer mon nom, mon
prénom, le numéro de ma section (qui correspond à Outlook
Custom Attribute 1, HEX ID:&H802D001E)....etc
2) Ces données récupérées seront affichées dans un
formulaire de mon "identification.asp"
3)le reste je ne détaille pas
Le problème pour moi est donc:
(i) Je ne sais pas comment dois je ecrire ce script, j'ai
tenté la chose suivante:
<script language="VBScript">
'======================== ========================= ========
=
'Demander UID du demandeur
'======================== ========================= ========
=
'Déclarer des variables
DIM Message, Title, Default, UID
'Le message affiché dans la boîte
Message="Veuillez entrer votre UID"
'Le title de la boîte
Title="Etape 1 : Votre identification UID"
'La valeur par défault dans le champs de la boîte
Default="UID"
'La boîte messagerie qui s'affiche (La boîte de demande)
UID=InputBox(Message, Title, Default)
'le UID de l'utilisateur est stocké en tant que variable
UID
'======================== ========================= ========
=
'Script pour manipuler Outlook..
'======================== ========================= ========
=
'Déclarer des variables
DIM Outlook, MyNameSpace, ThisItem, MyInspector,
objCDOSession, update, NomReel
'Ouverture automatique d'Outlook
Set Outlook=CreateObject("Outlook.Application")
'Ouverture de l'objet cherché
Sub Item_Open()
On Error Resume Next
Set MyNameSpace = Application.GetNameSpace("MAPI")
Set MyInspector = Item.GetInspector
Set ThisItem = MyInspector.CurrentItem
For Each cbar in Item.GetInspector.CommandBars
cbar.enabled=False
Next
End Sub
'Vérification de connexion
..
..
..(je n'ai pas continué..)
</script>
Mais ce script ne permet pas d'ouvrir Outlook2002..
Message d'erreur affiché
Merci d'avance (je dois rendre le prototype avant Mercredi
prochain....)
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Louis" a écrit dans le message de
news:161101c3827a$9bcf2210$ Bonjour, Je travaille sur un sujet qui consiste à améliorer le WorkFlow de mon service. Pour mon prototype l'idée est la suivante: 1) Une page "identification.asp" qui demande le UID (qui correspond à Alias dans le carnet d'adresse de Outlook2002) de l'utilisateur. Un script doit aller chercher dans le carnet d'adresse tous les chmaps qui correspond à ce UID. Exemple: Si je tape UID27925, j'aimerais récuperer mon nom, mon prénom, le numéro de ma section (qui correspond à Outlook Custom Attribute 1, HEX ID:&H802D001E)....etc 2) Ces données récupérées seront affichées dans un formulaire de mon "identification.asp" 3)le reste je ne détaille pas
Le problème pour moi est donc: (i) Je ne sais pas comment dois je ecrire ce script, j'ai tenté la chose suivante: <script language="VBScript"> '======================== ========================= ======== =
'Demander UID du demandeur '======================== ========================= ======== =
'Déclarer des variables DIM Message, Title, Default, UID
'Le message affiché dans la boîte Message="Veuillez entrer votre UID"
'Le title de la boîte Title="Etape 1 : Votre identification UID"
'La valeur par défault dans le champs de la boîte Default="UID"
'La boîte messagerie qui s'affiche (La boîte de demande) UID=InputBox(Message, Title, Default)
'le UID de l'utilisateur est stocké en tant que variable UID '======================== ========================= ======== =
'Script pour manipuler Outlook.. '======================== ========================= ======== =
'Déclarer des variables DIM Outlook, MyNameSpace, ThisItem, MyInspector, objCDOSession, update, NomReel
'Ouverture automatique d'Outlook Set Outlook=CreateObject("Outlook.Application")
'Ouverture de l'objet cherché Sub Item_Open() On Error Resume Next Set MyNameSpace = Application.GetNameSpace("MAPI") Set MyInspector = Item.GetInspector Set ThisItem = MyInspector.CurrentItem For Each cbar in Item.GetInspector.CommandBars cbar.enabledúlse Next End Sub
'Vérification de connexion .. .. ..(je n'ai pas continué..) </script> Mais ce script ne permet pas d'ouvrir Outlook2002.. Message d'erreur affiché
Merci d'avance (je dois rendre le prototype avant Mercredi prochain....)
.
Raymond
Tu peux déjà essayer: microsoft.public.fr.outlook microsoft.public.fr.vstudio.asp microsoft.public.fr.scripting
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Louis" a écrit dans le message de news:17f401c38282$8da954f0$ Peux tu me conseiller pour un autre forum sinon?
Tu peux déjà essayer:
microsoft.public.fr.outlook
microsoft.public.fr.vstudio.asp
microsoft.public.fr.scripting
--
@+
Raymond Access MVP.
http://access.seneque.free.fr/
http://access2003.free.fr/
http://users.skynet.be/mpfa/charte.htm pour une meilleure
efficacité de tes interventions sur MPFA.
"Louis" <louis.wong@siemens.com> a écrit dans le message de
news:17f401c38282$8da954f0$a301280a@phx.gbl...
Peux tu me conseiller pour un autre forum sinon?
Tu peux déjà essayer: microsoft.public.fr.outlook microsoft.public.fr.vstudio.asp microsoft.public.fr.scripting
-- @+ Raymond Access MVP. http://access.seneque.free.fr/ http://access2003.free.fr/ http://users.skynet.be/mpfa/charte.htm pour une meilleure efficacité de tes interventions sur MPFA.
"Louis" a écrit dans le message de news:17f401c38282$8da954f0$ Peux tu me conseiller pour un autre forum sinon?
