企业新闻
-
2014年大族粤铭激光春节放假通知 - 2014-01-16 - 内容简介: 新年寄语 - 2014-01-03
- 内容简介:
尊敬的各位同仁、合作伙伴、社会各界朋友们：
迎着2014年新年的钟声，我们迎来了新的一年。此时，我们心潮激荡，此刻，我们笑意飞扬。亲爱的朋友，值此辞旧迎新之际，我们对十三年来始终关注和支持大族粤铭激光的所有社...
- 大族粤铭开展激光基础知识培训 - 2013-12-04
- 内容简介:
为创建学习型企业，培养和开发人才，增强竞争力，为企业今后的发展提供助力和动力，大族粤铭企业定期举行各类培训。
- 提升企业文化，大族粤铭举行第九届员工运动会 - 2013-12-03
- 内容简介:
<%
Set objConn = Server.CreateObject("ADODB.Connection")
objConn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;" &_
"Data Source=" & Server.MapPath("../../SiteFiles/Data.asax")
objConn.Open
strSQL = "SELECT id,Title FROM au_Content where NodeID=804"
Set objRS = Server.CreateObject("ADODB.Recordset")
objRS.Open strSQL, objConn, 1, 1
Count=objRS.RecordCount
Item=10
redim a(Item, 2),t(Count)
for each j in t
j=0
next
Randomize timer
for j=1 to Item
k=int(rnd*Count+1)
do while t(k)<>0
k=int(rnd*Item+1)
loop
t(k)=1
next
j=1:i=1
Do While Not objRS.Eof
if t(j)=1 then
a(i,1)=objRS("id")
a(i,2)=objRS("Title")
i=i+1
end if
j=j+1
objRS.MoveNext
Loop
for i=1 to Item
Response.write ""&a(i,2)&" "
next
objRs.Close
set objRs=nothing
objConn.Close
set objConn=nothing
%>
- Copyright © 2009-2013 ymlaser.com All Right Reserved. 广东大族粤铭激光科技股份有限公司 版权所有
- 市场总部销售热线: 0769-89838888、89839999 激光切割机,激光打标机,激光雕刻机大型专业激光设备制造商 粤ICP备12053535
