Problemi con la tex box

[ALESSANDRO007]

Ragazzi aiutatemi, non riesco a modificare la grandezza della tex box nella form per la modifica dei dati nel record, ed in più, quando modifico nel database la tabella, da campo (testo), a campo (memo), quando riaccedo alle modifiche dalla pagina.asp, non visualizzo più il contenuto del testo nella casella di scrittura.

Ecco lo script:
'**************************************
'modifico i dati'
'**************************************
Sub EditItem()

Response.write ("<h2>Modifica record nella tabella " & strTable & "</h2>")

which=request("which")

if isNumeric(which) then
MySQL="SELECT * FROM " & strTable & " Where " & strKey & " = " & which
else
MySQL="SELECT * FROM " & strTable & " Where " & strKey & " = '" & which & "'"
end if
Set MyRs=MyConn.Execute(MySQL)

Response.write ("<FORM ACTION=""" & strFile & "?mode=EditItemAction"" METHOD=POST>")
Response.write ("<input name=""ID"" type=""hidden"" value=""" & MyRs(strKey) & """>")
Response.write ("<table>")

numerocampi=MyRs.fields.count -1

for i=0 to numerocampi

if Not MyRs(i).name = "ID" then
ThisRecord = MyRs(i)
ThisRecordName = MyRs(i).name
If IsNull(ThisRecord) or ThisRecord = "" Then
ThisRecord = ""
end if
Response.write ("<tr>")
Response.write ("<td align=""right"">" & ThisRecordName & ": </td>")
Response.write ("<td> <input name=""" & ThisRecordName & """ type=""text"" value=""" & MyRs(i) & """></td>")
Response.write ("</tr>")
end if
next

Response.write ("<tr>")
Response.write ("<td align=""right""><INPUT NAME=""Submit"" TYPE=Submit Value=""Update""></td>")
Response.write ("<td><INPUT NAME=""Reset"" TYPE=Reset Value=""Reset""></td>")
Response.write ("</tr>")
Response.write ("</table>")
Response.write ("</FORM>")

Response.write ("Torna alla lista dei record")

MyRs.close
Set MyRs= Nothing

End Sub