[DavidBD]

1.

<&#37;
	session ("e")=Request.Form("email")
	session ("p")=Request.Form("Password")
	session ("n")=Request.Form("number")
	session ("k")=Request.Form("kidomet")
	path=Server.mappath("db.mdb")
	
	set con= Server.createobject("ADODB.Connection")
       
 	con.mode=3   
   	con.open "Provider=Microsoft.Jet.OLEDB.4.0;data source=" &path

	sq2="select * from o4users where [email]="&session ("e")&" and [Password]="&session ("p")&" and [number]="&session ("n")&" and [kidomet]="&session ("k")&""

	set R=con.execute(sq2)
	if R.eof then
		response.write "פרטים לא נכונים"
	else
	    sq="delete * from o4users where [email]="&session ("e")&" and [Password]="&session ("p")&" and [number]="&session ("n")&" and [kidomet]="&session ("k")&""
	con.execute sq
%>
מחקת בהצלחה את המשתמש
<%
end if
%>

תעטוף תמיד שמות של שדות ב [ ] (בPHP ב `) ע"מ להמנע ממילים שמורות של SQL.

2.

<%

	i=Request.Form("id")
	fname=Request.Form("firstname")
	sname=Request.Form("familyname")
	n=Request.Form("number")
	e=Request.Form("email")
	z=Request.Form("ezor")
	a=Request.Form("adress")
	yn=Request.Form("yesno")
        o=Request.Form("offers")
	c=Request.Form("comment")
	k=Request.Form("kidomet")
	town=Request.Form("city")
	sq="UPDATE o4users SET [firstname]='"&fname&"', [familyname]='"&sname&"',[number]='"&n&"',[email]='"&e&"',[ezor]='"&z&"',[adress]='"&a&"',[yesno]='"&yn&"',[comment]='"&c&"',[offers]='"&o&"',[kidomet]='"&k&"'  WHERE [id]=" & i
	response.write sq
	path=Server.mappath("db.mdb")
	
	set con= Server.createobject("ADODB.Connection")
       
 	con.mode=3   
   	con.open "Provider=Microsoft.Jet.OLEDB.4.0;data source=" &path
     
	
	con.Execute sq

%>

עטפת את התאים בהגנה מפני "מילים שמורות של SQL", אבל בדרך שעושים זאת בPHP (`) ולא כמו בASP ([]), בנוסף, בASP בניגוד לPHP לא נותנים לשדות מסוג מספר ' ' או " ".

שים לב לטעויות מהסוג הזה.

בהצלחה בהמשך