• Martes 19 de Noviembre de 2024, 21:37

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 - jodijo5

Páginas: 1 ... 12 13 [14] 15 16 ... 23
326
Visual Basic 6.0 e inferiores / Fechas En Sql
« en: Domingo 6 de Noviembre de 2005, 16:17 »
holaamigos, como que me da un poco de verguenza preguntar esto pero bueno, con las bases de datos de sql siempre eh trabajado pero no eh necesitado trabajar especificamente con fechas, pèro ahora lo tengo que hacer y no me funciona la consulta de vb, eh probado de los siguientes modos y ninguno funciona:

Código: Text
  1.  
  2. set dbf=db.execute("select * from pedidos where fecha = 25/10/2005")        *
  3. set dbf=db.execute("select * from pedidos where fecha = '25/10/2005'")       *
  4. set dbf=db.execute("select * from pedidos where fecha = #25/10/2005#")    
  5. set dbf=db.execute("select * from pedidos where fecha like 25/10/2005")     *
  6. set dbf=db.execute("select * from pedidos where fecha like '25/10/2005'")    *
  7. set dbf=db.execute("select * from pedidos where fecha like #25/10/2005#")
  8.  
  9.  

como deberia de ser la sintaxis correcta, los que estan con (*), funcionan pero no cargan ningun registro, los demas me dicen error de sintaxis.

gracias de antemano por su yuda

327
Visual Basic 6.0 e inferiores / Re: Problema Con Savepicture
« en: Miércoles 2 de Noviembre de 2005, 21:45 »
copachay, muchas :gracias:  :D  :lol:  B)  :beer:  :jumpie:

328
Visual Basic 6.0 e inferiores / Problema Con Savepicture
« en: Martes 1 de Noviembre de 2005, 21:00 »
hola copachays, tengo un problema, miren tengo una imagen ya cargada en tiempo de diseño y utilizo luego el metodo paintpicture paraponer una imagen mas dentro de este picturebox algoasi:

Código: Text
  1.  
  2. private sub form_load()
  3.     picture1picture=loadpicture(app.path + "\miarchivo.bmp")
  4.     'aqui viene lo que les digo
  5.     picture1.paintpicture(image1.picture,0,0)
  6.     'mi problema viene aqui cuando quiero guardar la imagen de picturebox
  7.     'junto con la que le agregué, el problema es que solo guarda la imagen
  8.     'que estaba cargada sin la que la agregue
  9.     savepicture picture1.picture,app.path + "\miarchivo2.bmp"
  10. end sub
  11.  
  12.  

y bueno ese es mi problema, como podria solucionarlo amigos?
gracias de antemano por su ayuda

329
C/C++ / Re: Se Trata De Matematicas
« en: Martes 1 de Noviembre de 2005, 20:37 »
sip

330
Visual Basic 6.0 e inferiores / Ruta De Carpetas Especiales
« en: Lunes 31 de Octubre de 2005, 15:38 »
hola amigos, como se la ruta de las carpetas especiales de windows:

sistema de windows
windows
system32
escritorio
mis documentos
documentos compartidos
fuentes
etc...

331
Hardware / Os Pendejo
« en: Viernes 28 de Octubre de 2005, 03:15 »
disculpen la exprecion en primer lugar, bueno en mi maquina tenia dos OS de windows y uno falló asi que lo saqué de el archivo boot.ini, pero ese OS estaba en la particion primariam y ese fue el que instalé primero, ahora: lo quite del disco duro, pero para la siguiente vez ya no inicio el OS que me quedaba a pesar que rescaté el archivo boot.ini, ahora no me queda otra opcion que reinstalar ese sistema que saque, o ustedes que me recomiendan

332
VB .NET / Re: Datagrid
« en: Viernes 28 de Octubre de 2005, 02:54 »
lo que yo queria hacer era tener un grid para llenar datos estadisticos, luego otro grid para mostrar los analisis, ojo no tiene nada que ver con base de datos; quiero ingresar los datos en tiempo de ejecucion directamente al grid

333
Visual Basic 6.0 e inferiores / Re: Diferencia De Horas
« en: Viernes 28 de Octubre de 2005, 02:44 »
te explico como se hace:
Citar
DateDiff(intervalo,Fecha1,Fecha2)
en intervalo deves poner una bandera que puede ser:

"d" para que te de la diferencia de dias
"m" para que te de la diferencia en meses
"y" para años

si quieres la diferencia en dias puedes probar haciendo esto:
Código: Text
  1.  
  2. cdate(fecha1)-cdate(fecha2)
  3.  
  4.  

334
Visual Basic 6.0 e inferiores / Re: Grilla Con Combobox
« en: Miércoles 26 de Octubre de 2005, 22:16 »
gracias copachay :gracias:

335
Visual Basic 6.0 e inferiores / Grilla Con Combobox
« en: Lunes 24 de Octubre de 2005, 15:13 »
hola amigos, tengo una necesidad, necesito que mi grilla, mshflexgrid, datagrid, o flexgrid que al situarme en una celda me aparezca un combobox, quiero hacer algo com cuando en el excel le pongo filtros a mis datos y en ciertas celdas ya aparecen los combos, eso quiero hacer oooooo algo asi miren:

336
C/C++ / Re: Se Trata De Matematicas
« en: Miércoles 19 de Octubre de 2005, 23:22 »
ups, se me olvido de nuevo

337
C/C++ / Re: Se Trata De Matematicas
« en: Miércoles 19 de Octubre de 2005, 23:08 »
ups, se me olvidó la figura

338
C/C++ / Re: Se Trata De Matematicas
« en: Miércoles 19 de Octubre de 2005, 23:04 »
Te doy una idea de como es, la figura que te paso es mi rectangulo, de 20 por 40, en el voy agregando cuadrado por cuadrado, y a medida que voy agregando cada uno, se ubica en una posicion determinada por el programa, con el fin de que quede el menor espacio en blanco posible.

339
VB .NET / Datagrid
« en: Miércoles 19 de Octubre de 2005, 00:35 »
hola amigos, tengo que hacer una aplicacion para estadistica, pero lo quiero hacer en .net para poder aprender, necesito una grilla, pero no me conecto a ninguna base de datos; sino que en esta grilla tengo que poner algunos datos y luego hacer algnos calculos; mi problema es que entre los componentes solo encuentro un datagrid, pero este, no permite nisiquiera agregar los campos respectivos; que puedo hacer?  :(

graxias de antemano por su ayuda

340
Visual Basic 6.0 e inferiores / Re: Listbox En Visual Basic 6.0
« en: Domingo 16 de Octubre de 2005, 23:05 »
hola mi querido copachay, mejor te mando el codigo para evitar confuciones:

Código: Text
  1. Private Sub Form_Load()
  2. Dim nodo As ListItem
  3. Set nodo = ListView1.ListItems.Add(, , "hola")
  4. nodo.SubItems(1) = "esto"
  5. End Sub
  6.  
  7.  

te explico:

nodo es un objeto de la clase ListItem, esta clase se encarga de los demas campos desde el segundo hasta el final del listview, lo defines para que puedas llenar dichos campos;

para que agregues campos en tiempo de diseño tienes que irte a la propeidad personalizado del control ListView, alli puedes encontrar la propiedad "numitems" para que agregues mas campos y ac cada uno le pones un titulo y un index, luego con respecto a la vista de datos, tienes que modificar la opcion "view" quien te dice de que manera te mostrará los items, para que te des cuenta de lo que hablo puedes abrir el explorador de windows y jugar con las distintas vistas con las que te puede mostrar los datos (menos la de Vista en miniatura y vista de tira de imagenes que esa no te la brinda); en tu caso te conviene usar la vista 3, la de reportes, lo que en el explorador de windows tiene el nombre de "vista de detalles". con esta instruccion:
Código: Text
  1. ListView1.ListItems.Add(, , "hola")
  2.  
  3.  
lo que haces es agregar un nuevo elemento a la lista, y ese elemento le pasas al objeto "nodo", quien se encargará de agregar los datos a los demas campos. en este caso solo tienes dos campos, el primer campo no es tomado en cuenta por el objetonodo, ya que este es tratado directamente por el control, el objeto enumerará los campos desde el segundo enumerandolos enorden a partir del 1; es por eso que para llenar un texto en el segundo campo lo llamo poneindo:

Código: Text
  1. nodo.subitems(1)="esto"
  2.  
, y listo eso es todo si necesitas mas ayuda puedes visitar www.elguruprogramador.com.ar

341
Visual Basic 6.0 e inferiores / Re: Listbox En Visual Basic 6.0
« en: Lunes 10 de Octubre de 2005, 17:56 »
mejor usa un listview

aqui te mado un ejemplo, asegurate que en el cuadropersonalizado, pesataña "general", opcion "view" diga: report, luego en la pestaña encabezados de columna, agregas los titulos de las columnas, por ultimo los indices de los encabezados de las columnas empiezan por 1

342
Visual Basic 6.0 e inferiores / Re: Alguna Sugerencia Para Esta Interface?
« en: Lunes 10 de Octubre de 2005, 17:47 »
re refieres a algo asi?

donde puedes poner varios optionbos dentro de un picturebox., con respectopara que cada vez que clickees en un optionbox, (tienes los controles que cargaras en un formulario oculto) LO UNICIO QUE HACES ES usar el api "setparent", no tengo la sintaxis a la mano y lo jlas a tu formulario, si necesutas mas informacion sobre set parent puedes buscar en: reutilizando controles, donde te dice como lo puedes usar

343
C/C++ / Re: Se Trata De Matematicas
« en: Sábado 8 de Octubre de 2005, 02:10 »
imaginate que tienes un rectangulo de tela, dentro de este rectangulo cortas un pedazo(un rectangulo claro esta), cortas otro y otro y otro, pero tienes que ubicar cada corte de tal manera que aproveches la mayor cantidad de tela posible.

es un ejemplo practico con el que muchos programadores se topan.y casi por ahi va el reto este

344
VB .NET / Re: Problema Con Excel
« en: Miércoles 5 de Octubre de 2005, 22:53 »
te digo lo que pasó, este mismo programa, quise correrlo con excel 2003 pero en ingles, seguro no te dio ningun error porque estabas trabajando con excel wen español, mientras hacia el porgrama, tenia mucho cuidado en no utilizar la funciones de excel, tales como =suma(), etc, en resumen todas las que comienzan con "="; con el fin de tener compatibilidad entre las dos librerias, el error lo produce cuando ejecuto con el excel en ingles, pues lo hice con el excel en español. tal parece que el problema es esa libreria, pero incluso le cambie de libreria, al de ingles, pero igual me daba error.

que me recomiendas

345
VB .NET / Re: Problema Con Excel
« en: Miércoles 5 de Octubre de 2005, 00:38 »
mejor te mando la aplicacion, en fin es solo para que me ayude en mi curso de estadistica 1.

el error que memanda es:
Citar
An unhandled exception has occurred in your application. if you click Continue, the application will ignore this error and attempt tocontinue.
If you click Quit, the application will be shut down inmeditely.
QueryInterface for interface Excel_worksheet failed

346
VB .NET / Problema Con Excel
« en: Lunes 3 de Octubre de 2005, 17:26 »
hola amigos, tengo que hacer una aplicacion que haga un analisis estadistico en excel, agreggo la referencia correspondiete, y declaro las siguientes variables
Código: Text
  1.  
  2. private wbook as new excel.workbook
  3. private wsheet as new excel.worksheet
  4. private xc as new excel.application
  5.  
pero me da error, no se porque, incluso si le quito el "new";
porfavopr ayudenme, gracias de antemano, no les paso mi codigo porque no lo tengo a la mano esta es una pc prestada ya que la mia no tiene internet.

chaofas

347
Visual Basic 6.0 e inferiores / Re: Ayuda Con Access!!!!!!!!!
« en: Domingo 25 de Septiembre de 2005, 02:16 »
copachay warce, estoy totalmente de acuerdo con el, creo que lo que tu pretendes es que yo haga todo el trabajo por ti, tompoco es justo, pero si quieres que lo haga todo, el unico problema esque quizas en la realidad encuentres mas problemas de lo que te puedas imaginar y todo porque por ahi te pudieran dar problemas mas complejos

348
Visual Basic 6.0 e inferiores / Re: Ayuda Con Access!!!!!!!!!
« en: Miércoles 21 de Septiembre de 2005, 18:21 »
primera pregunta:

tienes que ponerlo en la cadena de ceneccion, si tienes un objeto "dim db as adodb.connection"; pones entonces:
Citar
db.connectionstring="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & app.path & "\mydb.mdb;User Id=admin;Password=;"
; supongo que ya sabras como se hace una coneccion, yo no me memorizo aun,  jeje , si la base de datos está en la misma carpeta donde esta tu aplicacion pones app.path para citar la ruta hacia esa carpeta. con respécto a las coneciones hay varias discuciones por el foro,  pero puedes entrar a este link: connectionstrings

segunda pregunta

antes, por si acaso: columnas son verticales, y filas horizontales;
para que le digas en que columna buscar si ya tienes la consulta hecha como esta:

Código: Text
  1.  
  2. Set rcdset = db.execute("select * from mitabla where uno like '" & id & "'")
  3.  
  4.  

entoces cada campo tiene un valor digamos que las columnas se enumeran de 0 hasta n-1, como un matriz

simplemente se te quieres referir a una columna en especial puedes poner asi:

Citar
rcdset("nombredemicolumna")
rcdset(1)'es el indice o la numeracion que te decia y que por cierto depende
             'del  orden en que este en la base de datos
rcdset!nombredelacolumna

tercera pregunta

no te lo voy a adar todo comidito pues no entendi muy bien tu pregunto pero intuyo algo, aun asi si te puedo ayudar en algo

usas la funcion que te di y le dices:
Código: Text
  1.  
  2. cogeme=pideme(text1)
  3.  
  4.  

si lo que quieres es buscar el caracter para decodifocar el mensage haces la siguiente consulta(espero resulte)

Código: Text
  1.  
  2. set rcdset=db.execute("select uno from tabla1 where car1 like '" & text1 & "' xor car2 like '" & text1 & "' xor car3 like '" & text1 & "'")
  3.  
  4.  

349
Visual Basic 6.0 e inferiores / Capturar Solo Ventana Activa
« en: Miércoles 21 de Septiembre de 2005, 17:45 »
ahola amigos, tengo un problema y es urgente, porfa; tengo que capturar la pantalla pero solo de la ventana activa, y no se como hacerlo; no lo quiero con todo y el escritorio, solo quiero la ventana activa; ya probe usando send keys para mandar al teclado ctrl+ alt+ prtsc, pero no responde, probe con el .net, pero existe un problema no puedo hacer DLL's, asi que por ahi vi algo sobre capturar todo el escritorio pero por meido de apis, pero eso no lo puedo aplicar a lo que yo quiero, porfa ayudenme, es urgente. gracias de antemano por su cooperacion

350
Visual Basic 6.0 e inferiores / Re: Ayuda Con Access!!!!!!!!!
« en: Miércoles 21 de Septiembre de 2005, 17:34 »
esta es una solucion:
Código: Text
  1.  
  2. Private Function pideme(id As String) As String
  3. 'suponiendo que la columa 0 de tu tabla es el numero
  4. Randomize (1)
  5.     Do
  6.     n = (Int(Rnd() * 4))
  7.     Loop While n <= 0
  8.     Set rcdset = db.execute("select * from mitabla where uno like '" & id & "'")
  9.     pideme = rcdset(n)
  10. End Function
  11.  
  12.  
a proposito: solo es curiosidad, pues me llamó mucho la atencion tu pregunta, de que se trata tu sistema, claro si no es mucha indiscresion

Páginas: 1 ... 12 13 [14] 15 16 ... 23