سلام من اين كار رو نميخوام من ميخواك يم كد ساده تو يك كد asp كه اينه جا بدم كجاش بزارم؟
کد:
<%@Language="VBScript"%>
<%
User = Request.Form("UserID")
Pass = Request.Form("Password")
Set AdoCon = Server.CreateObject("ADODB.Connection")
StrCon = "DRIVER={Microsoft Access Driver (*.mdb)};DBQ=" & Server.MapPath("Users.mdb")
AdoCon.Open StrCon
Set AdoRec = Server.CreateObject("ADODB.Recordset")
StrSQL = "SELECT * FROM Members WHERE UserID ='" & User & "'"
AdoRec.Open StrSQL, StrCon
IF NOT AdoRec.EOF Then
IF Pass = Trim(AdoRec("Password")) Then
Response.Write ("Welcome " & User)
Else
Response.Write ("Invalid Password")
End IF
Else
Response.Write ("Invalid UserID")
End IF
Set AdoCon = Nothing
Set StrCon = Nothing
Set AdoRec = Nothing
%>
سلام
دوست عزيز هر موقع مي خواهي يك كد html را در كد asp قرار بدهي ابتدا كد asp خود را با تگ %> بسته سپس كد html خود را نوشته و پس از اتمام كد html دوباره اگر بخواهي asp بنويسي در دنباله با اين تگ <% كه اول كد خود مي گذاري شروع به نوشتن asp مي كني
اميدوار هستم از خرت و پرت هاي كه نوشتم چيزي متوجه شده باشي
IF NOT AdoRec.EOF Then
IF Pass = Trim(AdoRec("Password")) Then %>
<!-- HTML كد -->
<p>Welcom to site<b><%= User %></b></p>
<%
Else
Response.Write ("Invalid Password")
End IF
Else
Response.Write ("Invalid UserID")
End IF
