Introducere în limbajul html

Response.Write”

---

” ‘tag-ul HTML

---

are ca effect trasarea pe ecran a unei linii

If s=1 Then

Response.Write “Drepturi acordate: SELECT”

ElseIf s=2 Then

Response.Write “Drepturi acordate: SELECT, INSERT”

ElseIf s=3 Then

Response.Write ”Drepturi acordate: SELECT,INSERT,UPDATE,DELETE”

End If

‘se elibereaza memoria

rec_utiliz.close

conx.close

Set rec_utiliz=Nothing

Set conx=Nothing

‘dupa incheierea script-ului se va afisa un formular ce permite testarea de cereri SQL

‘formularul va fi transmis spre procesare paginii specificate in ACTION

‘ca urmare se executa pagina ExecutaSQL.asp

%>

---

Tastati fraza SQL si apasati apoi butonul OK

Afiseaza numele tabelelor si campurilor

<%

Dim SirSQL

‘se preia fraza SQL din formularul paginii PaginaSQL.asp

SirSQL=Request.Form(“Fraza”)

SirSQL=Trim(SirSQL) ‘se elimina spatiile testate din greseala