Subversion Repositories DevTools

Rev

Rev 13 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 13 Rev 15
Line 158... Line 158...
158
		TextBox = _
158
		TextBox = _
159
		"<input type='text' name='"& sName &"' "& sAttributes &" value='"& sValue &"' "& msDisabled &">"
159
		"<input type='text' name='"& sName &"' "& sAttributes &" value='"& sValue &"' "& msDisabled &">"
160
		
160
		
161
	End Function
161
	End Function
162
	'-----------------------------------------------------------------------------------------------------------------
162
	'-----------------------------------------------------------------------------------------------------------------
-
 
163
	Public Function CheckBox ( sName, sValue, sAttributes )
-
 
164
		CheckBox = _
-
 
165
		"<input type='checkbox' name='"& sName &"' "& sAttributes &" value='"& sValue &"' "& msDisabled &">"
-
 
166
		
-
 
167
	End Function	
-
 
168
	'-----------------------------------------------------------------------------------------------------------------
163
	Public Function SubmitButton ( sValue, sAttributes )
169
	Public Function SubmitButton ( sValue, sAttributes )
164
		SubmitButton = _
170
		SubmitButton = _
165
		"<input type='submit' value='"& sValue &"' "& sAttributes &" "& msDisabled &">"
171
		"<input type='submit' value='"& sValue &"' "& sAttributes &" "& msDisabled &">"
166
	End Function
172
	End Function
167
	'-----------------------------------------------------------------------------------------------------------------
173
	'-----------------------------------------------------------------------------------------------------------------