Hi Experts,
Im having problem where if i add value MY TESTING.
It only display MY only.Please refer attachment.what need to be done so that system will show full character when load ?
Im having problem where if i add value MY TESTING.
It only display MY only.Please refer attachment.what need to be done so that system will show full character when load ?
Code:
set rsfb = server.CreateObject("ADODB.RECORDSET")
sql = "select ID,title,value,updateby,updatedate from EMPLOYEE where title='lotowner'"
set rsct = cn.execute(sql)
maxid = clng(rsct("ID"))
While Not rsct.Eof
'response.write "<tr><td align=center><img border=0 src=images/delete.gif alt=Delete onmouseover=this.style.cursor='hand' onmouseout=this.style.cursor='default' onclick=getcell('d','" & rsct("ID") & "','" & rsct("VALUE") & "');>"
'response.write "<tr><td align=center><lotowner_" & rsct("ID") & " value=" & rsct("VALUE") & " size=20 style=text-align:left>"
response.write "<tr><td align=center><input id=lotowner_" & rsct("ID") & " value=" & rsct("VALUE") & " size=20 style=text-align:left>"
'response.write "<td align=center><input id=lotowner_" & rsct("ID") & " " & rsct("VALUE") & ""
response.write "<td>" & rsct("UPDATEBY")
response.write "<td>" & rsct("UPDATEDATE")
response.write "<td align=center><img border=0 src=images/delete.gif alt=Delete onmouseover=this.style.cursor='hand' onmouseout=this.style.cursor='default' onclick=getcell('d','" & rsct("ID") & "','" & rsct("VALUE") & "');>"
if clng(rsct("ID")) > maxid then maxid = clng(rsct("ID"))
'response.write ">>" & maxid
rsct.MoveNext
Wend
rsct.Close
Set rsct = Nothing
end sub
Comment