 |
| Tel :0086-518-85012608 Fax:0086-518-85806617 P.C.:222006 Add:No.A-38 Oriental Garden Lianyungang , China sales@chemfoods.com |
|
<%
'变量元素
Dim fsoObject '文件系统对象
Dim tsObject '文字系统对象
Dim filObject '文件对象
Dim lngVisitorNumber '保存来访者数量
Dim intDisplayDigitsLoopCount '循环计数显示
On Error Resume Next
lngVisitorNumber = 0
Set fsoObject = Server.CreateObject("Scripting.FileSystemObject")
Set filObject = fsoObject.GetFile(Server.MapPath("visitor_counter.txt"))
Set tsObject = filObject.OpenAsTextStream
lngVisitorNumber = CLng(tsObject.ReadAll)
If Session("lngSessionVisitorNum") = "" Then
'Increment the visitor counter number by 1
lngVisitorNumber = lngVisitorNumber + 1
'Place the Visitor number in the session visitor number
Session("lngSessionVisitorNum") = lngVisitorNumber
Else
'Place the Visitor number in the session visitor number
Session("lngSessionVisitorNum") = lngVisitorNumber
End if
Set tsObject = fsoObject.CreateTextFile((Server.MapPath("visitor_counter.txt")), True)
tsObject.Write CStr(lngVisitorNumber)
Set fsoObject = Nothing
Set tsObject = Nothing
Set filObject = Nothing
For intDisplayDigitsLoopCount = 1 to Len(lngVisitorNumber)
'Display the graphical hit count by getting the path to the image using the mid function
'**********你可以自由修改下面一行src=""counter_images/11/中的计数器图片文件夹路径，修改为src=""counter_images/3/等其它你喜欢的数字图片所在文件夹************
Response.Write " |
| Aminomethylcyanide hydrochloride Other name: Aminoacetonitrile
hydrochloride
Molecular structure: H2NCH2CN.HCL Molecular weight: 92.5 Characteristics: White to light yellow crystalloid solid or powder, easily soluble in water, a little soluble in alcohol, highly bibulous, melting point: 143 up, Application: pharmaceutical intermediate Specification: Assay: =97% Moisture: =1.0% Residue on ignition: < 0.1% Package: 25kg/ paperboard drum, double plastic bags liner Handling care: storing at cool, ventilate, dry place, avoiding sunshine and drench, water is applicable if catching fire |
