Welcome To Jilling.com

<% ' Every time we count a user we will put the ' latest count value in the session variable "TotalCount" ' If Session Variable TotalCount is empty ' that mean this user is new and session variable ' But if Session Variable already has the value ' Then we will not count this user again. If IsEmpty(Session("TotalCount")) Then Call CountThisUser End If ' It is good practice to use Functions and Sub procedure ' Because all the variables being used in sub or function ' are automatically destroyed when Sub or Function finish ' processing the code. ' So you can use these Variables again in other functions Sub CountThisUser() Dim objFSO ' FileSystemObject Dim objTS ' TextStreamObject Dim strFileName ' Counter text File Name Dim intOldCount Dim intNewCount ' Specify the Text file to store count value ' Because We Set Create = True ' File will be Created if it does not exist strFileName = Server.MapPath("Counter.txt") Set objFSO = Server.CreateObject("Scripting.FileSystemObject") If objFSO.FileExists(strFileName) Then Set objTS = objFSO.OpenTextFile(strFileName, 1) Else Set objTS = objFSO.CreateTextFile(strFileName, True) End If If Not objTS.AtEndOfStream Then intoldCount = objTS.ReadAll Else intoldCount = 0 End If objTS.Close intNewCount = intOldCount + 1 ' Store the value of intNewCount in Session Variable ' So you can use it on different pages Session("TotalCount")= intNewCount ' Write intNewCount value back to text file Set objTS = objFSO.CreateTextFile(strFileName, True) objTS.Write intNewCount objTS.Close Set objFSO = Nothing Set objTS = Nothing End Sub %>

Relentlessly Pursue Excellence!

SITE NAVIGATION

Guaranteed Cost Savings

Internal Auditing

Management Overview

Develop Your Supply Chain

Manage TS 16949

Manage ISO 9001

Get Value From ISO 14001

Integrating ISO 14001

Lean Manufacturing

Integrating Kaizen

APQP Product Launches

Management POV on Quality

WELCOME TO JILLING.COM

We are promoting a different approach to doing ISO 9001 and TS-16949. The focus has to be on squeezing more value and benefits
from our ISO and TS programs. The internal audits are often not getting all the profits and improvements that are available. We need to
apply a different approach to it. Please email hjilling1@aol.com for more info.

Thanks for stopping by. We are still working hard to bring you a great site. Please check back as more links and content will be added.
For now, if you would like to contact Helmut Jilling about consulting, training or auditing services, you may email him at hjilling1@aol.com.

Our Policy - "If this stuff doesn’t save you time or money, then why are you doing it?"
(Ask about our Guarantee!)

Training, Consulting and Auditing:

Guaranteed Cost Savings (or my services are free)
Internal Auditing – Basic and Advanced (we need to get more from our audits)
Management Overview (find the value in TS-16949, & ISO)
Develop your Supply Chain – Get Maximum Performance at No Cost
Manage TS 16949 for Maximum improvement, efficiency and Profit
Manage ISO 9001 for Maximum improvement, efficiency and Profit
Get the Most Value from your ISO 14001 system
ISO 14001 (integrating with TS/ISO to save cost)
Lean Manufacturing (integrating with TS/ISO)
Kaizen (integrating with TS/ISO)
APQP Product launches (for maximum process improvement and savings) - If you can solve a problem AFTER launch, why can’t we fix it BEFORE?
Quality from the Management’s point of view – the bottom line (get everyone on the same page)

Coming Soon:
- Forms and Tools Available for Download
- Links to other interesting sites
- Links to Interesting News Items, Downloads


	(C) 2007 All Rights Reserved

Home || Enquiry || Testimonials || About Us