V60
پنج شنبه 10 اردیبهشت 1388, 15:13 عصر
با سلام
من می خواهم وقتی یک button را فشار می دهم یک سری عملیات انجام شود و سپس بر روی یک TEXTBOX صفحه بپرد و آن را در اول مانیتور نشان دهد ( نه در اخر مانیتور)
باید از بوک مارک استفاده کنم ؟
کدی هست که بشه این کار را انجام بده
من با vb کد می نویسم
خودم یک سرچی کردم برای سی شار #C این کد را پیدا کردم که به صورت جاوا اسکریپت کار می کرد
public static void FocusControl(string ClientID,System.Web.UI.Page page)
{
page.RegisterClientScriptBlock("CtrlFocus",
@"<script>
function ScrollView()
{
var el = document.getElementById('" + ClientID + @"');
if (el != null)
{
el.scrollIntoView();
el.focus();
}
}
window.onload = ScrollView;
</script>");
}
}
ولی وقتی می ارمش توی وی بی و اینطوری تغییرش می دم کار نمی کنه
Public Shared Sub FocusControl(ByVal ClientID As String, ByVal page As System.Web.UI.Page)
Dim str As String = "<script> " & vbCr & vbLf & vbCr & vbLf & " Function ScrollView()" & vbCr & vbLf & vbCr & vbLf & " {" & vbCr & vbLf & " var el = document.getElementsByName('" & ClientID & "');" & vbCr & vbLf & " if (el != null)" & vbCr & vbLf & " { " & vbCr & vbLf & " el.scrollIntoView();" & vbCr & vbLf & " el.focus();" & vbCr & vbLf & " }" & vbCr & vbLf & " }" & vbCr & vbLf & vbCr & vbLf & " window.onload = ScrollView;" & vbCr & vbLf & vbCr & vbLf & " </script>"
page.RegisterClientScriptBlock("CtrlFocus", str)
End Sub
من می خواهم وقتی یک button را فشار می دهم یک سری عملیات انجام شود و سپس بر روی یک TEXTBOX صفحه بپرد و آن را در اول مانیتور نشان دهد ( نه در اخر مانیتور)
باید از بوک مارک استفاده کنم ؟
کدی هست که بشه این کار را انجام بده
من با vb کد می نویسم
خودم یک سرچی کردم برای سی شار #C این کد را پیدا کردم که به صورت جاوا اسکریپت کار می کرد
public static void FocusControl(string ClientID,System.Web.UI.Page page)
{
page.RegisterClientScriptBlock("CtrlFocus",
@"<script>
function ScrollView()
{
var el = document.getElementById('" + ClientID + @"');
if (el != null)
{
el.scrollIntoView();
el.focus();
}
}
window.onload = ScrollView;
</script>");
}
}
ولی وقتی می ارمش توی وی بی و اینطوری تغییرش می دم کار نمی کنه
Public Shared Sub FocusControl(ByVal ClientID As String, ByVal page As System.Web.UI.Page)
Dim str As String = "<script> " & vbCr & vbLf & vbCr & vbLf & " Function ScrollView()" & vbCr & vbLf & vbCr & vbLf & " {" & vbCr & vbLf & " var el = document.getElementsByName('" & ClientID & "');" & vbCr & vbLf & " if (el != null)" & vbCr & vbLf & " { " & vbCr & vbLf & " el.scrollIntoView();" & vbCr & vbLf & " el.focus();" & vbCr & vbLf & " }" & vbCr & vbLf & " }" & vbCr & vbLf & vbCr & vbLf & " window.onload = ScrollView;" & vbCr & vbLf & vbCr & vbLf & " </script>"
page.RegisterClientScriptBlock("CtrlFocus", str)
End Sub