Bonjour,

je suis en stage et on m'a demandé d'essayer de comprendre ce code.
Pour moi ce code permet de faire un ajout, une modification et une suppression.
Est ce que je me trompe??

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
 
<%
 
if request.form("form_add_esite_hidden") <> "" then
	request_form_admin_url = request.form("admin_url")
	request_form_esitedb_url = request.form("esite_db_url")
	call check_end_url(request_form_admin_url, "/")
	call check_end_url(request_form_esitedb_url, "\")
	SQL="INSERT INTO esites(name,path,pathadmin,dbpath,contentleader) VALUES('"&request.form("esite_nom")&"','"&request.form("esite_url")&"','"&request_form_admin_url&"','"&request_form_esitedb_url&"','"&request.form("esite_email")&"') ;"
	conn.execute(SQL)
	msg = "This eSite has been added."
	response.redirect("super_admin_tool.asp?affich="&msg&"&LBD_Program=ajoutModif")
end if
 
 
if request.form("form_upd_esite_hidden") = "vrai" then
	request_form_admin_url = request.form("admin_url")
	request_form_esitedb_url = request.form("esite_db_url")
	call check_end_url(request_form_admin_url, "/")
	call check_end_url(request_form_esitedb_url, "\")
	SQL="UPDATE esites SET name='"&request.form("esite_nom")&"', path='"&request.form("esite_url")&"', pathadmin='"&request_form_admin_url&"', dbpath='"&request_form_esitedb_url&"', contentleader='"&request.form("esite_email")&"' WHERE id = "&request.form("LBD_eSite")&";"	
	conn.execute(SQL)
	msg = "This eSite has been updated."
	response.redirect("super_admin_tool.asp?affich="&msg&"&LBD_Program=ajoutModif&LBD_eSite="&request.form("LBD_eSite"))
end if
 
if request.querystring("delete_esite") <> "" then
	SQL="DELETE * FROM esites WHERE id= "&request.querystring("delete_esite")&";"	
	conn.execute(SQL)
	msg = "This eSite has been deleted."
	response.redirect("super_admin_tool.asp?affich="&msg&"&LBD_Program=consParam")
end if