珠海力派尔汽车配件有限公司汽车零部件制动系统刹车片刹车盘刹车泵

<%@ CODEPAGE=65001 %> <% Set conn = Server.CreateObject("ADODB.Connection") DBPath = Server.MapPath("counter.mdb") conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath SET Rs = Server.CreateObject("ADODB.Recordset") Rs.Open "Select * From counters" , conn,1,3 IF CSTR(Month(Rs("DATE"))) <> CSTR(Month(DATE())) THEN Rs("DATE") = DATE() Rs("YESTERDAY") = RS("TODAY") Rs("BMONTH") = Rs("MONTH") Rs("MONTH") = 1 Rs("TODAY") = 1 Rs.Update ELSE IF CSTR(Day(RS("DATE"))) <> CSTR(Day(DATE())) THEN Rs("DATE") = DATE() Rs("YESTERDAY") = Rs("TODAY") Rs("TODAY") = 1 Rs.Update END IF END IF Rs("TOTAL")=Rs("TOTAL") + 1 Rs("TODAY") =Rs("TODAY") + 1 Rs("MONTH")=Rs("MONTH") + 1 Rs.Update %> 珠海力派尔汽车配件有限公司汽车零部件制动系统刹车片刹车盘刹车泵

邮件系统 Exchange Outlook Web Access

邮件系统 Web Mail