Foro http://www.canalvisualbasic.net/foro/ Esto es un foro de discusión es Thu, 11 Mar 2010 01:27:40 GMT vBulletin 60 http://www.canalvisualbasic.net/foro/images/misc/rss.jpg Foro http://www.canalvisualbasic.net/foro/ Pasar datos de una segunda tabla http://www.canalvisualbasic.net/foro/visual-basic-6-0/pasar-datos-de-una-segunda-tabla-14603/ Wed, 10 Mar 2010 20:15:32 GMT Para pasar los registros filtrados de una tabla al report hago lo siguiente: a) Creo el recordset: Código: --------- Set rsLinPed = New... Para pasar los registros filtrados de una tabla al report hago lo siguiente:

a) Creo el recordset:

Código:
Set rsLinPed = New ADODB.Recordset
strSQL = "SELECT * FROM LinPeSEA WHERE Numero = '" & TBcNumPed & "'"
rsLinPed.Open strSQL, g_db, adOpenDynamic, adLockOptimistic
b) paso al report:

Código:
With crReport
  .Database.SetDataSource rsLinPed
  .PaperOrientation = 1
  .PaperSize = 0
  .DiscardSavedData
End With
¿Pero que código debo añadir (al margen del recordset), para pasar los registros filtrados de una segunda tabla?

Saludos cordiales. ]]> Visual Basic 6.0 abinfra http://www.canalvisualbasic.net/foro/visual-basic-6-0/pasar-datos-de-una-segunda-tabla-14603/ La breve historia de la copiadora en la oficina http://www.canalvisualbasic.net/foro/impresoras-y-escaneres/la-breve-historia-de-la-copiadora-en-la-oficina-14602/ Wed, 10 Mar 2010 18:27:49 GMT *60 años de la Copiadora en la oficina (http://www.burmester.com.mx)* La televisión existe solamente desde hace 60 años, ha revolucionado la... 60 años de la Copiadora en la oficina

La televisión existe solamente desde hace 60 años, ha revolucionado la información mundial.
La copiadora de oficina existe desde hace 60 años, ha revolucionado la comunicación mundial.
La PC existe solamente desde hace 30 años, ha revolucionado la oficina mundial.
La combinación de copiadoras digitales-PC-Internet, existe solamente desde hace 10 años, y ha revolucionado las comunicaciones nacionales e internacionales, promoviendo la globalización.

Antes, en la oficina antigua, también existieron las copias fotostáticas, pero hechas con cámaras fotográficas y cuartos obscuros. Haciendo una copia, con negativo y positivo, tomaba más de una hora.

En 1948, la compañía Alemana Develop produjo la primera copiadora comercial, haciendo copias en un minuto, a plena luz de la oficina y sin cuarto obscuro. Fue fotografía, con papel sensible y un líquido revelador. Fue la “Difusión” de Agfa Gevaert, (más tarde también usada por Polaroid), una sensación que conquistó a las oficinas, mundialmente.

Sin embargo, una vez conocido el gran valor y las múltiples aplicaciones de la copia fotostática en la oficina, el mundo quería una copia más rápida, sobre papel bond y seco, sin líquidos.

Esto fue logrado con el proceso Xerográfico ó Electrostática Indirecta; indirecta, porque la copia fue primero establecida en un cilindro semiconductor y de allá transferida al papel bond. Era tecnología complicada, en máquinas grandes y costosas. Por esto, por 20 años, las primeras maquinas fueron rentadas y con un consumo mínimo obligatorio. Esta fue la segunda etapa de la copiadora.

Una vez terminadas las patentes del cilindro, empezó la tercera etapa de las copiadoras, la simplificación y la producción en masa de las copiadoras xerográficas en Japón, con el fin de lograr máquinas más pequeñas para la oficina y mucho más baratas. Hoy, el 80% de estas copiadoras son desarrolladas en Japón y fabricadas en China.

Ahora, en su cuarta etapa, tenemos las Copiadoras Digitales. Es la imagen que se digitaliza, expone el cilindro con rayo láser e imprime con tóner. Estas copiadoras son Multifuncionales, copian, imprimen, escanean y faxean.

Antes, la copiadora fue una máquina aislada, que hacía solamente copias de un original de papel. Hoy, la copiadora todavía puede hacer estas copias, pero normalmente funciona como periférico de la PC, y como esto es parte de la red, y manda sus productos internamente a las estaciones en la oficina, o externamente a todo el mundo.

Una de las pocas compañías que ha pasado por la comercialización de todos estos productos, desde sus inicios, ha sido Burmester, S.A. en México desde 1957.

Más información
www.burmester.com.mx ]]> Impresoras y escaneres grupobfx http://www.canalvisualbasic.net/foro/impresoras-y-escaneres/la-breve-historia-de-la-copiadora-en-la-oficina-14602/ Reporte Autocomprimible http://www.canalvisualbasic.net/foro/crystal-reports/reporte-autocomprimible-14601/ Wed, 10 Mar 2010 17:34:58 GMT Hola a todos. quiero hacer un subreporte autocomprible, asi como el reporteador del access que tiene una propiedad llamada si, pero en el crystal... Hola a todos.

quiero hacer un subreporte autocomprible, asi como el reporteador del access que tiene una propiedad llamada si, pero en el crystal report net, solo viene la propiedad "puede crecer" alguien sabe si se puede hacer en crystal.


De antemano gracias. ]]> Crystal Reports RicardoEspinozaP http://www.canalvisualbasic.net/foro/crystal-reports/reporte-autocomprimible-14601/ <![CDATA[Error de Incorrect syntax near the keyword 'ON'.]]> http://www.canalvisualbasic.net/foro/bases-de-datos-ado-ado-net/error-de-incorrect-syntax-near-keyword-14600/ Wed, 10 Mar 2010 16:12:08 GMT Hola.. bueno recurro a ustedes por lo siguiente.. Estoy realizando un pequeno proyecto en visual Basic.Net y usando sql server.. En este ultimo... Hola.. bueno recurro a ustedes por lo siguiente..

Estoy realizando un pequeno proyecto en visual Basic.Net y usando sql server.. En este ultimo tengo 3 tablas.. las cuales se relacionan asi:

Tablas SM3GUIA y sm3ped Columnas: SM3GUIA.NUM_REF y sm2ped.NUM_REF
Tablas sm3ped y cmcli Columnas sm3ped.RFCCTE y cmcli.RFC

Para ello tengo un inner join creado en el sqlDataSource... A continuacion pongo el codigo y marco con negritas donde se me marca el error:

Dim conn5 As System.Data.SqlClient.SqlConnection = New System.Data.SqlClient.SqlConnection("Data Source=6X.XX.XXX.9X;Initial Catalog=DATABASE1;Persist Security Info=True;User ID=usuario01;Password=xxxxxx")
Dim objCmd5 As SqlClient.SqlCommand = New SqlClient.SqlCommand("SELECT SM3GUIA.NUMGUIA, cmcli.NOMCLI, cmcli.RFC, sm3ped.NUM_REF, sm3ped.RFCCTE, sm3ped.CVEPEDIM, sm3ped.REGIMEN, sm3ped.VALADUANA, sm3ped.FEC_PAG FROM SM3GUIA CROSS JOIN sm3ped ON SM3GUIA.NUM_REF = sm3ped.NU_REF CROSS JOIN cmcli ON sm3ped.RFCCTE=cmcli.RFC WHERE sm3ped.NUM_REF=('" & txtbuscar.Text & "')", conn5)
Dim ObjLector5 As SqlClient.SqlDataReader
Dim datgr5 As New DataGrid

Me.SqlDataSource13.SelectParameters("NUM_REF").Def aultValue = Me.txtconsulta.Text
Me.SqlDataSource13.DataSourceMode = SqlDataSourceMode.DataReader
objCmd5.Connection.Open()
ObjLector5 = objCmd5.ExecuteReader

Me.GridView6.DataSourceID = String.Empty
Me.GridView6.DataSource = ObjLector5
Me.GridView6.DataBind()
ObjLector5.Close()
objCmd5.Connection.Close()
If Me.GridView6.Rows().Count = 0 Then MsgBox("No se Encuentran Datos", MsgBoxStyle.OkOnly)
----------------------------------------------------

Como pueden ver.. lo que quiero es mostrar algunos datos de 3 tablas en un gridview, pero me muestra el error siguiente al correrlo:

Incorrect syntax near the keyword 'ON'.
Description: An unhandled exception occurred during the execution of the current web request. Please review the stack trace for more information about the error and where it originated in the code.

Exception Details: System.Data.SqlClient.SqlException: Incorrect syntax near the keyword 'ON'.

------------Bueno.. espero que me puedan iluminar, sospecho que algo tiene que ver el join que estoy haciendo?? Alguien sabe cual es el modo correcto?? De antemano gracias.. ]]> Bases de datos, ADO , ADO.NET Kaime_joy http://www.canalvisualbasic.net/foro/bases-de-datos-ado-ado-net/error-de-incorrect-syntax-near-keyword-14600/ TransOCX (Frames Transparentes) http://www.canalvisualbasic.net/foro/visual-basic-6-0/transocx-frames-transparentes-14599/ Wed, 10 Mar 2010 15:08:03 GMT Hola a todos, me llamo Juan Fran, soy nuevo en el foro y lo primero que deseo, después de presentarme, es agradecer la existencia de este sitio de... Hola a todos, me llamo Juan Fran, soy nuevo en el foro y lo primero que deseo, después de presentarme, es agradecer la existencia de este sitio de ayuda y donde se comparten conocimietos.

Estoy cambiando la imágen gráfica de un formulario, y después de buscar sobre cómo evitar que objetos Frame se interpongan en el fondo del formulario (jpg) por no tener propiedades de transparencia o BackStyle, he encontrado el complemento (OCX) llamado "TransOCX", que convierte Frames en transparentes. El tema funciona, se trata poner el control TransOCX encima del propio Frame para que se haga transparente, y lo que pasa es que para que funcione tienes que, en vista diseño, "Enviar al fondo" todos los controles TransOCX, pero cuando vuelvo a cambiar algo en el formulario y lo vuelvo a ejecutar, vuelve a verse el fondo tapado por los colores de fondo de los frames, por lo que tengo que volver a la vista de diseño del ejercicio y volver a "Enviar al fondo" cada control TransOCX a mano, para que no interfieran los frames en el fondo del formulario.

Bueno pues he buscado y probado algunas cosas, como la propiedad ZOrder ("Transparent1.ZOrder (1)" para enviar al fondo (SendToBack)), pero no me ha funcionado, sigo teniendo que cambiar todos los TransOCX en vista de diseño cada vez que hago algún cambio en el módulo que sea del proyecto, y no digo ya el rollo que será cuando tenga 30 en vez de 5 que tengo ahora colocados. Tiene que haber algo que se pueda hacer en vista de código que sea definitivo. El "SendToBack" no me lo reconoce por la versión del VB.

Por favor, ¿existe algún truco o código para no tener que andar haciendo "Enviar al fondo" en vista de diseño cada control TransOCX cada vez que modifique el proyecto?

En la figura 1 muestro la colocación de los controles TransOCX en vista diseño en el formulario original (flechas rojas), en la figura 2 muestro el diseño que he hecho con el potochop para el fondo del formulario, y en la figura 3 se ve como queda en tiempo de ejecución la aplicación con el fondo nuevo. El cambio es radical.

Fig. 1:


Fig. 2:


Fig. 3:


Las dos zonas naranjas de la Fig.3 es otra cosa que quería preguntar, ya que debe ser que al ser frames anidados dentro del frame que les rodea, ni siquiera haciendo "Enviar al fondo" en vista diseño de sus controles TransOCX respectivos, no soy capaz de hacer que no se vea el color del fondo el frame original, y me tapa ciertos controles de los Frames y el fondo del formulario.

A ver si alguien me puede hechar una manilla o dar algún consejo, cualquier cometario será de agradecer.

Muchas gracias de antemano y saludos.

juanFran. ]]> Visual Basic 6.0 JuanFrancisco http://www.canalvisualbasic.net/foro/visual-basic-6-0/transocx-frames-transparentes-14599/ conexion tctp/ip a aplicacion visual 6.0 http://www.canalvisualbasic.net/foro/visual-basic-6-0/conexion-tctp-ip-aplicacion-visual-6-0-a-14598/ Wed, 10 Mar 2010 14:24:59 GMT Hola Soy nuevo en el sitio y necesito ayuda. Tengo una alicacion hecha en visual 6.0 con sql server 2000. me conecto por ODBC en red local sin... Hola
Soy nuevo en el sitio y necesito ayuda.
Tengo una alicacion hecha en visual 6.0 con sql server 2000.
me conecto por ODBC en red local sin ningun problema pero quiero hacer lo siguiente:

tengo una red con una conexion IP FIJA que pasa por un router .
La base de datos esta en un pc de la red con XP .
Yo necesito ingresar por del router y llegar hasta la base de datos desde fuera y poder trabajar normalmente.
Se puede ?
Alguien me puede decir como?
Gracias ]]> Visual Basic 6.0 josalazar http://www.canalvisualbasic.net/foro/visual-basic-6-0/conexion-tctp-ip-aplicacion-visual-6-0-a-14598/ Permisos de administrador http://www.canalvisualbasic.net/foro/visual-basic-net/permisos-de-administrador-14597/ Tue, 09 Mar 2010 23:22:28 GMT Alguno de ustedes sabe como poder crear o modificar desde código un archivo pero con permisos de administrador? es decir como si lo ejecutara un... Alguno de ustedes sabe como poder crear o modificar desde código un archivo pero con permisos de administrador? es decir como si lo ejecutara un usuario con permiso de administrador... esto obvio... sin tener que darle click derecho ejecutar como :S ]]> Visual Basic .NET Devilskate64 http://www.canalvisualbasic.net/foro/visual-basic-net/permisos-de-administrador-14597/ Poner el form como imagen http://www.canalvisualbasic.net/foro/visual-basic-net/poner-el-form-como-imagen-14596/ Tue, 09 Mar 2010 20:15:12 GMT Quiero cargarle a la variable imagendelformul que es del tipo System.Drawing.Image el diseño del formulario (imagen) Dim imagendelformul As... Quiero cargarle a la variable imagendelformul que es del tipo System.Drawing.Image el diseño del formulario (imagen)

Dim imagendelformul As System.Drawing.Image
imagendelformul = Me.(que pongo aqui??????????????????????):mad:
e.Graphics.DrawImage(imagendelformul, 100, 200, 500, 500)

Ayuda please; ]]> Visual Basic .NET miche123qwe http://www.canalvisualbasic.net/foro/visual-basic-net/poner-el-form-como-imagen-14596/ Sobre bd con csharp http://www.canalvisualbasic.net/foro/c-c-sharp/sobre-bd-con-csharp-14595/ Tue, 09 Mar 2010 19:06:20 GMT hola quiero sabe como puedo exportar y importar una base de datoos desde csharp. me explico quiero hacer una aplicacion q me permita exportar algunas... hola quiero sabe como puedo exportar y importar una base de datoos desde csharp. me explico quiero hacer una aplicacion q me permita exportar algunas tablas de su base de datos tb importar aver si alguien me da alguna ayudita gracias ]]> C# (C-Sharp) juampy http://www.canalvisualbasic.net/foro/c-c-sharp/sobre-bd-con-csharp-14595/ Crystal Report no me presenta datos filtrados http://www.canalvisualbasic.net/foro/crystal-reports/crystal-report-no-me-presenta-datos-filtrados-14594/ Tue, 09 Mar 2010 18:23:34 GMT Tengo un reporte creado en crystal report en el visor tengo una serie de filtros que se los paso a RecordSelectionFormula el cual funciona bien. ... Tengo un reporte creado en crystal report en el visor tengo una serie de filtros que se los paso a RecordSelectionFormula el cual funciona bien.

Le explico por medio de un ejjemplo cual es mi problema:

Digamos que tengo un reporte que me lista persona de diferente paises entonces yo tengo un combobox para filtrar persona por paises si yo por primera vez filtro por Mexico me muestra las persona de este paises pero si pido de otro pais como Guatemala no me muestra nada. entonces tengo que cerrar el visor de reportes y filtrar los datos de Guatemala por primera vez para que se muestren la persona de estes pais.

Le agradeceria su ayuda
Saludos ]]> Crystal Reports 505-G55 http://www.canalvisualbasic.net/foro/crystal-reports/crystal-report-no-me-presenta-datos-filtrados-14594/ Problema al conectar vb con sqlserver http://www.canalvisualbasic.net/foro/bases-de-datos-ado-ado-net/problema-al-conectar-vb-con-sqlserver-14593/ Tue, 09 Mar 2010 15:09:30 GMT Les pongo una captura del error: http://img692.imageshack.us/img692/8528/imagenerror.jpg Alguna solucion?? Les pongo una captura del error: http://img692.imageshack.us/img692/8528/imagenerror.jpg
Alguna solucion?? ]]> Bases de datos, ADO , ADO.NET ramiro_basic http://www.canalvisualbasic.net/foro/bases-de-datos-ado-ado-net/problema-al-conectar-vb-con-sqlserver-14593/ Mi programa (no responde) hasta que termina http://www.canalvisualbasic.net/foro/visual-basic-6-0/mi-programa-no-responde-hasta-que-termina-14592/ Tue, 09 Mar 2010 09:44:55 GMT Buenas, he hecho un programa que hace un volcado de archivos del mes. En total son unos 90000 archivos y tarda bastante tiempo ya que hace una... Buenas, he hecho un programa que hace un volcado de archivos del mes. En total son unos 90000 archivos y tarda bastante tiempo ya que hace una comprobación por fecha de modificación.

Además de que el PC en cuestión sea lento, no es ese el problema. Lo que me ocurre es que el programa empieza a copiar y a los 2 segundos el interface (el frame) pone no responde y lo que es peor aun es que se queda blanco todo el programa y no responde, aunque cuando copia todo se vuelve a actualizar y ya responde.
La solución que le he dado temporalmente es minimizar la ventana cuando empieza el proceso y se maximiza cuando termina. Pero me parece un "chapú" regular.
He probado con form.refresh pero no cambia nada.
Me gustaria ponerle una barra de progreso y un porcentaje pero ahsta que no logre un refresco de pantalla no creo que lo consiga.

Si alguien sabe que puedo hacer ..... Gracias de antemano :confused: ]]> Visual Basic 6.0 drmesmer http://www.canalvisualbasic.net/foro/visual-basic-6-0/mi-programa-no-responde-hasta-que-termina-14592/ Actualizar FileList http://www.canalvisualbasic.net/foro/visual-basic-6-0/actualizar-filelist-14591/ Tue, 09 Mar 2010 09:33:47 GMT Hola a todos. En Windows tengo una carpeta en la que cada cierto tiempo van entrando ficheros de forma automática por medio de un FTP. En Visual... Hola a todos.

En Windows tengo una carpeta en la que cada cierto tiempo van entrando ficheros de forma automática por medio de un FTP. En Visual estoy creando un programita en el que he colocado un FileListBox para que me muestre los ficheros de esa carpeta de Windows y luego operar con ellos. El tema es que no sé como hacer para que cuando a la carpeta de Windows llegue un nuevo fichero se actualice inmediatamente en el FileList sin tener que volver a ejecutar el programa.

Como se puede notar no tengo mucha experiencia y necesito algo de ayuda.

Saludos. ]]> Visual Basic 6.0 Angelt http://www.canalvisualbasic.net/foro/visual-basic-6-0/actualizar-filelist-14591/ Cambiar IP con VB.net http://www.canalvisualbasic.net/foro/visual-basic-net/cambiar-ip-con-vb-net-14590/ Mon, 08 Mar 2010 22:58:11 GMT bueno....eee....soy nuevo en esto de la programacion y estoy tratando de hacer un programa en el cual con un click puedes cambiar tu ip a alguno que... bueno....eee....soy nuevo en esto de la programacion y estoy tratando de hacer un programa en el cual con un click puedes cambiar tu ip a alguno que ingreses en un textbox. e leido q el tcp/ip es un servicio y se pude cambiar en el registro. el programa que hice cambia el valor en el registro pero no se que mas hacer ya que se guarda el registro pero con ipconfig puedo ver que el ip no se a cambiado.......



Option Strict On
Imports Microsoft.Win32

Class Form1


Dim regKey As RegistryKey
Dim keyTop As RegistryKey = Registry.LocalMachine

Private Sub Aceptarbutton_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Aceptarbutton.Click

regKey = keyTop.OpenSubKey("SYSTEM\CurrentControlSet\Servic es\Tcpip\Parameters\Interfaces\{9C939BEE-13FC-4F04-9A38-B85B26D491AA}", True)

regKey.SetValue("IPAddress", TextBox1.Text, RegistryValueKind.String)

End Sub
End Class



muchas gracias por anticipado.............. ]]> Visual Basic .NET cosmico_821 http://www.canalvisualbasic.net/foro/visual-basic-net/cambiar-ip-con-vb-net-14590/ Me presento, con una duda sobre forms y grids http://www.canalvisualbasic.net/foro/visual-basic-net/me-presento-con-una-duda-sobre-forms-y-grids-14589/ Mon, 08 Mar 2010 19:44:06 GMT Buenas, me presento, mi nick es furrymaster y bueno, acabo de empezar con visual basic... El problema me vino cuando hice un segundo formulario... ... Buenas, me presento, mi nick es furrymaster y bueno, acabo de empezar con visual basic...
El problema me vino cuando hice un segundo formulario...
La idea era simple, tengo un formulario principal, con un datagrid, y un botón para modificar el contenido de una fila. Ese botón abre el segundo formulario, que tiene textboxes y tal...
Pero claro, eso era lo facil, no se como mandar al segundo formulario información sobre qué linea de la tabla debe de leer.
Intenté usar eso de ".SelectedRows" pero claro, no se como enviarlo, principalmente porque no se de que tipo declarar la variable en el segundo formulario...
Bueno espero que alguien pueda ayudarme, gracias ]]> Visual Basic .NET furrymaster http://www.canalvisualbasic.net/foro/visual-basic-net/me-presento-con-una-duda-sobre-forms-y-grids-14589/