<% NewIP=Request.Servervariables("REMOTE_HOST") NewDate=day(now) & "/" & month(now)& "/" & year(now) & " " & formatdatetime(now, 3) Dim rscon Set rscon = Server.CreateObject("ADODB.Connection") Set rs = Server.CreateObject("ADODB.Recordset") rscon.Mode = 3 rscon.Open "Provider=MICROSOFT.JET.OLEDB.4.0;Data Source=\\filer\Sites\NV318031\www.iiche.org.il\mdb_files\IIChE.mdb;" InsertQuery="INSERT INTO countr (c_ip, c_date) VALUES ('" & NewIP & "', '" & NewDate & "');" ' Response.Write(insertquery) rs.Open InsertQuery, rscon %>

Conferences IIChE Annual Meetings and Co-sponsored events Workshops Worldwide IICHE Sponsors Industrial Support Academic Support Links Publications E-Journal Academic Sites Professional Societies Educational Material Library Notices Weekly Seminars Seminars Archive Employment Bulletin Board To view attached documents on this site you need a pdf reader, such as Acrobat Reader. To download Acrobat Reader click here.