Muhtasar kod.

Question

Bazı eski kodları temizlemeye çalışıyorum. Bu kodu nasıl daha özlü yapabilirim? Ya da bunu yapmanın daha iyi bir yolu var. Dosyalardan 2 alan adında eski bir klasik .asp sitesi.

<% If (GetDomainType() = "CTH") Then 
<meta HTTP-EQUIV="REFRESH" content="7; url=http://www.w.com"> 
ElseIf (GetDomainType() = "CA") Then 
<meta HTTP-EQUIV="REFRESH" content="7; url=http://www.e.com"> 
End If %> 


<!-- #INCLUDE file="mobile_sitefiles.asp"--> 

<% If (GetDomainType() = "WRT") Then 
    <title>WRT</title> 
ElseIf (GetDomainType() = "EL") Then 
    <title>EL</title> 
ElseIf (GetDomainType() = "CA") Then 
    <title>Curb APeel</title> 
Else 
    <title>Call</title> 
End If %> 

Ama sonra sadece sayfayı keser:

<% If (GetDomainType() = "CTH") Then %> 
<meta HTTP-EQUIV="REFRESH" content="7; url=http://www.w.com"> 
<% ElseIf (GetDomainType() = "CA") Then %> 
<meta HTTP-EQUIV="REFRESH" content="7; url=http://www.e.com"> 
<% End If %> 


<!-- #INCLUDE file="mobile_sitefiles.asp"--> 

<% If (GetDomainType() = "WRT") Then %> 
    <title>WRT</title> 
<% ElseIf (GetDomainType() = "EL") Then %> 
    <title>EL</title> 
<% ElseIf (GetDomainType() = "CA") Then %> 
    <title>Curb APeel</title> 
<% Else %> 
    <title>Call</title> 
<% End If %> 

denedim.

Answer 1

Lankymart yorum yaptığında, html'yi bu şekilde asp ile karıştıramazsınız. "Temizlemek" veya "özlü" ile ne kastettiğinizden emin değilim, ama gerçekten, gerçekten de çalışma zamanınızı yeniden kodlamak için zaman harcamak istiyorsanız, önereceğim iki şey var.

Biri, GetDomainType'un ne yaptığını bilmiyorum, ama ne olursa olsun, bunu beş kez çağırmak gereksiz görünüyor. Bunun yerine, bir kez arayın, sonucu bir değişkene atayın ve bu değişkende dallanma yapın.

İki, genellikle asp ve html arasında geçiş yapma sayısını azaltmak için biraz daha okunabilir (ve küçük-biraz daha verimli). Bu iki şeyi birleştiren

, kod blokları `değişmez HTML olarak döndürülür Bunun dışında <% %>` şey çalıştırılır

<% 
dim DomainType, url, title 
DomainType = GetDomainType 
If DomainType = "CTH" Then 
    url = "www.w.com" 
ElseIf DomainType = "CA" Then 
    url = "www.e.com" 
Else 
    url = "" 
End If 
Select Case DomainType 
    Case "WRT" title = "WRT" 
    Case "EL" title = "EL" 
    Case "CA" title = "Curb APeel" 
    Case Else title = "Call" 
End Select 
%> 
<%If url <> "" Then%> 
<meta HTTP-EQUIV="REFRESH" content="7; url=http://<%=url%>"> 
<% End If %> 
<!-- #INCLUDE file="mobile_sitefiles.asp"--> 
<title><%=title%></title>