|
<%@ Page Language="VB" %>
<script runat="server">
Sub btnConvert_Click(sender As Object, e As EventArgs)
Try
lblToInt.Text = cint(txtValueToConvert.Text)
Catch
lblToInt.Text = "Could not convert to Integer"
End Try
Try
lblToDateTime.Text = cdate(txtValueToConvert.Text)
Catch
lblToDateTime.Text = "Could not convert to Date/Time"
End Try
Try
lblToBoolean.Text = cbool(txtValueToConvert.Text)
Catch
lblToBoolean.Text = "Could not convert to Boolean"
End Try
End Sub
</script>
<html>
<head>
</head>
<body>
<form runat="server">
<p>
Original input:
<asp:TextBox id="txtValueToConvert" runat="server"></asp:TextBox>
<asp:Button id="btnConvert" onclick="btnConvert_Click" runat="server" Text="Convert!"></asp:Button>
</p>
<p>
Convert to Integer produces:
<asp:Label id="lblToInt" runat="server"></asp:Label>
</p>
<p>
Convert to Date/Time produces:
<asp:Label id="lblToDateTime" runat="server"></asp:Label>
</p>
<p>
Convert to Boolean produces:
<asp:Label id="lblToBoolean" runat="server"></asp:Label>
</p>
</form>
</body>
</html>
|