Temas

Hola a todos, estoy haciendo un formulario en php, con un campo de telefono, entonces quiero controlar que en ese campo no se introduzcan caracteres,lo he hecho pero como yo lo he hecho no funciona, aqui lo pego:

Código [Seleccionar] Expandir


for($i=0;$i<=strlen($Telf);$i++)
   if($Telf[$i]<'0' || $Telf[$i]>'9') {
   echo '<script>';
   echo 'alert("El Campo de Telefono no puede contener caracteres")';
   echo '</script>';
   }


Alguien me ayuda?

Muchisimas gracias.
Saludos.

Hola a todos, alguien sabe de algun tutorial de php, donde trate algunos conceptos basicos de como escribir/leer datos en una base de datos mysql??

Espero sus respuestas,saludos.

Hola a todos,veamos, como puedo sumar numeros,tomados a leer un archivo de texto,veamos, al leer un archivo de texto obtengo esto:

501||5||||11||20||0||0||0

(Los || son retornos de carros,intros..)

Como puedo quitar los caracteres || del text?

Como podría sumar todo lo que ahi en el text, tomado del archivo?

Espero sus respuestas,saludos.

Hola a todos.

Como puedo hacer, para que, por ej, en un text1 ponga; leer desde: hola,  y en otro text: hasta luego.


Como puedo hacer para que lea desde la palabra hola, hasta que encuentre la palabra hasta luego?

Espero sus respuestas,saludos.

Espero sus respuestas,gracias.

Hola, queria saber como puedo puedo ir leyendo de un fichero de texto y almacenandolo en un text1 o en otro fichero de texto...

Espero sus respuestas, muchas gracías por adelantado,saludos.

Hola,queria saber como puedo definir variables long en php, espero sus respuestas,gracias.

Hola de nuevo,miren, aqui tienen el codigo que pongo para guardar un archivo con la fecha y hora que esta en el text12, aqui tienen el codigo:

Código [Seleccionar] Expandir

Open "C:\" & Text12.Text & ".txt" For Append As #1
Print #1, "Beneficio día:"
Write #1, Text10.Text & Text11.Text
Close #1
End Sub

No me crea el archivo,alguíen me puede indicar el porqué? saludos, espero sus respuestas.

Hola,queria saber como puedo hacer que aparezca la fecha (añó,mes,día) (hora/minutos/segundos) en un text, que tome el valor del reloj del pc y lo muestre en un text..

Espero sus respuestas,saludos.

Hola, necesito ayuda urgente, queria saber como guardar los cambios de los campos de texto en una base de datos, aqui tienen el codigo:

Código [Seleccionar] Expandir

Private Sub Command1_Click()
If Text1.Text = "" Then
MsgBox "Debe completar todos los campos (;"
Else
If Text1.Text = "+" Then
MsgBox "Introduzca solamente numeros"
Else
If Text2.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text3.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text4.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
a = CLng(Text1.Text) + CLng(Text2.Text) + CLng(Text3.Text) + CLng(Text4.Text)
'Pasamos a integer para poder sumar numeros
Text10.Text = a
End If
End If
End If
End If
End If
End Sub


Private Sub Command2_Click()
If Text5.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text6.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text7.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text8.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
b = CLng(Text5.Text) + CLng(Text6.Text) + CLng(Text7.Text) + CLng(Text8.Text)
Text11.Text = b
End If
End If
End If
End If
End Sub

Private Sub Command3_Click()
c = CLng(Text10.Text) - CLng(Text11.Text)
Text9.Text = c
End Sub

Private Sub Form_Load()
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim d As Integer
Text10.Text = a
Text11.Text = b
End Sub


Espero sus respuestas,gracías.

Hola a todos, bueno, quería saber como puedo hacer para guardar los datos de este programa, (Aquí tienen el codigo) :

Código [Seleccionar] Expandir

Private Sub Command1_Click()
If Text1.Text = "" Then
MsgBox "Debe completar todos los campos (;"
Else
If Text1.Text = "+" Then
MsgBox "Introduzca solamente numeros"
Else
If Text2.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text3.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text4.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
a = CLng(Text1.Text) + CLng(Text2.Text) + CLng(Text3.Text) + CLng(Text4.Text)
'Pasamos a integer para poder sumar numeros
Text10.Text = a
End If
End If
End If
End If
End If
End Sub


Private Sub Command2_Click()
If Text5.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text6.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text7.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
If Text8.Text = "" Then
MsgBox "Debe completar todos los campos"
Else
b = CLng(Text5.Text) + CLng(Text6.Text) + CLng(Text7.Text) + CLng(Text8.Text)
Text11.Text = b
End If
End If
End If
End If
End Sub

Private Sub Command3_Click()
c = CLng(Text10.Text) - CLng(Text11.Text)
Text9.Text = c
End Sub

Private Sub Form_Load()
Dim a As Integer
Dim b As Integer
Dim c As Integer
Dim d As Integer
Text10.Text = a
Text11.Text = b
End Sub

Quería guardarlo en una base de datos, en un archivo de word o algo,pero también quiero que se guarden,los datos junto con el día y la fecha.

Como lo podría hacer? espero sus respuestas,saludos.

Hola,tengo unr problema en visual basic, y es el siguiente, yo tengo 3 campos de texto, ycuando en el command1 le digo que los sume, si en los texts puse 5 5 5, me los suma asi: 555... y no encuentro la manera de que me los sume... este es el codigo:

Código [Seleccionar] Expandir

Private Sub Command1_Click()
Text10.Text = Text1.Text + Text2.Text + Text3.Text
End Sub

Private Sub Form_Load()
Dim a As Long
Dim b As Long
Dim c As Long
Dim d  As Long
End Sub



Espero sus respuestas,saludos.

Hola,quisiera saber si alguien me puede prestar una ayuda, yo hace 2 años programaba algo en vb, entre ellas aplicaciones para hacer peticiones get o post, pero ya no recuerdo nada de como era con winsock...

Alguien me podria hacer el codigo para yo verlo de ejemplo (el ejemplo que funcione porfavor), para yo verlo de ejemplo y así yo pueda recordar?: Aqui dejo las 2 peticiones Post:

Código [Seleccionar] Expandir


REGISTRO:

POST /modules.php?name=Your_Account&file=registro&op=confirma HTTP/1.0
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, */*
Referer: http://www.web.com/modules.php?name=Your_Account&file=registro
Accept-Language: es
Content-Type: application/x-www-form-urlencoded
Proxy-Connection: Keep-Alive
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
Host: www.WEB.com
Content-Length: 412
Pragma: no-cache
Cookie: lang=spanish; user=

username=NICKKKKKKKKKKKK&user_email=EMAIIIIIILLLLLLLLL@EMAIL.COM&user_password=PASSWORD&user_password2=PASSWORD&el_pais=bhutan&sexo=0&dia=28&mes=01&anho=1952&campo_extra%5B0%5D=1&contenido_extra%5B0%5D=NINJA&campo_extra%5B1%5D=5&contenido_extra%5B1%5D=COMBATE&campo_extra%5B2%5D=6&contenido_extra%5B2%5D=TECNINA&campo_extra%5B3%5D=7&contenido_extra%5B3%5D=CAPITULO&pagina_amiga=&conocer=3&otra_via=&condiciones=1






BOTON TERMINAR:

POST /modules.php?name=Your_Account&file=registro&op=finalizar HTTP/1.0
Accept: image/gif, image/x-xbitmap, image/jpeg, image/pjpeg, application/x-shockwave-flash, */*
Referer: http://www.WEB.COM/modules.php?name=Your_Account&file=registro&op=confirma
Accept-Language: es
Content-Type: application/x-www-form-urlencoded
Proxy-Connection: Keep-Alive
User-Agent: Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.1; SV1)
Host: www.WEB.com
Content-Length: 240
Pragma: no-cache
Cookie: lang=spanish; user=

random_num=&gfx_check=&username=NICKKKKKKKKKKKK&user_email=EMAIIIIIILLLLLLLLL@EMAIL.COM&user_password=PASSWORD&nacimiento=1952-01-28&sexo=0&el_pais=bhutan&encuesta=3&encuesta_oc=&contenido_extras=1-NINJA%3A5-COMBATE%3A6-TECNINA%3A7-CAPITULO



Si me pueden hacer un ejemplo funciona y pegan aqui el codigo se lo agradecería muchisimo ya que no me acuerdo de nada.Saludos.