|
Displaying Source Code(s)
|
|
HTML Input Tag
--------------------------------------------------------------------------------
Description : Creates HTML Input tag
Function htmInput(itype, iname, ivalue, istyle)
If (VarTrimStr(itype) <> "") Then
htmInput = htmTag("input",_
htmAt("type", itype) &_
htmAt("name", iname) &_
htmAt("value", ivalue) &_
htmAt("style", istyle), "")
Else
htmInput = ""
End If
End Function
|
|
|