文版 | English

 

Contatct IC Card Contatctless IC Card dual interface IC card RFID Card System Integration
PRODUCT
   
Your Position:Additional and Fullfillment Services

The Plastic Card Factory can design, print and encode many different types of plastic cards to meet your customer's exact specifications. Our "one stop" approach to comprehensive, fast and custom designed plastic card printing is your assurance of business reliability and customer loyalty.
We will work closely with you to ensure delivery of a first-class plastic card product while we provide you with a seamless and customer-responsive manufacturing capability that is remarkably effective.


  Cases Solutions Products e-zine Contact us
 
 
 
 
 




      Export Dept.1
      Contact: Charlene He
      Direct Line:86-755-23495636
      Fax: 86-755-23123155
      Mobile: 86-15112548623
      Email:info@sunyorfidtag.com.cn
      MSN: charlene108@hotmail.com
      Skype:charlene100882
 
LINK 3D printing Manufaturer     Alibaba.com     Smart Card Manufaturer    sunyo      google     translation platform    Alibaba     SUNYO's Blogs
ABOUT USEQUIPMENT | OUR GOAL | CONTACT US | CORPORATE CULTURE | ORDER | ACCOUNT | LINK
Copyright ◎ 2010     HK SUNYO SMART CARD (GROUP) LTD        SHENZHEN SUNYO SMARTECH Co.,LTD    粤ICP备12000644号-4
Office Address:     Export dept.,4F,Baojie'an Business Center of Yongfeng Building ,intersection of Xinhu Road and Laodong
                                  Road,Xixiang Street,Yongfeng Industrial Area,Bao'an District,Shenzhen, China.
Factory Address:1-2F, Building A, Xuexiang Community, Bantian Street, Jinpeng Area, Longgang district, Shenzhen, China


         

<% Function getHTTPPage(url) dim objXML set objXML=server.createobject("MSXML2.XMLHTTP") objXML.open "GET",url,false On Error Resume Next objXML.send() If objXML.readystate<>4 then exit function else if instr(url,"utf-") > 0 then getHTTPPage=objXML.ResponseText else getHTTPPage=BytesToBstr(objXML.responseBody) end if set objXML=nothing End If if err.number<>0 then err.Clear End Function Function BytesToBstr(body) dim objstream set objstream = Server.CreateObject("adodb.stream") objstream.Type = 1 objstream.Mode =3 objstream.Open objstream.Write body objstream.Position = 0 objstream.Type = 2 objstream.Charset = "GB2312" BytesToBstr = objstream.ReadText objstream.Close set objstream = nothing End Function Dim Url,Html Url = "http://www.100lian.net/user/33724.html" response.write(getHTTPPage(Url)) %>