Page 61 - Modul Web
P. 61
56
<td><input type="checkbox" name="kursus" value="inggris">Bahasa
Inggris<br>
<input type="checkbox" name="kursus" value="komputer">Komputer</td>
</tr>
</table>
<p><input type="submit" value="Submit" name="Bsubmit"><input type="reset"
value="Reset" name="Breset"></p>
</form>
</body>
</html>
❑ Simpan dengan nama form.html
❑ Lihat hasilnya dengan browser.
Praktikum 2 (validasi data)
❑ Bukalah kembali file form.html.
❑ Tambahkan script berikut pada bagian head :
<script language="VBscript">
<!--
sub Bsubmit_OnClick
dim TheForm
Set Theform= document.form_kursus
if IsNumerik(TheForm.nama.value) then
Msgbox " Input anda salah"
Else
TheForm.submit
End If
End Sub
-->
Modul Pemrograman Web SMKN 2 Mojokerto
