Menú

Mostrar Mensajes

Esta sección te permite ver todos los mensajes escritos por este usuario. Ten en cuenta que sólo puedes ver los mensajes escritos en zonas a las que tienes acceso en este momento.

Mostrar Mensajes Menú

Mensajes - xepo

#1
hola buenas,
bien mi problema esta en que llevo dias intentando imprimir paginas especificas de un archivo pdf mediante codigo,
no lo consigo y por google no lo encuentro, en cambio si lo consigo imprimir un archivo completo.
espero puedadan hayudarme gracias
:-*

este codigo imprime todo el archivo en silencio, es posible paginas especificas solamente??

Código (vbnet) [Seleccionar]
Public Class Form1

   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 ' per obrir Notepad

   Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click

       Shell("C:\Program Files (x86)\Adobe\Acrobat Reader DC\Reader\AcroRd32.exe /T   " & Chr(34) & "C:\Users\J.C.L\Desktop\Proj_millores canon.pdf" & Chr(34))

   End Sub



End Class

#2
bien amigos he logrado algo que me vale hay lo espongo por si alguien le sirve:

he utilizado un control mscomm llamado commtest ,un combobox llamado comboport  y un bucle de 1 a 16 que son los numeros de puerto analizados
funciona bien solo que si un puerto esta habierto por algun programa al no poder habrirlo no lo muestra en el combo


codigo:

Sub lista_comm()
On Error GoTo error
For I = 1 To 16
   
error:
        If Err Then
        Resume Proxim
        End If
    commtest.CommPort = I
    commtest.PortOpen = True
    commtest.PortOpen = False
    cboPort.AddItem "Com" & Trim$(Str$(I))
Proxim:
Next I
  For I = 0 To cboPort.ListCount - 1
    cboPort.ListIndex = I
       
        If cboPort.Text = "com" & Form1.comm(Form1.Indexcomm).CommPort Then
        I = cboPort.ListCount - 1
        End If
  Next I
End Sub

saludos espero os sirba
#3
necesito presentar strings contenidas en dos bariables,
para diferenciar el string de cada variable queria cambiar el color del texto... uf aqui mi gran problema. pongo la propiedad .selcolor
el que quiero y si escribo con el teclado perfecto pero no se como mandar la variable string ,  con richtext1.text=richtext1.text & string   No vale ya que no guarda ningun formato de fuente ni color
supongo que seria por el formato rtf .

lo que quisiera es presentar una variable rojo otra verde por ejemplo ...pero todo auto


mil asias estoy atrancado una semana...y bosotros podeis


saludos al foro ...
#4
hola compis... vereis mi duda es como me las ingenio para mostrar un listado de puertos comm existentes en  el ordenador para luego colocarlos en un list box


Gracias mil  :P