يه سوال برنامه نويسيasp.كمك

hnh1361

Member
سلام به همه شما شما دوستان عزيز كه هميشه كمك حال من بوديد.


آقا يه سوال برنامه نويسي داشتم.

به طور كامل سوالم در اين صفحه مشخصه .

اين صفحه رو نگاه كنيد. و خواهش ميكنم جواب من رو بديد.
آقا آبرو در ميونه ... :wink: :wink: :wink:



http://www.hnh1361.free-host.com/classtest.htm

آقا مخلص همه با مرامها . دربست ... :lol: :lol: :lol:
 

saman_sweden

Active Member
hnh1361 گفت:
سلام به همه شما شما دوستان عزيز كه هميشه كمك حال من بوديد.


آقا يه سوال برنامه نويسي داشتم.

به طور كامل سوالم در اين صفحه مشخصه .

اين صفحه رو نگاه كنيد. و خواهش ميكنم جواب من رو بديد.
آقا آبرو در ميونه ... :wink: :wink: :wink:



http://www.hnh1361.free-host.com/classtest.htm

آقا مخلص همه با مرامها . دربست ... :lol: :lol: :lol:
اقا سوالتون ديدم باور كنيد الان حضور دهن ندارم و روش فكر مي كنم اين به اين معناست كه فراموشتان نكرده ام
 
جواب سوال اول شما تو قسمت client side هست ذبايد با استفاده از java script نوشته بشه
(رجوع كنيد به سوال تغييرcombo boxدر قسمت جاوا)
سوال دوم :
بايد به جاي دستور action فرم از يكي از دستور زير استفاده كنيد
کد:
<form metod="post" action="mailto: [email][email protected][/email]>
يا:
 <form method="POST" action="--WEBBOT-SELF--">
  <!--webbot bot="SaveResults" S-Label-Fields="TRUE" S-Email-Address="[email protected]" S-Email-Format="TEXT/PRE" --><p>
  <input type="submit" value="Submit" name="B1"><input type="reset" value="Reset" name="B2"></p>
</form>
 

hnh1361

Member
سلام


از سامان جان خيلي ممنونم..

arashoorii عزيز ميشه برام بيشتر توضيح بدن آخه من تو برنامه نويشي يكم شوتم ولي عجيب علاقه دارم.


مرسي
 

hnh1361

Member
كمك

سلام عزيزاي من
آقايون اگه لطف كنند وجواب من روكاملتر بدن ممنون ميشم.
مرسي
 

amirnezhad

Member
سلم در مورد سوال ولتون، همه كار بايد با استفاده از خصوصيت innerHTML (توي DOM) انجام بشه. اين يك صفحه نمونه است كه اگه تغييرش بدي هموني ميسه كه مي خواهي:
کد:
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">

<html>

<head>
<title>Untitled</title>
<script language="JavaScript" type="text/javascript">
<!--
function ShowSub() {
  strTemp = 'Select:<select name="subSelect">';
  switch (mainForm.mainSelect.value) {
	  case '1':
		  strTemp += '<option value="1-1">Option 1 - 1</option>';
		  strTemp += '<option value="1-2">Option 1 - 2</option>';
		  strTemp += '<option value="1-3">Option 1 - 3</option>';
		  strTemp += '<option value="1-4">Option 1 - 4</option>';
			break;
			
		case '2':
		  strTemp += '<option value="2-1">Option 2 - 1</option>';
		  strTemp += '<option value="2-2">Option 2 - 2</option>';
		  strTemp += '<option value="2-3">Option 2 - 3</option>';
			break;
		
		case '3':
		  strTemp += '<option value="3-1">Option 3 - 1</option>';
		  strTemp += '<option value="3-2">Option 3 - 2</option>';
		  strTemp += '<option value="3-3">Option 3 - 3</option>';
		  strTemp += '<option value="3-4">Option 3 - 4</option>';
		  strTemp += '<option value="3-5">Option 3 - 5</option>';
		  strTemp += '<option value="3-6">Option 3 - 6</option>';
			break;
	}
	strTemp += '</select>';
	
	SubSelect.innerHTML = strTemp;
}
//-->
</script>
</head>

<body>
<form method="post" action="" name="mainForm">
Select:
<select name="mainSelect" onchange="ShowSub()">
<option value="1">Option 1</option>
<option value="2">Option 2</option>
<option value="3">Option 3</option>
</select>
<br><br>
<div id="SubSelect">
Select:
<select name="subSelect">
<option value="1-1">Option 1 - 1</option>
<option value="1-2">Option 1 - 2</option>
<option value="1-3">Option 1 - 3</option>
<option value="1-4">Option 1 - 4</option>
</select>
</div>
</form>
</body>

</html>

اگه متوجه نشدي بگو تا بيشتر توضيح بدهم.

در مورد سوال دومت هم من متوجه نميشم كه مشكلت چيه؟ ميشه بيشتر توضيح بدهي؟
 

Zanguei

Member
Re: أأأ

hnh1361 گفت:
:cry: :cry:
دوباره سوال رو يه نگاهي بكنيد .
اين كد مال ايميل با ASP هستش. يه تست بكنش.
کد:
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<html>
<head>
<title>Sending Mail</title>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
dim strhtml
strhtml= strhtml &  "<!DOCTYPE HTML PUBLIC ""-//W3C//DTD HTML 4.0 Transitional//FA"">"
strhtml= strhtml &  "<style>"
strhtml= strhtml &  "p"
strhtml= strhtml &  "{"
strhtml= strhtml &  "MARGIN-TOP: 0px;"
strhtml= strhtml &  "MARGIN-BOTTOM: 0px"
strhtml= strhtml &  "}"
strhtml= strhtml &  "p.fonttd"
strhtml= strhtml &  "{"
strhtml= strhtml &  "    FONT-WEIGHT: normal;"
strhtml= strhtml &  "    FONT-SIZE: 8pt;"
strhtml= strhtml &  "    COLOR: white;"
strhtml= strhtml &  "    MARGIN-RIGHT: 5px;"
strhtml= strhtml &  "    FONT-STYLE: bold;"
strhtml= strhtml &  "    FONT-FAMILY: Tahoma;"
strhtml= strhtml &  "    TEXT-DECORATION: none"
strhtml= strhtml &  "}"
strhtml= strhtml &  " </style>"
strhtml= strhtml &  " <html> " & _
   					" <head> " & _
					" <meta http-equiv=""Content-La nguage"" content=""fa""> " & _
					" <meta name=""generator"" content=""Microsoft FrontPage 5.0""> " & _
					" <title>Welcome to Our site : : : your email from your site : : : </title> " & _
					" </head>" 
					strhtml= strhtml &  "<br>"
					strhtml= strhtml &  "<hr align=""center""> <br>"
					strhtml= strhtml &  "<body  topmargin=""0"" leftmargin=""0"" BGCOLOR=""#003366"">"

if Request.Form("T1")<>"" then
					strhtml= strhtml & "<p class=""fonttd"" align=""right"">" & Request.Form("T1") 
end if													    
					strhtml= strhtml &  "<br>"
					strhtml= strhtml &  "<br>"
					strhtml= strhtml &  "<br>"
					strhtml= strhtml &  "<p class=""fonttd"" align=""right""> </p>"
if Request.Form("T2")<>"" then
					strhtml= strhtml & "<p class=""fonttd"" align=""right"">" &  Request.Form("T2")
end if													    
					strhtml= strhtml &  "   <br>"
					strhtml= strhtml &  "	<br>"
					strhtml= strhtml &  "   <br>"
					strhtml= strhtml &  "	<p class=""fonttd"" align=""right""> </p>"
if Request.Form("T3")<>"" then								
				    strhtml= strhtml & "<p class=""fonttd"" align=""right"">" &  Request.Form ("T3") 
end if
					strhtml= strhtml &  "   <br>"
					strhtml= strhtml &  "   <br>"
					strhtml= strhtml &  "	<br>"
				
				    strhtml= strhtml &  "<p class=""fonttd"" align=""right""> </p>"
                     
if Request.Form("T4")<>"behtarin" then
					strhtml= strhtml & "<p class=""fonttd"" align=""right"">" & Request.Form("T4") 
end if
					strhtml= strhtml &  "<br>"
					strhtml= strhtml &  "<br>"
					strhtml= strhtml &  "<br>"
					strhtml= strhtml &  "<p class=""fonttd"" align=""right""> </p>"

if Request.Form("T5")<>"" then								
				    strhtml= strhtml & "<p class=""fonttd"" align=""right"">" &   Request.Form ("T5")
end if				  		       
					strhtml= strhtml &  "<br>"
					strhtml= strhtml &  "<br>"
					strhtml= strhtml &  "<p class=""fonttd"" align=""right""> </p>"
					
if Request.Form("T6")<>"" then								
				   strhtml= strhtml & "<p class=""fonttd"" align=""right"">" &   Request.Form ("T6")
end if
		
					strhtml= strhtml &  "<br>"
        					strhtml= strhtml &  "<p class=""fonttd"" align=""right""> </p>"
					
if Request.Form("email")<>"" then								
				   strhtml= strhtml & "<p class=""fonttd"" align=""right"">" &   Request.Form ("email")
end if
		
					strhtml= strhtml &  "<br>"
        					strhtml= strhtml &  "<p class=""fonttd"" align=""right""> </p>"
					

if Request.Form("S1")<>"" then
				    strhtml= strhtml & "<p class=""fonttd"" align=""right"">" &  Request.Form ("S1")
end if					           

strhtml= strhtml &  "<br></body></html>"
Response.Write strhtml
set  objsendmail=server.CreateObject ("cdonts.newmail")
with objsendmail
   .Subject="Test"
   .From = Request.Form("email")
   .To = " [email][email protected][/email]"
   .Cc= ""
   .BodyFormat = 0
   .MailFormat= 0
   .Body = strhtml
   .Send
end with
set objsendmail= nothing     
%>
</body>
</html>
 

جدیدترین ارسال ها

بالا