|
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 ... 80 81 [82] 83
2026
« en: Miércoles 4 de Octubre de 2006, 05:23 »
Hola segun yo entiendo lo que quieres es agrupar? mayra lllll 1 2 1 lllll 1 2 1 lllll 1 2 1 lllll 1 2 1 lllll 1 2 1 pedro 55 55 5 5 Sergio mmm 1 1 1 ppp 1 1 1 aaqaa 1 2 2 . . . . n <? $bd="basedatos"; $host="localhost"; $user="php"; $password="passwordPHP"; $Conexion = mysql_connect($host,$user,$password); mysql_select_db($bd, $Conexion); ?> <table border=0 cellpadding=0 cellspacing=0> <? $query="SELECT nombre FROM tblusuarios GROUP BY nombre"; $resultado =mysql_db_query($bd,$query); while($row=mysql_fetch_row($resultado)) {$nombre=$row[0]; echo "<tr><td colspan=2 ><strong><font color=\"Blue\">$nombre</font></strong></td></tr>"; $query2="SELECT actividad, reporte, horas, total FROM tbl WHERE nombre ='$nombre'"; $resultado2 =mysql_db_query($bd,$query2); $reg=0; while($row=mysql_fetch_row($resultado2)) {$reg++; echo "<tr><td> </td><td> </td><td><font color=\"red\">$row[0] $row[1] $row[2] $row[3]</font></td></tr>"; } } ?> </table>
a ver si eso te sirve de algo!! Saludos P.D. No se dice HAYGA mucho menos se escribe se dice HAYA
2027
« en: Miércoles 4 de Octubre de 2006, 04:30 »
hola
quieres saber como tomar el valor de la suma?
<? $conn=mysql_connect('localhost','maincln_ammje','6969') mysql_select_db('maincln_ammje',$conn)
$query="SELECT sum(abono) FROM abonos GROUP BY id_cliente"; $res=mysql_query($query) $registro=mysql_fetch_row($res)
echo "el resultado de la suma es:$registro[0]";
?>
Saludos espero que eso te sirva
2028
« en: Lunes 2 de Octubre de 2006, 09:28 »
Hola ya probaste instalando el Runtime de VB con SP? VB60sp6
2029
« en: Lunes 2 de Octubre de 2006, 04:26 »
2030
« en: Domingo 1 de Octubre de 2006, 08:03 »
Definitivamente de acuerdo .... todo depende del usuario pero en preferencia personal Firefox Gracias. Nos estamos Leyendo!
2031
« en: Domingo 1 de Octubre de 2006, 07:56 »
Tengo Windows XP Pro.
Quité la pantalla de bienvenida y arreglé algunas cosas en mi cuenta para poder entrar directamente al sistema. El único problema es que cuando apreto Ctrl+Alt+Supr no se abre el Task Manager, me aparece una ventana (Windows Security) con unas 6 opciones: Lock Computer, Log Off, Change Password, Task Manager, Cancel, Shutdown.
¿Cómo quito eso? Es la unica cuenta del sistema? quieres que entre directamente tu cuenta segun dices puedes hacer esto... Abre el registro de Windows(Regedit) y ve hasta HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\WindowsNT\CurrentVersion\Winlogon ahi creas (si no existen) un nuevo los valores Alfanumerico AutoAdminLogon=1 DefaultUserName=elusuario DefaultPassword=lacontraseña y dejas activada la molestosa pantalla de bienvenida , con eso ya no se mostrara y te dajara entrar a l administrador de tareas Con ALT+CTRL+DEL tambien funciona SHIFT+CTRL+ESC Con eso entra directo a una cuenta en Windows XP Profesional Espero que te sierva de algo.. Suerte,Saludos!
2032
« en: Sábado 30 de Septiembre de 2006, 22:08 »
Hola odbc_connect("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" . str_replace("/", "\\", $_SERVER["DOCUMENT_ROOT"]) . "\_database\dbname.mdb", "", "") Fuente...Suerte,Saludos!
2033
« en: Sábado 30 de Septiembre de 2006, 00:42 »
2034
« en: Sábado 30 de Septiembre de 2006, 00:23 »
Hola Si todo esta correcto con las consultas y
segun se ve en esta parte del codigo..... ....
//Insertamos el articulo al carrito $query="INSERT INTO carrito VALUES('$_GET[codigo]','$nombre','$precio','$cantidad','$importe')"; $result=mysql_query($query,$conexion);
'$_GET[codigo]' <---- deberias de especificar el nombre del variable $_GET['codigo'] y con comillas sencillas y al mismo tiempo colocarlo entre comillas '$_GET['codigo']' lo cual genera una "confusion" con cual comilla cierra a cual....
$query="INSERT INTO carrito VALUES(\'$_GET['codigo']\','$nombre','$precio','$cantidad','$importe')";
Me parece que ese es el error.. ademas me preguntaba si ya tienes el codigo del articulo en una variable ($codigo) porque la tomas de nuevo ($_GET[])?
porque no hacer esto... ¿?
$query="INSERT INTO carrito VALUES('$codigo','$nombre','$precio','$cantidad','$importe')";
** y que el número de campos que espera la tabla se igual a el número de valores que le envias y en la misma posición ***
Suerte, Saludos
2035
« en: Viernes 29 de Septiembre de 2006, 09:37 »
Hola Para hacer lo de el evento solo tienes que crear un nuevo evento con el Event ID pbm_mousemove Puedes personalizar un objeto creando uno nuevo apartir de una clase visual y despues utilizarla en tus ventanas, crearle metodos, propiedades etc.. Pero... Para cambiar el color de fondo a un boton no se como se hace ahi si encuentras como publicalo ¿no? Saludos
2036
« en: Viernes 29 de Septiembre de 2006, 08:39 »
Hola mira esta es una manera que yo creo ye puede funcionar lo que quieres... Supongamos... Tabla_Empleados *clave -Nombre -Sueldo -Pueso -Foto (segun entendi lo que guardas en el campo es la ruta de la foto) Ahora creas el data window con los campos de la tabla... seleccionas el campo de la foto (en el DW en diseño) vas a las propiedades y en la pestaña general de estas se encuentra la propiedad "Display as Picture" (Mostrar como imagen ) entonces el DW conviete la ruta en la foto solo la haces del tamaño que quieras y la posisionas donde quieras.... cuando te desplaces dentro del DW Control la imagen cambiara segun el registro si quieres obtener el valor de la foto (Ruta) basta con hacer ls_Ruta_Foto=dw_1.GetItemString(dw_GetRow(),"foto") y asi obtienes el nombre del archivo Si lo que quieres es cambiar la foto solo cambias la ruta... ls_Nueva_Foto="C:\foto.jpg" dw_1.SetItem(dw_1.GetRow(),"foto",ls_Nueva_Foto) Saludos y espero que esto te sea de ayuda
2037
« en: Viernes 29 de Septiembre de 2006, 05:20 »
En mi opinion * Es mejor navegador el Firefox * Es Mejor Antivirus Nod32 * y unos buenos antispyware Spyware Doctor y Spybot Search & Destroy 1.4Aqui hay algunas paginas para escanear tu pc "online" Antivirus en lineaTrend MicroCon respecto a lo de los banners es solo publicidad para que el usuario crea que tiene su maquina alguna "infeccion" y opte por querer eliminarla cuando en realidad te instala mas basura...... Algo para leer Sitio 1Sitio 2Sitio 3Saludos
2038
« en: Viernes 29 de Septiembre de 2006, 04:57 »
Hola Tambien puedes poner la direccion ip en donde va el nombre del servidor yo pienso que si en el servidor todo funciona correctamente *- Debes de revisar que si tienes firewall no este bloqueando los puertos, comunmente el norton hace eso cuando pregunta si deseas permitir o bloquear una aplicacion si por error se da bloquear queda en la "lista negra" y ya no la deja pasar *- Que haya comunicacion de red *- Que el usuario de SQL Server tenga Acceso Remoto (privilegios) /* No he utilizado SQL muy a fondo pero me a pasado eso en algunos otros servidores de BD */ Espero poder ayuda Editado: algo mas que puede ayudar http://www.powerbuilder.org/modules.php?na...order=0&thold=0Saludos
2039
« en: Jueves 28 de Septiembre de 2006, 05:52 »
Hola que tal! Segun veo tienes un error en la insercion a la tabla en donde pasas los valores "VALUES(...." '$cod_area'.'$cod_direccion' <----- en estos dos campos estan separados por un punto en lugar de la coma Espero que eso solucione tu problema la verdad no lei todo el codigo solo en la que dijiste que esa era la del problema y eso es lo que encontre Saludos
2040
« en: Miércoles 27 de Septiembre de 2006, 00:53 »
Revisaste...
La contraseña del usuario sa es correcta?, que este corriendo el servidor SQL Server y que este bien direccionado en el ODBC?
Saludos Mexicali B.C.
2041
« en: Martes 26 de Septiembre de 2006, 07:54 »
Hola esta es mi idea....
'//Un Form con un textbox(Text1) y un CommandButton (Command1) //VB 6
Option Explicit
Private Sub Command1_Click() Dim ls_Original As String, ls_Palabra As String, ls_Palabra_inv As String Dim ls_Mensaje As String
ls_Original = Trim(Me.Text1) ls_Palabra = LCase(Replace(ls_Original, " ", "")) ls_Palabra_inv = StrReverse(ls_Palabra) ls_Mensaje = IIf(ls_Palabra = ls_Palabra_inv, " SI ", " NO ") MsgBox "'" & UCase(ls_Original) & "' " & ls_Mensaje & " es Palindromo"
End Sub
Esa es una idea pero alguien puede tener una mejor espero te sea de ayuda Cualquier correccion Bienvenida!
Saludos Mexicali B.C.
2042
« en: Martes 26 de Septiembre de 2006, 07:02 »
'//Quisiera hacer mi aportacion '//Este código tambien limita a que no se pueda introducir texto que no sea numeros aun a traves del comando pegar (CTRL+V) o click derecho Pegar porque en los demas codigos si lo permite '//Lo aporto a sus concideraciones cualquier correccion bienvenida ! Private Sub Text1_Change() Dim ls_texto As String Dim c As Integer ls_texto = Trim(Me.Text1) For c = 1 To Len(ls_texto) If Not IsNumeric(Mid(ls_texto, c, 1)) Then ls_texto = Mid(ls_texto, 1, Len(ls_texto) - 1) End If Next c Me.Text1 = ls_texto Me.Text1.SelStart = Len(ls_texto) End Sub Saludos Mexicali B.C.
2043
« en: Lunes 25 de Septiembre de 2006, 11:10 »
Esta permitido responder con una direccion web (de algun ejemplo que se encuentre en otra web) y que la web esa a donde se envia al 'usuario' sea un FORO? osea enviarlos a otro foro donde esta una solucion a lo que busca me explico? Gracias por su orientacion y ayuda Saludos Mexicali B.C.
2044
« en: Lunes 25 de Septiembre de 2006, 10:55 »
Hola Tienes Instalado el MySQL ya? http://dev.mysql.com/downloads/mysql/5.0.htmlen esa pagina en la seccion de Conectores descargas el driver ODBC lo instalas y creas el DSN y te conectas como cualquier base de datos Aqui hay un Ejemplo con RDO http://www.elguruprogramador.com.ar/zonas/ver.asp?cod=115aqui hay un ejemplo con ADO espero que sea entendible 'En el Form Private Sub Form_Load() Dim lo_rs as RecordSet Dim ls_ap_pat as String gs_CnnStr = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=localhost;Database=data;USER=sistema;PWD=123456;OPTION=3" set go_Cnn=ConectarBD(gs_CnnStr) if go_Cnn.State>1 then set lo_rs=Consulta("SELECT * FROM t_Nomina ap_pat='"& ls_ap_pat &"'") With lo_rs do while not .EOF MsgBox("Resultado",![nombre]) .MoveNext loop end with else MsgBox("No Hay conexion con la Base de datos") end if End Sub
'============================================================================ 'En Modulo Public go_Cnn as Connection Public gs_CnnStr as String Function ConectarBD(ByVal as_cnnstr As String) As Connection On Error Resume Next Dim lo_cnn As Connection Set lo_cnn = New Connection lo_cnn.Open as_cnnstr lo_cnn.CursorLocation = adUseClient Set ConectarBD = lo_cnn End Function '========================================================================== Function Consulta(as_SQL As String, ByVal ao_cnn As Connection) As Recordset On Error Resume Next Dim lo_rs As Recordset Set lo_rs = New Recordset lo_rs.Open as_SQL, lo_cnn Set Consulta = lo_rs End Function
Otras paginas de utilidad http://www.connectionstrings.com/http://www.elguille.info/vb/bases/ADO/indiceADO.htmhttp://www.google.com/ Saludos Mexicali B.C.
2045
« en: Domingo 24 de Septiembre de 2006, 10:01 »
Si te refieres a la "IP real" ? y quieres que te vean en red? si estas conectado a una red y tu maquina esta como servidor web basta con usar tu direccion ip de red ej. 192.168.1.10 si quieres que "te vean" atraves de internet imagino que utilizas un router, firewall basta con indicarle que tu maquina es servidor web y que todo el trafico solicitado para servicio web (HTTP) lo envia a tu maquina Funciona aunque sea dinamica solo que "estara cambiando " Si solo quieres cambiar el numero de la ip modifica el archivo host http://es.wikipedia.org/wiki/Archivo_Hosts Espero sea de ayuda Saludos Mexicali B.C.
2046
« en: Domingo 24 de Septiembre de 2006, 09:38 »
2047
« en: Domingo 24 de Septiembre de 2006, 09:14 »
Pues en que momento inicias la sesion?
Mira espero que esto te sirva!!!
// Esto es para cerrar la Sesion al Cerrar el Navegador al inicio del archivo ini_set("session.use_only_cookies","1"); ini_set("session.use_trans_sid","0");
//Inicias la sesion PHP si ya hay una la continua session_start();
if ($_SESSION['login']=="SI") { //Si hay una sesion iniciada le permites navegar hacia el carrito header("Location:carrito.php"); } else { //Sino lo envias a iniciar sesion header("Location:login.php"); }
//============================================ //Ejemplo del login.php
<form action="acceso.php" method="POST"> <table border=1 align="center" cellpadding="0" cellspacing="0"> <tr><td colspan=3 background="./img/pane.gif"><strong>Iniciar Sesion</strong></td></tr> <tr> <td><br><table border=0> <tr>
<tr><td rowspan=3 width=25 height=25><img src="./img/imglogin.gif"> </td><td><p class="menu">Usuario:</p></td><td><input type="text" size="30" class="caja1" name="usuario"
onkeypress=validar(event,'numeros',1)></td></tr> <td><p class="menu">Contraseña:</p></td><td><input type="password" size="30" class="caja1" name="pass"></td><tr> <tr><td colspan="3"><br><center><input type="submit" size="10" class="caja1" value="Entrar"> <input type="reset"
size="10" class="caja1" value="Borrar"></center></td></tr> <tr><td colspan=3></td></tr> </table></td></tr> </table> </form>
//===================================================
// Acceso.php //Aqui es donde se inicializan las variables de sesion que vamos a utilizar
<?
$sPwd=$_POST['pass']; $sUsuario=$_POST['usuario'];
$sSQL="SELECT usuario,password,ap_pat,ap_mat,nombre FROM tblalumnos WHERE usuario='$sUsuario'";
$Conexion =mysql_connect("localhost","antonio","12345"); mysql_select_db("dblaselva", $Conexion);
$resultado =mysql_db_query($bd,$query); $row = mysql_fetch_row($resultado);
if ( $sPwd == $row[1]) { $_SESSION['login']="SI"; $_SESSION['usuario'] =$sUsuario; $_SESSION['nombre'] ="$row[3] $row[4] $row[5]";
//Redireccionar echo "<script LANGUAGE=\"javascript\">"; echo "location.href = \"carrito.php\""; echo "</SCRIPT>"; }
else { echo "<script LANGUAGE=\"javascript\">"; echo "location.href = \"errorlogin.php\""; echo "</SCRIPT>"; }
?>
//Para Cerrar Sesion
session_destroy();
Saludos Mexicali B.C.
2048
« en: Sábado 23 de Septiembre de 2006, 09:32 »
Jajaja Viva Mexico!!!! creo que ArKaNtOs tiene razon nadie aqui tiene obligacion de ayudar a nadie, sin embargo se hace lo que se puede, a lo cual uno le invierte tiempo NO PAGADO, (que no es reprochable , aqui se aprende bastante) pero al menos se espera que las personas podamos agradecer la ayuda de otra persona nos brinde que se interesa por nuestro problema.... incluso tal vez del otro lado del planeta.... Saludos Mexicali,B.C.
2049
« en: Miércoles 6 de Septiembre de 2006, 20:06 »
Páginas: 1 ... 80 81 [82] 83
|
|
|