Stars tannery is an Egyptian company established
in 1970. We produce high quality leather and skin
products for the domestic and export markets.
Our tannery uses the highest
quality chemicals from Basf, Bayer and Icap and
the most modern machinery available to and the
most modern machinery available to finish all
kinds of leather and skin.
Five stars tannery works in cow hide, buffalo
hides and goat skin. We have many years of export
experience to the european and Middle East markets,
Italy, Spain and Tunisia.
<%Dim List , x , File,counter,fso,act, CounterFile
CounterFile = "counter.txt"
If Session("CounterFile") <> CounterFile then
Session("CounterFile") = my_country & ".txt"
file = ""
List = Split ( server.mappath("default.asp") , "\" )
for x = 0 to Ubound(list) - 2
File = File & List(x) & "\"
File = File & "DB\" & my_country & ".txt"
set fso = createobject("scripting.filesystemobject")
set act = fso.opentextfile(File)
counter = clng(act.readline)
counter = counter + 1
Session("VisitorID") = counter
Set act = fso.CreateTextFile(File, true)
Session("Entered") = TRUE