Cursore

[victor8872]

Ciao a tutti
ho un problema che non riesco a risolvere.

Avendo questo:

<asp:templatecolumn ItemStyle-BorderColor="#000000" ItemStyle-BorderWidth="1" ItemStyle-Font-Bold="false" HeaderText="COMMENTI
( fatto as e t2,spedito t2,dato tes,altro)" HeaderStyle-Width="200">
<itemtemplate>
<%#replace(container.dataitem("commenti"),VbCrLf ,"
")%>
</itemtemplate>
<EditItemTemplate>
<asp:TextBox Font-Name="verdana" Width="140" Height="60" Font-Size="8" Font-Bold="false" id="Label3" TextMode="MultiLine" runat="server" Text='<%#DataBinder.Eval(Container, "dataitem.commenti") %>'/>
</EditItemTemplate>
</asp:templatecolumn>

Come faccio a posizionare il cursore lampeggiante quando faccio in modo che il campo
commenti diventi editabile?


Grazie a tutti

[ZofM]

Qui si sta parlando di JavaScript però.. devi creare un piccolo script che ti posizioni il fuoco su quella textbox. Puoi semplicemente far apparire quel codice JS sull'evento Edit della GridView.

[FiOrEbAt]

Label3.Focus()

questo funziona, il difficile è metterlo al posto giusto

[victor8872]

non è che mi fareste un esempio concreto?
grazie

[victor8872]

quando nel datagrid clicco su edit
richiamo una sub in cui metto questo

dim str2 as string
str2 = "<script language='javascript' type='text/javascript'>document.getElementById('prova').focus ();</" & "script>"
Dim context As HttpContext = HttpContext.Current
context.Response.Write(str2)

e vorrei fare in modo che il cursore andasse a finire nel label 3

<asp:templatecolumn ItemStyle-BorderColor="#000000" ItemStyle-BorderWidth="1" ItemStyle-Font-Bold="false" HeaderText="COMMENTI
( fatto as e t2,spedito t2,dato tes,altro)" HeaderStyle-Width="200">
<itemtemplate>
<%#replace(container.dataitem("commenti"),VbCrLf ,"
")%>
</itemtemplate>
<EditItemTemplate>
<asp:TextBox Font-Name="verdana" Width="140" Height="60" Font-Size="8" Font-Bold="false" id="Label3" TextMode="MultiLine" runat="server" Text='<%#DataBinder.Eval(Container, "dataitem.commenti") %>'/>
</EditItemTemplate>
</asp:templatecolumn>

ma niente....non accade nulla

[pietro09]

adesso sono di fretta e non posso di più:

ho un BoundColumn, 3° colonna


nell'evento ItemDataBound

Select Case e.Item.ItemType
Case ListItemType.EditItem
Dim tb As TextBox = DirectCast(e.Item.Cells(3).Controls(0), TextBox)
Dim ClientID As String = tb.ClientID
Me.ClientScript.RegisterStartupScript(Me.GetType, "load", String.Format("document.getElementById(""{0}"").fo cus();", ClientID), True)

End Select


nel tuo caso è anche più facile, ma adesso debbo spegnere

[FiOrEbAt]

asp.net 2 crea automaticamente il javascrit del set del focus facendo TextBox.Focus() !!!!!!!!

nel metodo (sub) che ti fa passare in "modalità modifica"!

[victor8872]

non da nessun risultato

[FiOrEbAt]

ma in che metodo l'hai messo?

famme vede!

[victor8872]

sub modifica_allievo (obj as object, e as datagridcommandeventargs)
'document.getElementById(label3).focus()


mydatagrid2.edititemindex=e.item.itemindex


dim o as integer=valore_fisso.text
dim objcmd as new oledbdataadapter ("select * from corsisti where num="& o &" and contatti='no' and numero_tessera_corsista<>'0' order by cognome_corsista asc" , objconn)

dim ds as dataset=new dataset()
objcmd.fill (ds,"corsisti")



mydatagrid2.datasource=ds.tables("corsisti").defau ltview
mydatagrid2.databind





dim num as integer=0
dim mydatagriditem as datagriditem
for each mydatagriditem in mydatagrid2.items
num=num+1
next
dim numero_allievi_presenti as string=num
num_allievi.text=num

pippo.visible=true
intestazione.visible=true
mydatagrid2.visible=true


'per intestazione
dim objcmd2 as new oledbdataadapter ("select * from corso where id=" & valore_fisso.text, objconn)

dim ds2 as dataset=new dataset()
objcmd2.fill (ds2,"corso")


intestazione.datasource=ds2.tables("corso").defaul tview
intestazione.databind


'valore.text=session("pippo")


allievi_totali_nel_periodo()
totale.visible=true


tabella_eliminazione_ALLIEVO.visible=false
conferma_elimina_allievo.visible=false

Select Case e.Item.ItemType
Case ListItemType.EditItem
Dim tb As TextBox = DirectCast(e.Item.Cells(5).Controls(0), TextBox)
Dim ClientID As String = tb.ClientID
Me.ClientScript.RegisterStartupScript(Me.GetType, "load", String.Format("document.getElementById(""{0}"").fo cus();", ClientID), True)

End Select


end sub

Spero vivamente d mi possiate dare una mano

Grazie