|||||||Cargando

Disponibilidad de usuarios en PHP

irodriguezm — Sun, 25 Dec 2011 23:37:18 +0000

Hola amigos, tengo un video donde se ve lo que se puede realizar con php ajax para comprobar la existencia de un usuario, ahora vamos a explicar en detalle como hacerlo, primero el video

Nota: este codigo lo encontre en internet, le modifique algunos puntos, asi que va el credito a quien realizo gran parte de este codigo.
vamos a lo nuestro, primero creamos una tabla en nuestra base de datos con nombre usuarios y dos campos id y usuario tenemos nuestro formulario.php con un campo tipo text y nombre txt_username, este es la pag. donde se muestra al usuario el campo a ingresar y donde se obtiene la respuesta si el nombre de usuario esta disponible o no, el cod. completo seria:











   
  
    
    Usuario:

Podemos observar que se agregar un archivo javascript y que además se asigna mediante css un color cuando esta ok y otro cuando hay error (verde y rojo en nuestro caso)

primero hacemos la conexion a nuestra base de datos, dejo el ejemplo y los datos que deberian modificar conexion.php

ahora veremos el codig. del archivo comprobarUser.php, este archivo es el que se conecta a nuestra base de datos y comprueba la existencia o no del usuario mostrando un msje en cada caso

Nombre de usuario disponible';
}
else{
	echo 'Nombre de usuario Ocupado';
}
?>

ahora creamos el directorio javascript, con el archivo ajaxformulario.js

function getXMLHttpRequest(){
	var xmlhttp=false;
	try {
		xmlhttp = new ActiveXObject("Msxml2.XMLHTTP");
	} catch (e) {
		try {
		   xmlhttp = new ActiveXObject("Microsoft.XMLHTTP");
		} catch (E) {
			xmlhttp = false;
  		}
	}

	if (!xmlhttp && typeof XMLHttpRequest!='undefined') {
		xmlhttp = new XMLHttpRequest();
	}
	return xmlhttp;
}

function TraerPagina(datos,contenedor){
	divResultado = document.getElementById(contenedor);
	ajax=getXMLHttpRequest();
	ajax.open("GET", datos);
	ajax.onreadystatechange=function(){
	if(ajax.readyState==1)
		{divLoader.innerHTML='



Cargando...'}
		else{
			if(ajax.readyState==4){divResultado.innerHTML=ajax.responseText;divLoader.innerHTML=''}
			}
		}
	ajax.send(null)
}

function ComprobarUsuario(datos,contenedor){
	divResultado = document.getElementById(contenedor);
	
	username_=document.myform.txt_username.value;
	
	ajax=getXMLHttpRequest();
	ajax.open("POST", datos);
	ajax.onreadystatechange=function(){
	if(ajax.readyState==1)
		{divResultado.innerHTML='



Cargando...'}
		else{
			if(ajax.readyState==4)
			{divResultado.innerHTML=ajax.responseText;}
			}
		}
	ajax.setRequestHeader("Content-Type","application/x-www-form-urlencoded");
	//enviando los valores
	ajax.send("username="+username_);
}

Bueno eso seria, ahora llenen la tabla con algún usuario y prueban que tal funciona

saludos a todos

Consulta campo de fecha (fecha corta) visual basic.net con access

irodriguezm — Wed, 21 Sep 2011 14:35:40 +0000

Buenas amigos, no escribia nada hace bastante tiempo, les traigo un dato bastante interesante y que me hizo estar varias horas tratando de buscar una solución, el problema es el siguiente: necesito ingresar y consultar una base de datos access donde se encuentra una tabla con un campo Fecha/Hora con formato de fecha corta a través de mi sistema creado en visual basic.net.

bueno vamos por paso, agregamos un DateTimePicker, un botón y una DataGridView.
por supuesto que una base de datos access y una tabla con un campo Fecha/Hora

la consulta sería de la sgte forma:

 da = New OleDb.OleDbDataAdapter("SELECT * FROM tutabla WHERE AND CDate(fecha) = '" & Format(DateTimePicker1.Value, "dd-MM-yyyy") & "'", conexion)

luego presentamos los datos en nuestra grilla

Dim ds As New DataSet
        da.Fill(ds)
        DataGridView1.DataSource = ds.Tables(0)

eso seria amigos, no sin antes agradecer al gran foro Msdn

Encuesta

irodriguezm — Fri, 29 Jul 2011 14:59:39 +0000

View This Poll

Conectar visual.net con access y sql

irodriguezm — Fri, 04 Feb 2011 13:27:06 +0000

Hola amigos, hace un tiempo atrás les comente la forma de conectarnos desde visual.net a una base de datos mysql, bueno hoy traigo dos tipos de conexion a sql y a access

primero sql, agregamos lo siguiente
Imports System.Data.SqlClient
declaramos myConn

Private myConn As SqlConnection

Código:

      	
        myConn = New SqlConnection("Data Source=SERVIDOR;Initial Catalog=BD;User ID=USUARIO;Password=PASS")

Access, agregamos lo siguiente
Imports System.Data.OleDb

declaramos
Private myConn As OleDbConnection

 myConn = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=ruta de base de datos; User Id=;Password=;")

saludos

Email desde VB.Net

irodriguezm — Fri, 21 Jan 2011 19:07:40 +0000

Hola amigos, hoy traigo algo sumamente necesario para cualquier programador, busque mucha información en internet y este codigo fue el que se me funciono de mejor forma.
bueno lo primero es crear un nuevo form, agregamos 2 textbox (TextAsunto y TextPara), 1 RichTextBox1, RadioButton1, RadioButton2, RadioButton3 (q aunque no es necesario, servira para ver la funcionalidad de prioridad) y obviamente un botón.
agregamos
la referencia a System.web

y ponemos en nuestro codigo

Imports System.Net.Mail
Dim miCorreo As New System.Net.Mail.MailMessage

el codigo para el botón:

Private Sub BtnEnviaEmail_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnEnviaEmail.Click
        If Me.TextAsunto.Text = "" Then
            MsgBox("Ingrese el asunto")
        ElseIf Me.TextPara.Text = "" Then
            MsgBox("Ingrese un destinatario")
        ElseIf Me.RichTextBox1.Text = "" Then
            MsgBox("Ingrese un Mensaje")
        Else

            Dim correo As New MailMessage
            correo.From = New MailAddress(Me.TextDe.Text)
            correo.To.Add(Me.TextPara.Text)
            'Asunto
            correo.Subject = Me.TextAsunto.Text


            If Me.RadioButton1.Checked = True Then
                correo.Priority = MailPriority.High
            ElseIf Me.RadioButton2.Checked = True Then
                correo.Priority = MailPriority.Normal
            ElseIf Me.RadioButton3.Checked = True Then
                correo.Priority = MailPriority.Low

            End If


            'Cuerpo del correo
            If Me.CheckBox1.Checked = True Then
                correo.Body = Me.RichTextBox1.Text & vbCrLf & "" & vbCrLf & "Tu nombre" & vbCrLf & "Tu Institución" & vbCrLf & "Tu Fono"
            Else
                correo.Body = Me.RichTextBox1.Text
            End If

            'Mostrar como HTML
            correo.IsBodyHtml = False
            'Prioridad de el correo
            correo.Priority = MailPriority.Normal
            'acto seguido le indicamos cual servidor utilizaremos
            'aquì usaremos por default a gmail y su puerto SMTP
            'pero en una futura entrega les mostraré como hacerlo
            'cn cualquier servidor

            Dim smtp As New SmtpClient()

            smtp.Host = "xxx.xxx.x.x"
            ' puerto de correo 25
            smtp.Port = 25
            smtp.Credentials = New System.Net.NetworkCredential("xxxxxx", "xxxxx")
            smtp.EnableSsl = False
            Try


                'listo tenemos la estructura de nuestro mensaje armada ahora enviemosla a nuestro destinatario y listo
                smtp.Send(correo)
                MsgBox("Mensaje enviado satisfactoriamente")

               
                Me.Close()

            Catch ex As Exception

                MsgBox("ERROR: " & ex.Message)

            End Try
        End If
    End Sub

algunas a considerar: el puerto, el host y las credenciales (usuario y password)

y eso seria saludos

Funciones de comparación en php

irodriguezm — Thu, 23 Dec 2010 17:51:31 +0000

Hola amigos aca escribiendo nuevamente, estoy leyendo un manual bastante interesante sobre php y han aparacido bastante tips, que poco a poco voy a ir compartiendo.

function similar_text() Básicamente lo que hace esta función es comparar dos string y devuelve el número de caracteres iguales.

function levenshtein() esta función devuelve el número de caracteres que hay que sustituir, insertar o borrar, para igualar los dos string.

function strlen() esta función nos muestra el número de carateres de un string.

str_word_count() esta función nos muestra el número de palabras.

Salidas de los ejemplos:

function similar_text(): 3
function levenshtein(): 1
function strlen(): 7
str_word_count(): 2

Saludos

Capacitación y entrenamientos Elearning de tecnologías Microsoft

irodriguezm — Tue, 23 Nov 2010 18:27:10 +0000

Hace un tiempo les hable de una excelente forma de poder acceder a excelente material y probar nuestro conocimiento en Microsoft Virtual Academy MVA, bueno hoy les voy a hablar de tres nuevas posibilidades ojala les ayuden tanto como a mi:

1.- Microsoft Learning: http://www.microsoft.com/learning/en/us/default.aspx (Ahí hay montón de entrenamientos, gratuitos y pagados. Libros y cursos)

2.- PLC: Partner Learning Center: https://partner.microsoft.com/chile/40056112 (Aquí hay mucho material gratuito, pero para acceder a ello, deben inscribirse al sitio de Microsoft en www.microsoftcom/chile/socios. La mayoría es gratuito y pueden filtrar según lo que necesiten.)

3. MPN: Microsoft Partner Network: https://partner.microsoft.com/chile/formacioneventos
Acá encuentran el resumen de los entrenamientos y otros temas específicos

ojala les sirva, saludos

Descarga Internet Explorer 9, Personaliza tu sitio y gana

irodriguezm — Thu, 18 Nov 2010 23:31:21 +0000

Se acerca las fiestas de pascua y nunca es malo un regalito, menos una Xbox 360 Arcade Slim. Por esta razón les traigo esta información.

las bases del concuro: aca
para descargar IE9: aca
ver todas las opciones de perzonalización: aca

Concurso solo para el territorio chileno y para mayores de 18 años

Saludos

Detectar web o dispositivo móvil utilizando PHP o ASP

irodriguezm — Sun, 14 Nov 2010 20:18:59 +0000

Cada día son más las personas que ocupan su celular, PDA, Smartphone, etc. para ingresar a internet, una de las dificultades que se presenta cuando se ingresa desde un dispositivo movil es la resolución de las páginas, o el excesivo tiempo de carga. es por eso que siempre me he preguntado ¿como algunos sitios detectan si uno ingresa a traves de un pc o de un celular/PDA?.
Bueno la respuesta la encontre en Ribosomatic donde existe un muy buen codigo en PHP (lo probe y funciona al 100%) y otro en asp (no lo he probado), asi que espero que les sirva saludos

Conectar Visual basic.net con Mysql

irodriguezm — Tue, 09 Nov 2010 15:17:30 +0000

Estoy metido en un proyecto con visual.net y mysql y voy a compartir con ustedes la forma de conectarnos a la base de datos en este caso mysql
suponiendo que ya tenemos creado nuestra base de datos en mysql, descargamos el conector desde este enlace, descargamos la versión que más se ajuste a nuestro equipo. lo intalamos y nos vamos a nuestro proyecto en visual studio, y agregamos el siguiente codigo, teniendo claro que tenemos que agregar la referencia a mysql.data

Imports MySql.Data.MySqlClient
Public Class FormCliente
    Dim con As MySqlConnection
    Private Sub FormCliente_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        con = New MySqlConnection()
        con.ConnectionString = "server= localhost; database= dbprueba; user id= root; password= tupass "
                Me.ComboBox1.Enabled = False
        Try
            con.Open()
            'MessageBox.Show("Conexión Abierta Con Éxito")
            con.Close()
        Catch mierror As MySqlException
            MessageBox.Show("Error de Conexión a la Base de Datos: " & mierror.Message)
        Finally
            con.Dispose()
        End Try
    End Sub