آقا من كد Asp رو هرچي دست كاري ميكنم هي اور ميده
ميذارم شما هم ببينيد
<%
Dim adoCon
Dim strCon
Dim rsCheckUser
Dim strAccessDB
Dim strSQL
Dim strUserName
strUserName = Request.Form("txtUserName")
strAccessDB = "users"
Set adoCon = Server.CreateObject("ADODB.Connection")
strCon = "DRIVER={Microsoft Access Driver (*.mdb)};uid=;pwd=letmein; DBQ=" & Server.MapPath(strAccessDB)
adoCon.Open strCon
Set rsCheckUser = Server.CreateObject("ADODB.Recordset")
strSQL = "SELECT tblUsers.Password FROM tblUsers WHERE tblUsers.UserID ='" & strUserName & "'"
rsCheckUser.Open strSQL, strCon
If NOT rsCheckUser.EOF Then
Response.Write ""
Else
If Request.Form("txtUserPass1") = Request.Form("txtUserPass2") Then
strSQL = "Insert Into tblUsers(UserID, Password, Name, Family, Email, phone, JoinedOn) Values('" & strUserName & "', '" & Request.Form("txtUserPass1") & "', '" & Request.Form("txtName") & "', '" & Request.Form("txtFamily") & "', '" & Request.Form("txtEmail") & "', " & EVal(Request.Form("txtphone")) & ", Now)"
adoCon.Execute strSQL
Response.Write ""
Else
Response.Write ""
End If
End If
Set adoCon = Nothing
Set strCon = Nothing
Set rsCheckUser = Nothing
%>
الان كجا رو حذف كنم كه تلفن بشه اختياري؟
ممنون از كمكتون
