<% Session("domain")=22 domain="22" dateCheck=cdate(Cstr(datepart("d",Now))+"/"+Cstr(datepart("m",Now))+"/" + Cstr(datepart("yyyy",now))) set datapath1=server.createobject("adodb.connection") datapath1.open strConnTucsa sql="SELECT * FROM messages WHERE (category=95) AND domain=" & domain & "AND expiryDate>" & dateCheck & " ORDER BY entryDate DESC" set rsh=datapath1.execute(Sql) sql="SELECT * FROM messages WHERE thumbnail='' AND (category=2 or category=1 or category=34 or category=40 or category=41 or category=43) AND domain=" & domain & "AND expiryDate>" & dateCheck & " ORDER BY entryDate DESC" set rsd=datapath1.execute(Sql) sql="SELECT * FROM messages WHERE section=3 AND domain=" & domain & "AND expiryDate>" & dateCheck & " ORDER BY entryDate DESC" set rse=datapath1.execute(Sql) sql="SELECT * FROM messages WHERE category=9 AND domain=" & domain & "AND expiryDate>" & dateCheck & " ORDER BY entryDate DESC" set rsm=datapath1.execute(Sql) sql="SELECT * FROM messages WHERE category=4 AND domain=" & domain & "AND expiryDate>" & dateCheck & " ORDER BY entryDate DESC" set rsp=datapath1.execute(Sql) sql="SELECT * FROM messages WHERE category=2 AND manset<>'ON' AND thumbnail<>'' AND domain=" & domain & "AND expiryDate>" & dateCheck & " ORDER BY entryDate DESC" set rsresimli=datapath1.execute(Sql) sql="SELECT * FROM messages WHERE manset='ON' ORDER BY message_id DESC" 'sql="SELECT * FROM messages WHERE attachment<>'' AND domain=" & domain & "AND expiryDate>" & dateCheck & " ORDER BY entryDate DESC" set rsmanset=datapath1.execute(Sql)%> Tucsa - Turk Yapisal Celik Dernegi Portali
<%if left(right(time,4),1) = 1 or left(right(time,4),1) = 2 or left(right(time,4),1) = 3 or left(right(time,4),1) = 4 then%>
<%=rsmanset("title")%>
">" width="155"> <%=rsmanset("abstract")%>...

">devamı


<%rsp.movenext%> <%rsp.movenext%>
Türkiye'nin Çelik Yapıları (Diğer Projeler)
">" alt="yayin" width="73" height="58"> <%=rsp("title")%>
<%=left(rsp("abstract"),60)%>...
">" alt="yayin" width="73" height="58"> <%=rsp("title")%>
<%=left(rsp("abstract"),60)%>...
">" alt="yayin" width="73" height="58"> <%=rsp("title")%>
<%=left(rsp("abstract"),60)%>...

tucsamark

<%end if%> <%if left(right(time,4),1) = 5 or left(right(time,4),1) = 6 or left(right(time,4),1) = 7 then %>

tucsamark

<%end if%> <%if left(right(time,4),1) = 8 or left(right(time,4),1) = 9 or left(right(time,4),1) = 0 then %>

tucsamark

<%end if%>

--------
Duyurular
">" alt="Duyuru" width="59"> "><%=rsresimli("title")%>
<%=rsresimli("abstract")%>
<%rsd.movenext%>
"><%=rsd("title")%>...
"><%=rsd("title")%>...
 
Bültenimize üye olun

 
<%rsh.movenext%> <%rsh.movenext%> <%rsh.movenext%> <%rsh.movenext%>
AB Projeleri
"><%=rsh("title")%>
"><%=rsh("title")%>
"><%=rsh("title")%>
"><%=rsh("title")%>
"><%=rsh("title")%>
 
Türk Yapısal Çelik Derneği - Turkish Constructional Steelwork Association
<% rsh.close rsd.close rse.close rsm.close rsp.close rsresimli.close rsmanset.close datapath1.close set rsh=nothing set rsd=nothing set rse=nothing set rsm=nothing set rsp=nothing set rsresimli=nothing set rsmanset=nothing set datapath1=nothing %>