Page 1 sur 1

base de documents accessible en Web

MessagePublié: 04 Mai 2012 à 13:19
par guyader
bonjour,

j'ai créé une base avec un formulaire de saisie pour envoyé des questions à une adresse mail précise...

cela fonctionne sous lotus mais quand jy accède en Web il n'y a pas de mail envoyé à l'adresse mail désignée ...

y-a-t-il une formule spéciale pour le Web?
des droits spéciaux sur la base pour cela ?

merci

Re: base de documents accessible en Web

MessagePublié: 04 Mai 2012 à 13:53
par Michael DELIQUE
qu'est ce que tu as comme message quand tu essays de te connecter a l abase ?

Re: base de documents accessible en Web

MessagePublié: 04 Mai 2012 à 14:00
par guyader
je me connecte à la base correctement, je remplie mes champs

mais je n'ai pas de mail envoyé à l'adresse voulue quand je click sur le bouton "envoyer"

Re: base de documents accessible en Web

MessagePublié: 04 Mai 2012 à 17:40
par roubech
tu pourrais peut-être nous indiquer le code associé au bouton "Envoyer"
qu'est-ce qui se passe quand tu cliques desssu, tu as un message particulier ?

Re: base de documents accessible en Web

MessagePublié: 07 Mai 2012 à 07:29
par guyader
code :

Dim mailDoc As NotesDocument
Set mailDoc= curdb.Createdocument()
maildoc.saveoptions="0"
maildoc.form="Memo"
Dim iconmail As NotesItem
Set iconmail = New NotesItem(maildoc, "_ViewIcon",163)
iconmail.IsSummary = True
maildoc.Subject=Typedemande
'mailDoc.from=doc.Auteur(0)
mailDoc.from=doc.prenom(0) & " " & doc.nom(0)
Dim sendto As NotesItem
'Set sendto=dest.CopyItemToDocument( mailDoc, "SendTo" )
'Set sendto=doc.email(0).CopyItemToDocument( mailDoc, "SendTo" )
Call maildoc.ReplaceItemValue( "SendTo", "l.menand@ch-saintnazaire.fr" )
Dim cont As NotesRichTextItem
Set cont = mailDoc.Createrichtextitem("Body")
Call cont.Appendtext("Bonjour")
Call cont.addNewLine(2)
Call cont.Appendtext("Une nouvelle " + typeDemande + " est arrivée :")
Call cont.addNewLine(2)
Call cont.Appendtext("Service ....... :" + doc.service(0) )
Call cont.addNewLine(2)
Call cont.Appendtext("QUESTION :")
Call cont.addNewLine(2)
Call cont.Appendtext(doc.comments_maladie(0) )
'Call cont.appenddoclink(doc, "Accéder à la demande")
Call maildoc.send(False)

Re: base de documents accessible en Web

MessagePublié: 07 Mai 2012 à 07:51
par Michael DELIQUE
re,

le lotus script ne fonctionne pas en web !

Re: base de documents accessible en Web

MessagePublié: 07 Mai 2012 à 08:09
par guyader
nouvel essai ...
non je n'ai pas de mail envoyé à l'adresse ....
doits ANONYMOUES éditeur !!
comment puis-je tester ?

Re: base de documents accessible en Web

MessagePublié: 07 Mai 2012 à 11:04
par roubech
en web, il ne faut pas penser comme en client Notes
si ton appli doit fonctionner avec les 2 clients, tu peux mutualiser du code LS en le mettant en lib mais en prenant soin de pas mélanger les UI...

je ne serai pas aussi catégorique que Mickael. Si tu regardes le code HTML généré, domino a certainement généré un input type="button" avec l'appel à sa fonction JS DoAction aui au final va faire un submit du form et lancer le code LS. Par contre, en effet, tous le code LS n'est pas forcément supporté en web ...
La première chose que je vois, que la variable doc n'est pas déclarée ni initialisée. Tu n'as peut-être pas mis le début du code ...

Si ce formulaire ne sert qu'à faire l'envoi du mail, tu peux simplement faire un submit et appeler ton code dans le WebQuerySave
si besoin, utilise le champ SaveOptions si tu n'as pas envi que le doc soit créé dans la base