Partial Klasowy wetsuitDetails
Dziedziczyć System.Web.UI.Page
Ochraniać Okręt podwodny Page_Load (ByVal nadawca Jako Przedmiot, ByVal e Jako System.EventArgs) Obchodzić się Me.Load
Ćmić uwiarygodniać Jako Int16
Jeżeli Request.IsAuthenticated = Prawdziwy Wtedy
'authenticatedLbl.Text = "Ty notować na"
uwiarygodniać = (1)
Ciemnawy userID Jako Guid
Ciemnawy prodID Jako Int16
userID = Sesja ("userID")
prodID = Request.QueryString ("prodID")
'Initialize the związek
Ćmić conn = Nowy SqlClient.SqlConnection (ConfigurationManager.ConnectionStrings ("WetsuitConnectionString") .ConnectionString)
conn. Otwierać ()
'Przygotowywać the Sql rozkaz
Ćmić sqlQuery Gdy Sznurek = "wybiórka żywy od t_review"
Ćmić sql = Nowy SqlClient.SqlCommand (sqlQuery, conn)
'Dostawać the pierwszy rząd i kolumna od the zapytanie
Ćmić żywy Jako Przedmiot = sql.ExecuteScalar ()
'Zamykać the związek
conn. Zamykać ()
'Obchodzić się the rezultat
Jeżeli żywy. Równy (DBNull.Value) Wtedy
'Label1.Text = "Pisać"
Response.Write ("(1)")
reviewSuit.visible = Prawdziwy
ElseIf żywy = (0) Wtedy
'LabelReview.Text = "Podczas"
Response.Write ("2")
ElseIf żywy = (1) Wtedy
'LabelReview.Text = ""
Response.Write ("3")
Kończyć Jeżeli
Inny
'LabelReview.Text = "Przegląd Połączenie"
'pokazywać pisać przegląd połączenie
Response.Write ("4")
Kończyć Jeżeli
Kończyć Okręt podwodny
Kończyć Klasa
|