• Domingo 22 de Diciembre de 2024, 07:44

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

Páginas: 1 ... 77 78 [79] 80 81 ... 83
1951
Power Builder / Re: Gestor De Bd: Pb Debe Crear Su Propia Bd
« en: Viernes 20 de Octubre de 2006, 05:44 »
Que sentido tiene es?


donde guardarias tus datos?
para tu programa?
quieres crear tablas ?
que caso tiene simular una bd?

1952
Power Builder / Re: Funcion SetFilter
« en: Viernes 20 de Octubre de 2006, 05:33 »
Hola


muy sencillo utiliza la comilla doble...

Código: Text
  1.  
  2.  
  3. String ls_cadena,mi_nombre
  4.  
  5. ls_cadena = "Nombre LIKE "+char(34)+ mi_nombre + "%" + char(34)
  6. dw_1.setfilter(ls_cadena)
  7. dw_1.filter()
  8.  
  9.  
  10.  



Suerte

1953
Visual Basic 6.0 e inferiores / Re: Cuantos Hay De X Campo De La Tabla Sent.sql
« en: Jueves 19 de Octubre de 2006, 20:28 »
:lol:

En definitiva te hace falta leer porque estas 'enfrascado' :P, revisa la consulta que viene en el archivo de access que te envie entra en la vista SQL y revisa los datos de la tabla y fijate que todo concuerda por eso es que no entiendo porque tanto problema :P

esa misma instruccion se la pasas al Data y listo :)


te recomiendo una pagina de donde bajar cursos

http://www.lawebdelprogramador.com/cursos/ (no es competencia es apoyo  :ph34r: )

y la puerta de internet www.google.com

Código: Text
  1. FROM TR_CTRL_VEHIC_KM AS a
  2.  

esa a es un alias que le puse a la tabla para crear la relacion porque era en la misma tabla y diferenciarla


Suerte

1954
Power Builder / Re: Captar Tecla Enter
« en: Jueves 19 de Octubre de 2006, 20:06 »
Hola

Primero que nada tal vez estas desaprovechando el datawidow porque sobre el mismo puedes editar,agregar etc..
pero eso lo iras aprendiendo con la practica.


como bien es sabido Windows es un sistema de mensajes,Te comento que el evento
other es que recibe los mensajes del sistema y de otras apicaciones (comunicacion) para poderlos procesar... pero ese es otro tema

si lo que quieres es procesar por tecla puedes usar el evento keydown o keyup
que no aparecen pero los puedes 'crear'

dale doble clic a las cajas de texto (sle) en donde aparece el evento selecciona new event te da la opcion de crear
le das un nombre y seleccionas en el Event ID pbm_keydown o pbm_keyup y en ese evento puedes programar con los parametros que te va enviar

tambien existe la funcion KeyDown la puedes encontrar en la ayuda de powerbuilder

Saludos

1955
PHP / Re: No Funciona Consulta A Base De Datos
« en: Jueves 19 de Octubre de 2006, 19:40 »
Código: Text
  1.  
  2. $consulta = "select folio_atencion, fecha_llamado, hora_llamado, usuario_atencion, direccion_depto, n_oficina, fono_anexo, problema_descrito, tecnico_asignado, estado_atencion from maestro_atenciones WHERE (estado_atencion <> '$var')
  3. ORDER BY folio_atencion ASC";
  4.  
  5.  


El ORDER BY es despues del WHERE :)


Saludos

1956
Power Builder / Re: Captar Tecla Enter
« en: Jueves 19 de Octubre de 2006, 18:42 »
Hola

si es un datawindow puedes agregar el evento processenter Seleeciona New Event en el datawindow luego le das un nombre por ejemplo ue_enter (User Event) y en el Event ID

pbm_dwnprocessenter y en ese evento programas lo que quieres que ocurra al precionar enter :)


PD. El evento other no es para eso :P

Suerte

1957
PHP / Re: Formatear Variable O Setear Variable
« en: Jueves 19 de Octubre de 2006, 18:37 »
Cita de: "neorent"
mira buscando encontre lo siguiente pero solo lo muestra osea me quedaria esto en la varible mira en ves que sea 1899-12-30 12:20:00 me quedaria asi " 12:20:00" con el espacio en blanco por delante, bueno les dejo la funcion que diseñe no esta perfecta pero si alguien sabe como sacarle los espacios en blanco seria genial
Código: Text
  1.  
  2. <?php
  3. function cambiah_a_normal($hora)
  4. {
  5. $var = $hora;
  6. $valor = strstr($var, ' ');
  7. return $valor;
  8. }
  9. ?>
  10.  
  11.  
y eso gracias a todos
ffff

Código: Text
  1.  
  2. <?php
  3. function cambiah_a_normal($hora)
  4. {
  5. $var = $hora;
  6. $valor = trim(strstr($var, ' '));
  7. return $valor;
  8. }
  9. ?>
  10.  
  11.  

:)

1958
PHP / Re: Formatear Variable O Setear Variable
« en: Jueves 19 de Octubre de 2006, 18:23 »
Hola neorent

Código: Text
  1.  
  2. <?
  3.   $hora="1899-12-30 12:20:00";
  4.   $hora=explode(" ", $hora);
  5.   $hora=sprintf("%s",$hora[1]);
  6.   echo $hora;
  7. ?>
  8.  
  9.  


Esta es una idea Suerte

1959
Visual Basic 6.0 e inferiores / Re: Cuantos Hay De X Campo De La Tabla Sent.sql
« en: Jueves 19 de Octubre de 2006, 17:47 »
Hola

De verdad que yo no le veo problema a eso :P

1- lo que necesitas es contar el total de cada unidad

Código: Text
  1.  
  2. SELECT TR_CTRL_VEHIC_KM.txtuso, Count(TR_CTRL_VEHIC_KM.cond) AS CANT
  3. FROM TR_CTRL_VEHIC_KM
  4. GROUP BY TR_CTRL_VEHIC_KM.txtuso;
  5.  
  6.  


2- Contar cuantas estan tienen Condicion de Activa

Código: Text
  1.  
  2. SELECT TR_CTRL_VEHIC_KM.txtuso, Count(TR_CTRL_VEHIC_KM.cond) AS TALLER
  3. FROM TR_CTRL_VEHIC_KM WHERE TR_CTRL_VEHIC_KM.cond="TALLER" GROUP BY TR_CTRL_VEHIC_KM.txtuso;
  4.  
  5.  


3- Contar cuantas estan tienen Condicion de taller

Código: Text
  1.  
  2. SELECT TR_CTRL_VEHIC_KM.txtuso, Count(TR_CTRL_VEHIC_KM.cond) AS TALLER
  3. FROM TR_CTRL_VEHIC_KM WHERE TR_CTRL_VEHIC_KM.cond="TALLER" GROUP BY TR_CTRL_VEHIC_KM.txtuso;
  4.  
  5.  


4- y Sumar los Kilometros recorridos de cada tipo de unidad
Código: Text
  1.  
  2. SELECT TR_CTRL_VEHIC_KM.txtuso, Sum(TR_CTRL_VEHIC_KM.kmrec) AS KM_REC
  3. FROM TR_CTRL_VEHIC_KM GROUP BY TR_CTRL_VEHIC_KM.txtuso;
  4.  
  5.  

entonces si juntas estas 4 consultas te da

Código: Text
  1.  
  2. SELECT a.txtuso, Count(a.txtuso) AS CANT, (SELECT Count(TR_CTRL_VEHIC_KM.txtuso) FROM TR_CTRL_VEHIC_KM WHERE TR_CTRL_VEHIC_KM.cond="Activa"  AND TR_CTRL_VEHIC_KM.txtuso=a.txtuso) AS ACT, (SELECT Count(TR_CTRL_VEHIC_KM.txtuso) FROM TR_CTRL_VEHIC_KM WHERE TR_CTRL_VEHIC_KM.cond="Taller"  AND TR_CTRL_VEHIC_KM.txtuso=a.txtuso) AS TALLER, (SELECT sum(TR_CTRL_VEHIC_KM.kmact)
  3. FROM TR_CTRL_VEHIC_KM WHERE TR_CTRL_VEHIC_KM.txtuso=a.txtuso) AS KMREC
  4. FROM TR_CTRL_VEHIC_KM AS a
  5. GROUP BY a.txtuso;
  6.  
  7.  

Lo que ocurrio en la tabla que muestras qu te aparecen 11 activas 2 en taller 41780 km es que perdiste la relacion y te esta mostrando el total de activas
sin importarle cual tipo de vehiculos, porque no sabe cual es, por eso las subconsultas llevan

Código: Text
  1.  
  2. WHERE TR_CTRL_VEHIC_KM.txtuso=a.txtuso
  3.  
  4.  

donde a.txtuso es el campo txtuso de la tabla principal, no se si esto te enrede?



Saludos

1960
Visual Basic 6.0 e inferiores / Re: Cuantos Hay De X Campo De La Tabla Sent.sql
« en: Jueves 19 de Octubre de 2006, 07:31 »
Hola UserCode

En excel los datos estan acomodados asi
numero|uso|condicion|km ...etc... esa misma tabla se repite a un costado

lo que hace es que son dos tablas (almenos las que se alcanzan a ver)


pero en la base de datos esto no funciona asi los registros irian hacia abajo en una sola tabla entonces segun veo en la formula

te posicionaste en la celda E42 y te aparece la formula

=SUMA(SI(D7:D32="activa";SI(C7:C32="Autogas";1;0)))
+SUMA(SI(J7:J32="activa";SI(I7:I32="Autogas";1;0)))

En relidad no esta sumando (si pero no :P)

Esta contando...

Esta contando todas las unidades que sean ACTIVAS en el rango D7:D32 (que es la primera tabla la que tiene datos en la columna de condicion)... SI(C7:C32="Autogas";1;0) en esta parte indica  que si es Autogas entonces la CUENTE (devuelve 1+1+1... cuando sea autogas ) si no devuelve 0 entonces no es suma sino incremento osea CONTAR :) donde si hay una suma es en

+SUMA(SI(J7:J32="activa";SI(I7:I32="Autogas";1;0))) esa es una suma pero es una suma de totales porque es la misma formula de la tabla 1 (B7:G32) y la tabla 2 (H7:M32) es decir son el total de activas en las dos tablas... para ese tipo de vehiculo lo cual se debe repetir para cada vehiculo en la tabla de resumen

Haz la prueba agregando en la celda I7 Autogas y en la celda J7 Activa la celda
D42 debe de valer 4 y la E42 3
(esto si los datos siguen segun la imagen)


Si esta teoria es correcta entonces no es suma es conteo y si son conteo y aplicas la sentencia que te envie debe funcionar, yo lo probe es mas te envio una prueba sale

Ademas

Citar
Bueno, yo de excel no sé mucho, calculos básicos, no me habia posicionado en las celdas para ver la formula, pero se ve que además del COUNT, se necesita metersele el SUM para ver si la consulta, arroja las sumas de ACT, TALLER ya que al parecer esas columnas no son COUNT sino SUM.


Sum seria si tuvieras valores numericos, como los kilometros eso si los puedes sumar pero como sumarias ACTIVA+ACTIVA  TALLER+TALLER en relidad es conteo




Suerte

1961
Bases de Datos / Re: Please Ayudenme
« en: Jueves 19 de Octubre de 2006, 07:00 »
Hola

Mira, hay algunos detalles, si el campo del saldo es Numerico (que seria los mas logico :P) no es necesario que le pongas las comillas (')
sino lo es, es necesario que lo hagas porque no es lo mismo ( Saldo >'0' ) que (Saldo > 0) ahora la matriz (FlexGrid) no se llena solo

Necesitas, indicarle las columnas y filas (Cols,Rows) para poder llenarlo como matriz

Ej.
Grid.Rows=10
Grid.Cols=10

tienes un ciclo que necesitas moverte de registro porque si no siempre estas comparando el mismo,
y nunca lo va romper

Código: Text
  1.  
  2. While .Recordset!SALDO > 0 And .Recordset!VENCIMIENTO > Date And Not .Recordset.EOF
  3.     X = X + 1
  4.     GRDOTRO.TextMatrix(X, 0) = .Recordset!MES
  5.     GRDOTRO.TextMatrix(X, 1) = .Recordset!SALDO
  6.     .Recordset.MoveNext '<---- Moverse al siguiente registro
  7. Wend
  8.  
  9.  


Aqui vuelves a buscar lo mismo Saldo>0 y haces un ciclo que no hace nada solo reescribe en las mismas celdas
4 veces supongo que era algo como GRDOTRO.TextMatrix(1, A) = .Recordset!MES no pusiste la variable

Código: Text
  1.  
  2. Select Case .Recordset!SALDO
  3. Case Is > 0
  4.     For A = 1 To 4
  5.         GRDOTRO.TextMatrix(1, 0) = .Recordset!MES  '<--------- La misma celda en todas las iteraciones
  6.         GRDOTRO.TextMatrix(1, 1) = .Recordset!SALDO'<--------
  7.     Next A
  8. End Select
  9.  
  10.  

Lo que opino es que no es necesario, llenar el grid en forma de matriz si el resultado (SQL) ya te devolveria la información
solicitada, Bastaria con colocar en la propiedad DataSourece de FlexGrid el Data, ¿no creees? (o tal vez satisface lo requerido) :ph34r:

1962
C++ Builder / Re: Una Preguntita...
« en: Miércoles 18 de Octubre de 2006, 06:46 »
Cita de: "Solman"
mmm buen dato pero como hago para tener acceso al servidor mmm.
q necesitaria??.
La IP?? q mas el host?? 
y mira pero cuando io bajo una pagina de internet ,algunas despues de bajarlas funcionan normalmente porq ha?? y otras no corren como q pareciera q despues de bajarlas ya son inutilizables en internet, es decir tengo q entrar nuevamente a la pagina para que funcione.


1- Pues necesitas un usuario y una contraseña valido ;)
2- Es que pueden ser paginas (del lado del servidor) que al estar en tu maquina pierden cierta funcionalidad porque quedan guardadas como paginas estaticas (no-utiles :)), a veces tambien son funciones que estan en archivos externos a la pagina, y que no se descargan junto con ella( se suponene que lo hacen pero...ya ves) como scripts , u hojas de estilo y la pagina pierde toda su apariencia y funcionalidad


Si quieres llenar quieres llenar un formulario automaticamente hay programas como
RoboForm pero ya no son tan buenos estos metodos por que existen otros para evitarlos (CAPTCHA) o si el form esta en flash  :scream:


Saludos

1963
C++ Builder / Re: Una Preguntita...
« en: Miércoles 18 de Octubre de 2006, 04:03 »
Hola

quieres modificar una pagina asi nomas?
como si entraras a tu maquina y modificar un archivo?

si no tienes acceso a los archivos del servidor no sera esto posible, de nada te serviria modificar una pagina de manera local ya que no la vas a poder actualizar en el servidor si no tienes acceso a él

sino que sentido tendrian tanta seguridad que se ha 'inventado'???  :huh:


Si tienes el acceso, bien pudieras bajar el archivo modificarlo, y despues volverlo a subir por ejemplo por FTP para 'actualizar' la pagina

Existen APIs como

InternetConnect
InternetOpen
InternetOpenUrl
InternetReadFile
etc..

hay algunas otras...:)


Tambien con java????


Saludos

1964
Visual Basic 6.0 e inferiores / Re: Cuantos Hay De X Campo De La Tabla Sent.sql
« en: Miércoles 18 de Octubre de 2006, 02:57 »
Parece que ya entendi :P


el excel no tiene nada que ver... solo es la informacion final que quieres lograr pero ya todo esta en access... ¿o no? :unsure:


segun veo en el consentrado de abajo solo muestra la cantidad de vehiculos de cada tipo (count que ya hiciste) ahora la segunda columna cuanta las unidades activas de cada 'uso', luego cuanta cuales estan en taller, y la suma de los km recorridos estoy bien?


bueno puedes hacer ....

Citar
con estos campos la probe

tabla
------------------
txtuso
cond
kmrec



Código: Text
  1.  
  2. SELECT a.txtuso, Count(a.txtuso) AS CANT, (SELECT Count(TR_CTRL_VEHIC_KM.txtuso) FROM TR_CTRL_VEHIC_KM WHERE TR_CTRL_VEHIC_KM.cond="Activa"  AND TR_CTRL_VEHIC_KM.txtuso=a.txtuso) AS ACT, (SELECT Count(TR_CTRL_VEHIC_KM.txtuso) FROM TR_CTRL_VEHIC_KM WHERE TR_CTRL_VEHIC_KM.cond="Taller"  AND TR_CTRL_VEHIC_KM.txtuso=a.txtuso) AS TALLER, (SELECT sum(TR_CTRL_VEHIC_KM.kmrec) FROM TR_CTRL_VEHIC_KM WHERE TR_CTRL_VEHIC_KM.txtuso=a.txtuso) AS KMREC
  3. FROM TR_CTRL_VEHIC_KM AS a
  4. GROUP BY a.txtuso;
  5.  
  6.  

que es una consulta con tres subconsultas para contar las dos condiciones (Activa y Taller, y poder sumar los kms :) )


Espero que te sirva de algo


Suerte!

1965
Visual Basic 6.0 e inferiores / Re: Cuantos Hay De X Campo De La Tabla Sent.sql
« en: Miércoles 18 de Octubre de 2006, 01:09 »
Cita de: "UserCode"
La grilla me muestra o me arroja una sola columna con esto:
Código: Text
  1.  
  2.     Data1.RecordSource = "Select Count(TxtUso) From TR_CTRL_VEHIC_KM Where " & _
  3.                          "TxtUso = 'AUTOGAS' and TxtUso = 'AVANCE' and TxtUso = 'DOMICILIO' and " & _
  4.                          "TxtUso = 'FLETERO' and TxtUso = 'MIXTAS'"
  5.  
  6.  

Como le haria para que me mostrara la grilla con las 5 columnas de dato :(
sé que es solo un comienzo, pero es para ver si es posible o no formar tal consulta.
para usar funciones agregadas de SQL (count,sum,max etc..)  nesecitas agrupar... por ejemplo:


"Select Count(TxtUso),condicion,kim_ant,km_act From TR_CTRL_VEHIC_KM Goup by TxtUso"


que es lo que deseas mostrar?


:)

1966
PHP / Re: Valor De Un Combo
« en: Martes 17 de Octubre de 2006, 18:34 »
Hola si lo que quieres es saber el valor selecionado es... (aplicando tambien lo que dice ibito)


ejemplo:

Código: Text
  1.  
  2. <html>
  3.  
  4. <script>
  5.  
  6. function mensaje()
  7. {
  8.   alert(document.forms['frmregistro'].combo.options[document.forms['frmregistro'].combo.selectedIndex].value);
  9. }
  10.  
  11. </script>
  12.  
  13. <form name='frmregistro'>
  14.  
  15.   <select name='combo'>
  16.     <option value='1'>Opcion 1</option>
  17.     <option value='2'>Opcion 2</option>
  18.     <option value='3'>Opcion 3</option>
  19.   </select>
  20.  
  21.   <input type='button' onclick='mensaje()' value='Mensaje'>
  22. </form>
  23.  
  24.  
  25. </html>
  26.  
  27.  
  28.  

para enviarlo y recibirlo ya esta dicho :)

Cita de: "ibito"
El tag <SELECT> tiene un atributo llamado "NAME", por ejemplo:
Código: Text
  1.  
  2. &#60;SELECT NAME=&#34;combo&#34;&#62;
  3. &#60;/SELECT&#62;
  4.  
  5.  

Código: Text
  1.  
  2. &#60;?php
  3.    echo &#34;Valor del combo: &#34;.&#036;_POST['combo'];
  4. ?&#62;
  5.  
  6.  


Suerte!

1967
Visual Basic 6.0 e inferiores / Re: Cronometro
« en: Martes 17 de Octubre de 2006, 10:28 »
Cita de: "seether"
Hola muchachos que tal, bueno necesito que me saquen de un problema que tengo.

Tengo 3 cronometro de formato "hh:mm:ss",  hechos en Visual Basic,y el problema es el siguiente, que cuando inicio el primer cronometro, esta todo OK, y cuando inicio el segundo cronometro se vuelve a 1, junto con el primero. ya no se que hacer.

Porfavor chicos ayudenme

 :comp:


jijiji, Parece que me equivoque de foro :o
que se vuelve 1?

a ver tú código

1968
Java / Re: Acceso A Conexion Remota De Mysql Con Java
« en: Martes 17 de Octubre de 2006, 10:19 »
y estas seguro que tienes acceso remoto al servidor?


yo creo que no....  :unsure:

1969
Power Builder / Re: Iif En Power Builder
« en: Martes 17 de Octubre de 2006, 08:58 »
//algo asi

any iif (boolean condicion, any verdadero, any falso);
if condicion then
   return verdadero   
else
   return falso   
end if
end function

//

ls_resultado=iif(num>2,'verdadero','falso')


Si aun no lo hayas!!


Suerte

1970
Power Builder / Re: Barra De Estado
« en: Martes 17 de Octubre de 2006, 08:38 »
Yo le hago asi, (no soy un experto pero tal vez te pueda ayudar)


Con una etiqueta (Static Text)

En el evento resize de la ventana.....


es decir ajustas la etiqueta como si fuera la status bar, puedesponer mas etiquetas sacando proporciones :)

st_barra.text="Usuario:F_Tanori"


Código: Text
  1.  
  2. [Power Script]
  3. st_barra.x=0
  4. st_barra.y=(newheight - st_barra.height)
  5. st_barra.width=(newwidth - 20 )
  6.  
  7.  

tal vez alguien sepa alguna mejor  :(   :comp:

Suerte espero que te ayude! :)

1971
JavaScript / Re: Ocultar y Mostrar Tag
« en: Martes 17 de Octubre de 2006, 06:30 »
Cita de: "ArKaNtOs"
a ver que pasa jejejje
[dohtml]<marquee>hola esto es una prueba :P</marquee>[/dohtml] jejejejeje esto parece un juego :P va una mas avanzada haber si sale jejeje

[dohtml]<marquee direction='up' onmouseover='stop();' onmouseout='start();'><div>hola esto es una prueba :P<div>
<div>de como<div>
<div>usar<div>
<div>dohtml jejejeje<div></marquee>[/dohtml]
por lo visto no funciono :( creo q me van a borrar esto jejejeje
esto esta truqueado  :angry:



[dohtml]<marquee>Truqueado!!!</marquee>[/dohtml]
[dohtml]<marquee>Truqueado!!!</marquee>[/dohtml]
[dohtml]<marquee>Truqueado!!!</marquee>[/dohtml]


ami no me funciona  :(

Citar
yo he visto que si te sale geobeid he igual a F_Tanori ya probaron con firefox?

yo estoy usando firefox, y en ie tampoco funcionan ademas a ti si te funcionan y a  geobeid y a mi no :(

1972
JavaScript / Re: Ocultar y Mostrar Tag
« en: Martes 17 de Octubre de 2006, 06:29 »
Cita de: "ArKaNtOs"
a ver que pasa jejejje
[dohtml]<marquee>hola esto es una prueba :P</marquee>[/dohtml]

[dohtml]<marquee><blink>yeah!!!!    :kicking:</blink></marquee>[/dohtml]


yo lo puse citar y Olman no tenia los  dohtml 's  :S

1973
JavaScript / Re: Ocultar y Mostrar Tag
« en: Martes 17 de Octubre de 2006, 05:53 »
Cita de: "Olman"
Buenas,

tengo el siguiente codigo funcionando en ie y ocupo echarlo andar en netscape:

<div id="bloque1">
Texto1
</div>
<input type="button" value="Ocultar Texto" onClick="window.bloque1.style.display='none'">

pero no me trabaja, alguien me puede indicar como debo de escribirlo correctamente para que me funcione en los 2 exploradores.

Muchas Gracias.
quitale window

Código: Text
  1.  
  2. &#60;input type=&#34;button&#34; value=&#34;Ocultar Texto&#34; onClick=&#34;bloque1.style.display='none'&#34;&#62;
  3.  
  4.  

Suerte!

<marquee><blink>aver  &lt;_&lt; </blink></marquee>

que no se supone que los mensajes no aceptan codigo html???????????????
[/size] :blink:

1974
PHP / Re: Problema, Con Solucion Invisible
« en: Martes 17 de Octubre de 2006, 05:37 »
Cita de: "clausher"
Es como tener un indice en una pagina web que muestre los diferentes titulos de una tabla ...  :blink:

A ver si capte

Por ejemplo

pag1.php
---------------------------
1- Articulos  <--- links
2- Clientes
3- Empleados
--------------------------

que al darle click al link te abra la pagina de captura (formulario)????

la pagina indice (pag1.php)

Código: Text
  1.  
  2. &#60;?
  3. &#036;bd=&#34;catalogos&#34;;
  4. &#036;host=&#34;localhost&#34;;
  5. &#036;user=&#34;php&#34;;
  6. &#036;password=&#34;elpassword&#34;;
  7.  
  8. &#036;Conexion = mysql_connect(&#036;host,&#036;user,&#036;password);
  9. mysql_select_db(&#036;bd, &#036;Conexion);
  10.  
  11. &#036;query=&#34;SELECT * FROM tblcatalogos&#34;;
  12. &#036;resultado =mysql_db_query(&#036;bd,&#036;query);
  13.  
  14. &#036;row=mysql_fetch_row(&#036;resultado);
  15.  
  16. echo &#34;&#60;table align=&#092;&#34;center&#092;&#34; cellpading=0 cellspacing=0&#62;&#092;n&#34;;
  17. while(&#036;row=mysql_fetch_row(&#036;resultado))
  18.   {  &#036;num++;
  19.     echo &#34;&#60;tr&#62;&#60;td&#62;&#60;!-- &#036;num --&#62;&#60;li&#62;&#60;/td&#62;&#60;td&#62;&#60;a href=&#092;&#34;captura.php?tabla=&#036;row[1]&#092;&#34;&#62;&#036;row[1]&#60;/a&#62;&#60;/td&#62;&#60;/tr&#62;&#092;n&#34;;
  20.   }
  21. echo &#34;&#60;/table&#62;&#34;;
  22. ?&#62;
  23.  
  24.  


La de captura... (captura.php)
Código: Text
  1.  
  2. &#60;html&#62;
  3. &#60;?
  4. &#036;tabla=&#036;_GET['tabla'];
  5. ?&#62;
  6.  
  7. &#60;head&#62;&#60;title&#62;&#60;? echo &#036;tabla;?&#62;&#60;/title&#62;&#60;/head&#62;
  8. &#60;form action=&#34;guardar.php&#34; Method=&#34;POST&#34;&#62;
  9.  
  10. &#60;table align=&#34;center&#34; cellspacing=0 cellpadding=0 width=45% border=0&#62;
  11.  
  12.     &#60;?
  13.       echo &#34;&#60;tr&#62;&#60;td colspan=2 bgcolor='gray'&#62;&#60;center&#62;&#60;strong&#62;&#036;tabla&#60;/strong&#62;&#60;/center&#62;&#60;/td&#62;&#60;/tr&#62;&#34;;
  14.       echo &#34;&#60;tr&#62;&#60;td colspan=2&#62; &#60;/td&#62;&#60;/tr&#62;&#34;;
  15.       echo &#34;&#60;tr&#62;&#60;td&#62;Codigo:&#60;/td&#62;&#60;td&#62;&#60;input type=&#092;&#34;text&#092;&#34; name=&#092;&#34;codigo&#092;&#34;&#62;&#60;/td&#62;&#60;/tr&#62;&#34;;
  16.       echo &#34;&#60;tr&#62;&#60;td&#62;Nombre:&#60;/td&#62;&#60;td&#62;&#60;input type=&#092;&#34;text&#092;&#34; name=&#092;&#34;nombre&#092;&#34;&#62;&#60;/td&#62;&#60;/tr&#62;&#34;;
  17.       echo &#34;&#60;tr&#62;&#60;td&#62;Precio:&#60;/td&#62;&#60;td&#62;&#60;input type=&#092;&#34;text&#092;&#34; name=&#092;&#34;precio&#092;&#34;&#62;&#60;/td&#62;&#60;/tr&#62;&#34;;
  18.       echo &#34;&#60;tr&#62;&#60;td&#62;Existencia:&#60;/td&#62;&#60;td&#62;&#60;input type=&#092;&#34;text&#092;&#34; name=&#092;&#34;existencia&#092;&#34;&#62;&#60;/td&#62;&#60;/tr&#62;&#34;;
  19.       echo &#34;&#60;tr&#62;&#60;td colspan=2&#62;&#60;br&#62;&#60;center&#62;&#60;input type=&#092;&#34;submit&#092;&#34; value=&#092;&#34;Guardar&#092;&#34;&#62; &#60;input type=&#092;&#34;reset&#092;&#34; value=&#092;&#34;Limpiar&#092;&#34;&#62;&#60;/center&#62;&#60;/td&#62;&#60;/tr&#62;&#34;;
  20.     ?&#62;
  21.  
  22. &#60;/table&#62;
  23.  
  24. &#60;/html&#62;
  25.  
  26.  
  27.  


es algo asi?
Quieres usar el mismo formulario para cualquier tabla?
mira lee esto tal vez algo te pueda ayudar.....

http://foros.solocodigo.com/index.php?showtopic=24600

Suerte!

1975
Visual Basic para principiantes / Re: Necesito Un Codigo??
« en: Martes 17 de Octubre de 2006, 03:55 »
Cita de: "shakka"
Ahora que mencionas ADO, te refieres al motor Access Data Object?, porque con lo que dices no se donde lo iras a utilizar. 

ADO no es un motor de base de datos  es un metodo de acceso a datos (ActiveX Data Objects)
el motor de la base de datos es por ejemplo para access  Microsoft Jet para
MySQL MyIsam,InnoDB etc...


Cita de: "Klausja"


En Primer lugar es parte de 1 sistema del cual me pidieron ayuda, en segundo lugar se mas o menos como se hace solo que tengo dudas bajo que conceptos debo hacerlo si debo atener activo el "ADO" o alguna otra herramienta lo que mas me va a costar es hacer la parte de las probabilidades.

asi que porfa no es necesario que me regañenen que ya estoy bastante biejo para eso.

y es verdad para tu 'duda' no parece como un sistema parece un programilla :P como una practica escolar, y si ya estas bastante 'biejo' como dices deberias saber que 'biejo' se escribe con V :P y no necesitas ADO para nada en lo que quieres hacer....

mira solo necesitas

3 textbox
1 timer
2 botones (Inicio,Parar)

ahora el control timer tiene una propiedad que se llama Interval (Intervalo cada cuanto se ejecuta en milisegundos)

Código: Text
  1.  
  2. Private Sub cmdDetener_Click()
  3.     Me.Timer1.Enabled = False
  4. End Sub
  5.  
  6. Private Sub cmdIniciar_Click()
  7.     Me.Timer1.Enabled = True
  8. End Sub
  9.  
  10. Private Sub Form_Load()
  11.     Me.Timer1.Interval = 60
  12.     Me.Timer1.Enabled = False
  13. End Sub
  14.  
  15. Private Sub Timer1_Timer()
  16. Dim li_Hasta As Integer
  17.  
  18. li_Hasta = 9
  19.  
  20.     Me.Text1 = Int(Rnd * li_Hasta) + 1
  21.     Me.Text2 = Int(Rnd * li_Hasta) + 1
  22.     Me.Text3 = Int(Rnd * li_Hasta) + 1
  23. End Sub
  24.  
  25.  

Eso es pensando en que sea como una maquina de casino como lo menciona shakka

Suerte!


Todo en buena onda, cualquier correccion, en este o en cualquier post mio adelante estamos para aprender y compartir :)

Páginas: 1 ... 77 78 [79] 80 81 ... 83