Ayuda en cajas de texto
Publicado por Hector (110 intervenciones) el 14/04/2009 23:34:01
Hola amigos del foro les cokento que tengo elunico error que al hacer el enter este me bota al menu principal, pero si lo dejo desactivado me funciona, por lo que les pido que me ayuden de como solucionar este problema y les envío elcodigo qu estoy ocupando.
En el load utilizo lo siguiente
Protected Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Me.Load
MiConexion.Open()
If Not Me.Page.IsPostBack Then
Llenar_Combo()
End If
TXTNOMBRE.Attributes.Add("onkeyDown", "enter(event,this.form.txtrut);")
TXTRUT.Attributes.Add("onkeypress", "return IsNumber(event);")
TXTRUT.Attributes.Add("onkeyDown", "enter(event,this.form.cmborigen);")
TXTAUDITORIA.Attributes.Add("onkeypress", "return IsNumber(event);")
TXTAÑO.Attributes.Add("onkeypress", "return IsNumber(event);")
TXTNOTA.Attributes.Add("onkeypress", "return IsNumber(event);")
formulario.Attributes.Add("onsubmit", "return checkSubmit()")
End Sub
y en el código quwe utilizoen la caja de texto:
Protected Sub TXTNOMBRE_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TXTNOMBRE.TextChanged
TXTNOMBRE.CausesValidation = True
TXTNOMBRE.AutoPostBack = True
CMDSALIR.Enabled = False
Exit Sub
TXTRUT.Focus()
End Sub
ojala que me puedan ayudar ya que me encuentro desesperado en dar solución, desde ya muchas gracias.
En el load utilizo lo siguiente
Protected Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Me.Load
MiConexion.Open()
If Not Me.Page.IsPostBack Then
Llenar_Combo()
End If
TXTNOMBRE.Attributes.Add("onkeyDown", "enter(event,this.form.txtrut);")
TXTRUT.Attributes.Add("onkeypress", "return IsNumber(event);")
TXTRUT.Attributes.Add("onkeyDown", "enter(event,this.form.cmborigen);")
TXTAUDITORIA.Attributes.Add("onkeypress", "return IsNumber(event);")
TXTAÑO.Attributes.Add("onkeypress", "return IsNumber(event);")
TXTNOTA.Attributes.Add("onkeypress", "return IsNumber(event);")
formulario.Attributes.Add("onsubmit", "return checkSubmit()")
End Sub
y en el código quwe utilizoen la caja de texto:
Protected Sub TXTNOMBRE_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TXTNOMBRE.TextChanged
TXTNOMBRE.CausesValidation = True
TXTNOMBRE.AutoPostBack = True
CMDSALIR.Enabled = False
Exit Sub
TXTRUT.Focus()
End Sub
ojala que me puedan ayudar ya que me encuentro desesperado en dar solución, desde ya muchas gracias.
Valora esta pregunta


0