ResisterNEwuser crééer la boîte aux lettres en arrière plan

Forum destiné aux questions sur le développement : Formules, LotusScript, Java ...

ResisterNEwuser crééer la boîte aux lettres en arrière plan

Messagepar nowlan » 15 Oct 2010 à 10:50

Bonjour

J'ai utilisé la classe ResisterNewuser



JE voudrais savoir si la création reg.CreateMailDb = True est lancé en arreière plan car mon problème est le suivant

Le client est dans un contexte international et lors que je créé les utilsateurs qui sont en france ça passe mais lorsqu'on créé un user par exemple en afrique ( là , il met du temps mais vraiment bcp de temps )

or en passant par la création d'un utilisateur via l'admin ça l'air d'être assez rapide

voic le code:

certchemin=docparamlog.CertPath(0)
Set itemdate=docparamlog.getFirstItem("DateFinId")
Set datetimeid=itemdate.Datetimevalue
servadmin=docparamlog.ServPivot(0)
modele=docparamlog.ModeleBase(0)
quotabase=docparamlog.QuotaBase(0)
alertebase=docparamlog.AlerteBase(0)
'--------------------------------------------------------------------------------------

Dim reg As New NotesRegistration
'dt = DateNumber(Year(Today)+1, Month(Today), Day(Today))
dt = Datenumber(Year(datetimeid.dateonly), Month(datetimeid.dateonly), Day(datetimeid.dateonly))
reg.RegistrationServer = servadmin
reg.CreateMailDb = True
reg.CertifierIDFile = certchemin
reg.Expiration = dt
reg.IDType = ID_HIERARCHICAL
reg.MinPasswordLength = 6 ' password strength
reg.IsNorthAmerican = True
reg.Mailtemplatename=modele

reg.MailInternetAddress=doc.AdresseMailUSer(0)
reg.Shortname=doc.ShortNameUser(0)
'reg.RegistrationLog = "log.nsf"
reg.Mailquotasizelimit=Cint(quotabase)
reg.Mailquotawarningthreshold=Cint(alertebase)
reg.UpdateAddressBook = True
reg.SynchInternetPassword=True
reg.StoreIDInAddressBook = True
Call reg.RegisterNewUser(doc.NomUser(0), _ ' last name
"", _ ' file to be created
doc.ServeurUser(0), _ ' mail server
doc.PrenomUser(0), _ ' first name
"", _ ' middle initial
"*********", _ ' certifier password
"", _ ' location field
"", _ ' comment field
doc.CheminBaseUser(0)+".nsf", _ ' mail file
"", _ ' forwarding domain
pwd, _ ' user password
NOTES_DESKTOP_CLIENT,_ 'user type
)


Merci encore
nowlan
Maître-posteur
Maître-posteur
 
Message(s) : 478
Inscrit(e) le : 22 Août 2006 à 11:28

Messagepar Michael DELIQUE » 15 Oct 2010 à 10:52

salut

entoure ton code des balises codes pour le rendre plus lisible

Merci
Cordialement

Michael (SMS-Phobique)
----------------------------
"La théorie, c'est quand on sait tout et que rien ne fonctionne. La pratique, c'est quand tout fonctionne et que personne ne sait pourquoi."
Albert EINSTEIN
Avatar de l’utilisateur
Michael DELIQUE
Administrateur
Administrateur
 
Message(s) : 12183
Inscrit(e) le : 16 Déc 2004 à 10:36
Localisation : Paris/Cergy

Messagepar billbock » 15 Oct 2010 à 15:26

pas moyen de le mettre en arriere plan
Avatar de l’utilisateur
billbock
Modérateur
Modérateur
 
Message(s) : 310
Inscrit(e) le : 15 Fév 2007 à 13:58
Localisation : paris


Retour vers Développement

cron