• Sábado 21 de Diciembre de 2024, 13:15

Mostrar Mensajes

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


Mensajes - ManDraK3

Páginas: [1]
1
Visual Basic 6.0 e inferiores / Reportes...
« en: Lunes 13 de Octubre de 2008, 17:29 »
Bueno he creado este tema por razones obvias...
se que he posteado esto en otros temas espero no lo tomen como span...
Describire primero lo que tengo y luego lo que necesito:
Tengo una base de datos con las tablas:
Facturas(IdInterno, Codfactura(pk), CodCliente, etc)
Recibos (idrecibo (pk), codFactura, CodBanco, etc)
Clientes(IdInterno(pk), etc)
Bancos(IdInterno(pk), etc)

Con esta sentencia en un rs lleno un msflexgrid (voy a poner toda la sentencia)

*CD=variable que guarda un campo que especifico antes de la busqueda
*campo=variable que guarda un campo por el cual se va a hacer la busqueda

SQL = "SELECT dbo.Bancos.NombreBanco, dbo.Clientes.NombreEmp, dbo.Facturas.CodFactura, dbo.Recibos.ReciboNo, dbo.Recibos.Monto, dbo.Recibos.CK, dbo.Recibos.NoCK, dbo.Recibos.CC, dbo.Recibos.NoCC, dbo.Recibos.EfectivoC, dbo.Recibos.EfectivoD, dbo.Recibos.TipoCambio * dbo.Recibos.Efectivo AS Total, dbo.Recibos.Fecha, dbo.Recibos.Cash, dbo.Recibos.IdInterno,"
SQL = SQL + " dbo.Recibos.Efectivo, dbo.Recibos.TipoCambio"
SQL = SQL + " FROM dbo.Bancos INNER JOIN"
SQL = SQL + " dbo.Recibos ON dbo.Bancos.IdBanco = dbo.Recibos.CodBanco INNER JOIN"
SQL = SQL + " dbo.Facturas ON dbo.Recibos.CodFactura = dbo.Facturas.CodFactura INNER JOIN"
SQL = SQL + " dbo.Clientes ON dbo.Facturas.CodCliente = dbo.Clientes.IdCliente"
SQL = SQL + " Where "
SQL = SQL + "dbo.Recibos." + CD + " = " & "'True'" & " And " & ""
SQL = SQL + Campo
SQL = SQL + " GROUP BY dbo.Bancos.NombreBanco, dbo.Clientes.NombreEmp, dbo.Facturas.CodFactura, dbo.Recibos.ReciboNo, dbo.Recibos.Monto,"
SQL = SQL + " dbo.Recibos.CK, dbo.Recibos.NoCK, dbo.Recibos.CC, dbo.Recibos.NoCC, dbo.Recibos.EfectivoC, dbo.Recibos.EfectivoD,"
SQL = SQL + " dbo.Recibos.Fecha, dbo.Recibos.Cash, dbo.Recibos.IdInterno,"
SQL = SQL + " dbo.Recibos.Efectivo, dbo.Recibos.TipoCambio"

con eso en un rs lleno bien el flexgrid
luego paso el rs al dtenv asi: Set DTEnvReporte.rsCommand.DataSource = RSSs
aveces me sale conflicto con otros datos
despues me sale que no se pudieron cargar en conjunto de datos

pero ese error me pasa cuando quiero hacer un reporte agrupado...
con uno sencillo no me da error y me muestra bien todo

2
Visual Basic 6.0 e inferiores / Re: DataReport
« en: Sábado 11 de Octubre de 2008, 01:27 »
nada....me da el mismo error :s

3
Visual Basic 6.0 e inferiores / Re: DataReport
« en: Viernes 10 de Octubre de 2008, 23:48 »
ummmmm ...lo cargue con un dtenv con una varias tablas y al ejecutar en el boton "buscar" le cambio el source y no me da
si no estoy mal io siempre he usado los rs con mas de 1 tabla y me ha funcionado bien
pero bueno hare un ejemplo asi como dices....

4
Visual Basic 6.0 e inferiores / Re: DataReport
« en: Viernes 10 de Octubre de 2008, 20:53 »
Hola...lo anterior ya lo resolvi jeje
ahora tengo otro pegonsito....toy usando el datareport sin dataenviroments...lo cargo con un recordset

Set dtrGrupo.DataSource = RSSs (este es mi recorset con ke cargo un msflexgid)

en un reporte normal no me da problemas, me presenta los datos correctamente
pero toy tratando de hacer un reporte agrupado y me sale el siguiente error:
"Las secciones de informes no coinciden con origen de datos"

alguien me puede decir que estoy haciendo mal? :s

5
Bases de Datos / Re: Base De Datos
« en: Jueves 9 de Octubre de 2008, 18:39 »
jejeje ya lo hice..se me habia olvidado cambiar el server a auntenticacion mixta jejeje

6
Bases de Datos / Re: Base De Datos
« en: Jueves 9 de Octubre de 2008, 18:20 »
he creado un usuario nuevo inicio de sesion en sql
pero al tratar de conectarme desde visual con esa cadena me sale: "Error de inicio de sesion del usuario (usaurio). El usuario no esta asociado a una conexion de sql server de confianza"

que estoy haciendo mal?

7
Bases de Datos / Re: Base De Datos
« en: Jueves 9 de Octubre de 2008, 17:05 »
Intentare eso...gracias por tu aporte...

8
Visual Basic 6.0 e inferiores / Re: ACCEDER a Base de DATOS desde OTRA PC
« en: Miércoles 8 de Octubre de 2008, 23:53 »
Eso era lo que necesitaba gracias xZerox

9
Bases de Datos / Base De Datos sql
« en: Miércoles 8 de Octubre de 2008, 19:41 »
Hola necesito ayuda...

tengo un programa hecho en visual 6.0
tengo la base de datos en sql 2005
necesito que al ejecutarlo desde otras pc (clientes) se conecten a la base de datos en sql (servidor)
mi cadena de conexion en visual es:
Conexion = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Prueba;Data Source=SSCSERVER"

se puede hacer sin instalar sql en las otras pc (clientes)?

alguien me puede ayudar con esto?

10
Visual Basic 6.0 e inferiores / Re: ACCEDER a Base de DATOS desde OTRA PC
« en: Miércoles 8 de Octubre de 2008, 19:24 »
Gracais por tu tiempo cpmario :D

11
Visual Basic 6.0 e inferiores / Re: ACCEDER a Base de DATOS desde OTRA PC
« en: Miércoles 8 de Octubre de 2008, 19:09 »
Creo que no me explico bien....
eso me funciona pero con el programa
lo que necesito es ke el programa instalado en el cliente se conecte a la base de datos sql en en server

12
Visual Basic 6.0 e inferiores / Re: ACCEDER a Base de DATOS desde OTRA PC
« en: Miércoles 8 de Octubre de 2008, 18:19 »
Ok eso lo he hecho siempre y me ha fuicionado bien...pero hice el instalador del programa con el empaquetador que trae visual
y kiero instalar en programa en cada una de las pc (clientes) y que se conecten en la maquina principan (servidor con el sql)

la cadena de conexion que tengo es:
Conexion = "Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;Initial Catalog=Prueba;Data Source=SSCSERVER"

si me pueden ayudar agradeceria mucho...

13
Visual Basic 6.0 e inferiores / Re: ACCEDER a Base de DATOS desde OTRA PC
« en: Martes 7 de Octubre de 2008, 17:40 »
Como hago pa conectarme a la base de datos desde una pc que no esta instalado el sql server?

14
Visual Basic 6.0 e inferiores / Re: DataReport
« en: Martes 7 de Octubre de 2008, 17:39 »
Tengo una duda:

en mi base de datos (sql) tengo unos campos bit (true/false)
lo que quiero es que al cargarlos en el datareport no me aparezca el true/false de cada campo sino reemplazarlos por alguna
imagen como las de los chekbox....

15
Visual Basic 6.0 e inferiores / Re: DataReport
« en: Martes 7 de Octubre de 2008, 17:31 »
por que no pruebas esto...

en el boton de imprimir:

Set Nombredelreporte.DataSource = recorset (nombre del recorset con que cargas el grid)
    Nombredelreporte.Show 1

Páginas: [1]