Проект Доска объявлений
Проект Поздравительная открытка
Проект Расписание сеансов

<asp:RequiredFieldValidator
id="rfvPrice"
ControlToValidate="txtPrice"
ErrorMessage=''Необходимо ввести цену"
Display="Static"
runat=server>
*
</asp:RequiredFieldValidator>

<asp:TextBox
id="txtDescription"
Columns="25"
MaxLength="255"
runat=server
/>

<asp:RequiredFieldValidator
id="rfvDescription"
ControlToValidate="txtDescription"
ЕггогМеззаде="Необходимо ввести текст"
Display="Static"
runat=*server>
*
</asp:RequiredFieldValidator>

<asp:TextBox
id"txtEmailAddress"
Соlumns="25"
MaxLength="50"
runat=server
/>

<asp:RequiredFieldValidator
id="rfvEmailAddress"
ControlToValidate="txtEmailAddress"
ErrorMessage="HeoOxoAHMO ввести адрес электронной почты"
Display=Static"
runat=server>
*
</asp:RequiredFieldValidator>

<asp:TextBox
id="txtPassword"
Columns="25"
MaxLength="50"
runat=server
/>

<asp:RequiredFieldValidator
id="rfvPassword"
ControlToValidate="txtPassword"
ErrorMessage=''Необходиыо ввести пароль"
Display="Static"
runat=server>
*
</asp:RequiredFieldValidator>

<asp:button
id="butAdd"
text=" OK "
Type="Submit"
OnClick="SubmitAdd_Click"
runat="server"
/>

Sub Page_Load(ByVal Sender as Object, ByVal E as EventArgs)
If Not IsPostBack Then
Dim DBConn as OleDbConnection
Dim DBCommand As OleDbDataAdapter
Dim DSPageData as New DataSet
DBConn - New OleDbConneetionC'Provider-sqloledb;" _
& "server=plocalhost;" _ ,.
& "initial Catalog=>INETC14;"
& "User Id=sa;"
& "Password=yourpassword;")
DBCommand = New OleDbDataAdapter _
("Select * from Categories " _
& "Order By CategoryName", DBConn)
DBCommand.Fill(DSPageData, _
"Categories")
ddlCategorylD.DataSource = _
DSPageData.Tables("Categories").DefaultView
ddlCategorylD.DataBind()
pnlForm.Visible = True
IblMessage.Text = "Заполните все поля для размещения
объявления."
End If
End Sub