Re Enviar correo por web
Responder

Comentarios:

      Hola!! yo tengo el mismo problema que tú, no soy capaz de enviar correos anónimos por web. Estoy muy atascada en un proyecto...
      A ver si alguien sabe cómo se hace
      ******************
      Gracias por la respuesta, ya funciona. El problema ahora es el siguiente:
      Tengo un código en LotusScript para enviar correos (enviar el documento actual que antes guardo), pero me da problemas en web, ya que ejecuta el agente de enviar sólo hasta la línea
      "Dim workspace As New NotesUIWorkspace"
      ¿Porqué pasa esto con el workspace? ¿Cómo puedo sino enviar correos?
      El código está en un agente al que se le llama al pulsar un botón y es el siguiente:
      Sub EnviarMail()
      Dim session As New notessession
      Dim mail As NotesDocument
      Dim db As notesdatabase
      Set db=session.currentdatabase
      Dim doc As NotesDocument
      Dim workspace As New NotesUIWorkspace 'da error aquí
      Dim uidoc As NotesUIDocument
      Dim docactual As NotesDocument
      Set uidoc = workspace.CurrentDocument
      Set docactual=uidoc.Document
      Call uidoc.Save
      Set mail=New notesdocument(db)
      mail.form="Memo"
      mail.Subject = "asunto"
      mail.Body=men
      mail.SendTo = "direccion@dddd.es"
      mail.Principal ="nombre@NotesDomain"
      Dim rtitem As NotesRichTextItem
      Set rtitem = New NotesRichTextItem( mail, "Body" )
      Call rtitem.AppendDocLink ( docactual, "enlace a doc" )
      Set item = docactual.GetFirstItem( "Miembros" )
      Forall v In item.Values
      Call mail.send(True) 'Call mail.Send( False, v )
      End Forall
      End Sub
      Gracias de nuevo.
Respuestas


Enviar Correo Por Web

Gracias por la respuesta, ya funciona. El problema ahora es el siguiente:
Tengo un código en LotusScript para enviar correos (enviar el documento actual que antes guardo), pero me da problemas en web, ya que ejecuta el agente de enviar sólo hasta la línea
"Dim workspace As New NotesUIWorkspace"
¿Porqué pasa esto con el workspace? ¿Cómo puedo sino enviar correos?
El código está en un agente al que se le llama al pulsar un botón y es el siguiente:
Sub EnviarMail()
Dim session As New notessession
Dim mail As NotesDocument
Dim db As notesdatabase
Set db=session.currentdatabase
Dim doc As NotesDocument
Dim workspace As New NotesUIWorkspace 'da error aquí
Dim uidoc As NotesUIDocument
Dim docactual As NotesDocument
Set uidoc = workspace.CurrentDocument
Set docactual=uidoc.Document
Call uidoc.Save
Set mail=New notesdocument(db)
mail.form="Memo"
mail.Subject = "asunto"
mail.Body=men
mail.SendTo = "direccion@dddd.es"
mail.Principal ="nombre@NotesDomain"
Dim rtitem As NotesRichTextItem
Set rtitem = New NotesRichTextItem( mail, "Body" )
Call rtitem.AppendDocLink ( docactual, "enlace a doc" )
Set item = docactual.GetFirstItem( "Miembros" )
Forall v In item.Values
Call mail.send(True) 'Call mail.Send( False, v )
End Forall
End Sub
Gracias de nuevo.

Iniguin 07/12/2007 09:41:18 Responder

Re Logeo De Usuarios En Web

hay varias cosas que tienes que hacer:
Para activar los formularios de login, en el documento del servidor en la pestaña INTERNET PROTOCOL>DOMINO WEB ENGINE>en session authentication tienes que seleccionar single server.
Tendrás que reiniciar el servidor:
Login: para que te sirva los diferentes nombre y nombres cortos que aparecen en el documento persona en el documento del servidor>pestaña seguridad>Internet access y en el campo internet authentication selecciona más variaciones de nombres con menos seguridad.
También tendrías que añadir el nombre de usuario que hay antes de la @ en el campo username
saludos
-------------------------------------
Hola, me gustaría saber cómo se puede hacer para entrar en una aplicación notes por web, y forzar a que pida nombre de usuario y contraseña.
Creo que hay que crear una entrada en la ACL poniendo a "Anonymous" como "sin acceso" para que así salga una página con un formulario de logeo (la de domcfg.nsf). El problema es que no me sale eso, sino que sale la típica ventana de Windows para introducir usuario y contraseña.
Además en esa ventana pongo el nombre de usuario indicado en la dirección de correo antes de la arroba (ej. prueba@noseque.algo, el usuario sería prueba) y la password la que indica el names.nsf como internet password, y no lo acpeta.
Muchas gracias por adelantado.

Juan Carlos Trigo Diaz 01/12/2007 23:30:55 Responder


Web Desarrollada por Juan Carlos Trigo Díaz
Optimizado para: 1024 x 768 pixels - Explorer > 6 Copyright © 2008