elhacker.net cabecera Bienvenido(a), Visitante. Por favor Ingresar o Registrarse
¿Perdiste tu email de activación?.

 

 


Tema destacado: Trabajando con las ramas de git (tercera parte)


+  Foro de elhacker.net
|-+  Programación
| |-+  Scripting
| | |-+  Exportar múltiples objetos a un archivo html(vbscript)
0 Usuarios y 1 Visitante están viendo este tema.
Páginas: [1] Ir Abajo Respuesta Imprimir
Autor Tema: Exportar múltiples objetos a un archivo html(vbscript)  (Leído 2,402 veces)
rdmm

Desconectado Desconectado

Mensajes: 5


Ver Perfil
Exportar múltiples objetos a un archivo html(vbscript)
« en: 26 Febrero 2015, 10:51 am »

Lo que necesito es que en el html se peguen varias tablas, no solo una, y a poder ser poder insertar el texto que yo quiera entre las tablas.
De momento solo consigo poner una tabla , la CH80, pero necesito unas 4 o 5, la 80,75,76...

Gracias!!!

MI CODIGO:

Código
  1. '// ****************************************************************
  2. '// Enviador Mails Pegados Cuerpo
  3. '// ****************************************************************
  4. sub SendMail
  5. if Time()>TimeValue("10:15:00") and Time()<TimeValue("21:30:00")Then
  6. ' Object creation
  7. Set objMsg = CreateObject("CDO.Message")
  8. Set msgConf = CreateObject("CDO.Configuration")
  9. strDate = CDate(Date)
  10.  
  11.  
  12. set cs = ActiveDocument.GetSheetObject("CH80")
  13. cs.ExportHtml "C:\Directory\Pruebas\informe.html"
  14.  
  15.  
  16.  
  17. objMsg.CreateMHTMLBody "file://C:\Directory\Pruebas\informe.html"
  18.  
  19. ' Server Configuration
  20. msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
  21. msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "server***********"
  22. msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
  23. msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
  24. msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "mimai********l"
  25. msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "pass******"
  26. msgConf.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = 1
  27. msgConf.Fields.Update
  28.  
  29. ' Email
  30. objMsg.To = "mmail***********"
  31. objMsg.From = "mail**********.com"
  32. objMsg.Subject = "Reporte " & Now()
  33. objMsg.Sender = "Reportes"
  34.  
  35. Set objMsg.Configuration = msgConf
  36.  
  37. ' Send
  38. objMsg.Send
  39.  
  40. ' Clear
  41. Set objMsg = nothing
  42. Set msgConf = nothing
  43.  
  44. end if
  45. end sub



[MOD]: Utiliza la etiquetas GeShi para insertar código, lee las normas del foro de programación.


« Última modificación: 27 Febrero 2015, 04:11 am por Eleкtro » En línea

rdmm

Desconectado Desconectado

Mensajes: 5


Ver Perfil
Re: Exportar múltiples objetos a un archivo html(vbscript)
« Respuesta #1 en: 27 Febrero 2015, 07:41 am »

Alguna idea? gracias!


En línea

Páginas: [1] Ir Arriba Respuesta Imprimir 

Ir a:  

Mensajes similares
Asunto Iniciado por Respuestas Vistas Último mensaje
[Aporte] Exportar DataGridView a Excel, PDF y HTML « 1 2 3 4 »
.NET (C#, VB.NET, ASP)
oscarj24 31 37,618 Último mensaje 9 Julio 2012, 09:41 am
por P4nd3m0n1um
Objetos con VBScript, duda muy básica
Programación Visual Basic
prooving 6 4,383 Último mensaje 14 Junio 2012, 22:43 pm
por prooving
JAVA como declarar multiples objetos a la vez
Java
r7pyrred 2 2,648 Último mensaje 19 Febrero 2013, 01:41 am
por r7pyrred
Separar un comando en múltiples líneas en VBSCRIPT
Scripting
.:UND3R:. 2 2,751 Último mensaje 5 Marzo 2014, 04:14 am
por .:UND3R:.
Crear múltiples objetos y ejecutar ventanas
Programación C/C++
Diego_22 0 1,785 Último mensaje 22 Agosto 2017, 13:42 pm
por Diego_22
WAP2 - Aviso Legal - Powered by SMF 1.1.21 | SMF © 2006-2008, Simple Machines