
28/06/2005, 08:30
|
| | Fecha de Ingreso: junio-2005
Mensajes: 20
Antigüedad: 19 años, 8 meses Puntos: 0 | |
Para el setfocus, utilizo una funcion armada muy similar a la que se menciona antes y es la siguiente:
Public Sub SetFocus(ByVal ctControl As Control, ByRef pPage As Page)
Dim sbScript As New System.Text.StringBuilder
Dim ClientID As String = ctControl.ClientID
sbScript.Append("<script language='javascript'>")
sbScript.Append("window.scrollBy(0,400);")
sbScript.Append("document.getElementById('")
sbScript.Append(ClientID)
sbScript.Append("').focus();")
sbScript.Append("<" & "/script>")
pPage.RegisterStartupScript("Foco", sbScript.ToString())
End Sub |