Recursos Visual Basic.NET, VB.NET, Manuales de programación, Tutoriales, Foros de programación, Comunidad de programadores

Jamec · #1 (**permalink**) 06-Jun-2006, 01:01

Esta es una función que permite imprimir un archivo .txt(ya lo probe), creo que sirve para .doc, .xls, etc. Cualquier cosa me avisan

Código:

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
Const conSwNormal = 1

Private Sub Command1_Click()
On Error Resume Next
ShellExecute hwnd, "print", "E:\Nueva carpeta\123.txt", vbNullString, vbNullString, conSwNormal
End Sub

manolo · #2 (**permalink**) 19-May-2007, 17:06

Hola, Probe tu codigo en VB 2005.Net Express Edition y me da un error. Me dice que la varieble hwnd no esta declarada.

Gracias por el codigo de todas formas.

[EX3] · #3 (**permalink**) 19-May-2007, 22:29

Este codigo esta diseñado para ejecutarse en Visual Basic 6.0 por lo que para ejecutarlo en .NET tendras que hacer algunas modificaciones. En este caso podrias pasarle 0 como valor al primer parametro en vez del controlador de ventana (hWnd) que en este caso seria el del formulario donde esta implementado el codigo del ejemplo.

Salu2...

manolo · #4 (**permalink**) 20-May-2007, 03:50

Perdona es que no te entiendo, llevo muy poco en el tema de la programación.

[EX3] · #5 (**permalink**) 20-May-2007, 04:02

Generalmente y en su mayoria los codigos de los recursos de esta guia estan orientados a Visual Basic 6.0. La sintaxis de Visual Basic 6.0 y la de Visual Basic .NET son distintas en muchas ocasiones por lo que algunas cosas varian ligeramente, unas veces simplemente de nombre y otras totalmente. Te decia que usaras el codigo de arriba que modificaras el valor del primer parametro de esta forma:

Código:

ShellExecute(0, "print", "E:\Nueva carpeta\123.txt", vbNullString, vbNullString, conSwNormal)

O bien le asignes el idenficador de la ventana como se haria en .NET:

Código:

ShellExecute(Integer.Parse(Me.Handle), "print", "E:\Nueva carpeta\123.txt", vbNullString, vbNullString, conSwNormal)

De las dos formas deberia funcionar.

Salu2...

Herramientas	Buscar en Tema
Mostrar Versión Imprimible Enviar por Correo	Buscar en Tema: Búsqueda Avanzada
Desplegado
Mode Lineal Cambiar a Modo Hibrido Cambiar a Modo Hilado

Temas Similares
Tema	Autor	Foro	Respuestas	Último mensaje
Lanzar programa externo y finalizar	Astro_Mundial	Visual Basic 6.0	7	29-Oct-2008 16:13
Imprimir archivo de texto externo	Guests	Visual Basic 6.0	1	06-Jun-2006 22:11
Imprimir archivo .txt	Guests	Visual Basic 6.0	1	06-Jun-2006 00:53
Ayuda - Link externo a IE	Guests	Visual Basic 6.0	6	01-May-2006 18:07
Imprimir archivo	Guests	Visual Basic 6.0	3	25-Mar-2006 16:49

Recursos Visual Basic.NET, VB.NET, Manuales de programación, Tutoriales, Foros de programación, Comunidad de programadores

Foros de programación, recursos, tutoriales, sistemas operativos...