Lunghezza Massima e colore della barre di scorrimento textbox

[pietro09]

1) metti in un file di libreria, per esempio libreria.js questa funzione:

//-------------------------------------------------------------
//se nel controllo Target1, si immettono piu di max caratteri,
//vengono tagliati i caratteri extra e viene mostrato un messaggio
//di alert
//-------------------------------------------------------------
function valutaLunghezza(Target1,max) 
{
	var StrLen1 = Target1.value.length;
	if (StrLen1 > max ) 
	{
		Target1.value = Target1.value.substring(0, max);
		window.alert("Ci sono  " + (StrLen1 - max) + " carattere/i oltre i " + max + " consentiti.\n\nI caratteri in eccesso sono stati eliminati.");
	} 

}

ps. trovata qui nel forum


2) nel server ti fai una libreria di utilità, per esempio un modulo, e ci metti questo metodo:

'-------------------------------------------------------------------------------
'limita la lunghezza del testo che si può immettere in un <textarea
'-------------------------------------------------------------------------------
Public Sub ValutaLunghezza(ByVal t As TextBox, ByVal Lunghezza%)
	t.Attributes.Add("onfocus", String.Format("valutaLunghezza(this,{0});", Lunghezza))
	t.Attributes.Add("onkeyup", String.Format("valutaLunghezza(this,{0});", Lunghezza))
End Sub

Public Sub ValutaLunghezza(ByVal t As Object, ByVal Lunghezza%)
	If TypeOf t Is TextBox Then
		Dim t1 As TextBox = DirectCast(t, TextBox)
		ValutaLunghezza(t1, Lunghezza)
	End If
End Sub

3) nella pagina che contiene i TextArea di cui vuoi limitare il numero max di caratteri, utilizzi l'evento init, come da esempio:

Protected Sub c_nota_pratica_Init(ByVal sender As Object, ByVal e As System.EventArgs) Handles c_nota_pratica.Init
	l.ValutaLunghezza(sender, 1000)
End Sub

4) l'intestazione della tua pagina sarà per esempio qualcosa del genere:
Option Strict On
Imports l = libreria.ModuloWeb
Imports o = System.Data.OracleClient


5) per quanto riguarda il salvataggio della TextArea nel database non andrà certo in errore perchè è obbligatorio fare un controllo preventivo e comunque farai qualcosa del genere:

Comando.Parameters.Add(msora.createParameterVarchar(":nota_pratica", 1000, l.StringNullToDBNull(Me.c_nota_pratica.Text)))

ossia userai un parametro stringa di cui fisserai la lunghezza massima


6) per l'altro problema non rispondo, prima perchè non lo so, secondo perchè riguarda i css e non javascript, terzo perchè lo trovo brutto brutto brutto