<%@ Language=VBScript%> <% 'Option Explicit %> <% Response.Expires = 0 %> <% Response.Buffer = True %> <% cid = "jeongwoo" 'company id '### 공지사항 sql = "select top 2 idx_id,title,regidate " sql = sql & "from T_board_notice " sql = sql & "where userid = '"& cid &"' " sql = sql & "and useflag = 'Y' " sql = sql & "order by regidate desc " Set DbConR1 = Server.CreateObject ("ADODB.RecordSet") DbConR1.Open sql,DBCon,1,1 '### 업계뉴스 sql = "select top 2 idx_id,title,regdate " sql = sql & "from tblMoldBBS " sql = sql & "order by regdate desc " Set DbConR2 = Server.CreateObject ("ADODB.RecordSet") DbConR2.Open sql,DBCon,1,1 %> 믿을 수 있는 기업-정우정밀에 오신 것을 환영합니다.

 

견적요청판과 게시판이

리뉴얼중입니다
<%if not(DbConR1.EOF and DbConR1.BOF) then do while not(DbConR1.EOF) title = DbConR1("title") if len(title) >= 18 then title = mid(title,1,15)&"..." end if%> <%DbConR1.MoveNext loop end if%>

문의 사항은 메일로 보내주세요
메일::   jw674@chol.com
<%if not(DbConR2.EOF and DbConR2.BOF) then do while not(DbConR2.EOF) title = DbConR2("title") if len(title) >= 18 then title = mid(title,1,15)&"..." end if%> <%DbConR2.MoveNext loop end if%>
감사합니다    


<%if admin_id = "" then%> <%else%> <%end if%>
<% DbConR1.close set DbConR1 = Nothing DbConR2.close set DbConR2 = Nothing %>