Main.cs
6.3 KB
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
//using System;
//using System.Collections.Generic;
//using System.Text;
//using System.IO;
//using System.Xml;
//using System.Data;
//namespace App
//{
// class Main
// {
//// public MSXML2.DOMDocument30 xmlDoc =new MSXML2.DOMDocument30;
////Public xmlNode As IXMLDOMNode
// //创建一个XmlDocument对象
// public XmlDocument xmlDoc = new XmlDocument();
// public XmlNode xmlNode = new XmlNode();
////使用者习惯定义
// public string LangCode; //语言选择
// public string LangID; //语言选择
// public string UserPwd; //客户密码
// public string UserChang; //长度
// public string UserKuan; //宽度
// public string UserShow; //测试结果显示
// //参数定义
// public string ParChang; //长度
// public string ParKuan; //宽度
// public string ParArea; //面积
// public string ParTime; //测试时间
// public string ParAreaSet; //面积设定
// public string ParUpType; //修正方式
// public string ParMIL; //MIL修正值
// public string ParDEF; //DEF修正值
// public string ParLimit; //用户极限
// public string ParCom; //端口设定
// public int ParStabTime; //端口设定
// public double ParStabValue; //端口设定
// public double ParStabCoeff;
// public double ParStabVolume;
// public int TestDelay1;
// public int TestDelay2;
// public double ParKValue; //k值 add by 12.2 lxb
// public string CorrectFlag; //修正种类
// //菜单链接参数
// public string mnuUrl;
// public bool jzFlag;
//public void Main()
//{
// LoadCfg();
// if( UserPwd != "")
// {
// //frmPassword.Show
// //frmPassword.ZOrder 0
// }
// else
// {
// //frmMain.Show
// //frmMain.ZOrder 0
// }
//}
//public void LoadCfg()
//{
// XmlNode xmlTmp =new XmlNode();
// xmlDoc.Load (App.path() & "\\Cfg\\cfg.ctf");
// xmlNode = xmlDoc.SelectSingleNode("cfg");
// xmlTmp = xmlNode.SelectSingleNode("language");
// if( xmlTmp ==null)
// LangCode = "eng";
// else
// LangCode = xmlTmp.Text;
// if(xmlNode.selectSingleNode("lang") ==null)
// LangID = "1";
// else
// LangID = xmlNode.selectSingleNode("lang").Text;
// if (xmlNode.selectSingleNode("UserPwd")==null)
// {
// UserPwd = "";
// }
// else
// {
// if(xmlNode.selectSingleNode("UserPwd").Text <> "")
// {
// Dim clsRSA As New RSA
// clsRSA.PublicKey = "32823"
// clsRSA.Modulus = "29893"
// clsRSA.PrivateKey = "20643"
// UserPwd = clsRSA.Decode(xmlNode.selectSingleNode("UserPwd").Text)
// Set clsRSA = Nothing
// else
// UserPwd = ""
// }
// }
// If xmlNode.selectSingleNode("UserChang") Is Nothing Then
// UserChang = "0"
// Else
// UserChang = xmlNode.selectSingleNode("UserChang").Text
// End If
// If xmlNode.selectSingleNode("UserKuan") Is Nothing Then
// UserKuan = "0"
// Else
// UserKuan = xmlNode.selectSingleNode("UserKuan").Text
// End If
// If xmlNode.selectSingleNode("UserShow") Is Nothing Then
// UserShow = "0"
// Else
// UserShow = xmlNode.selectSingleNode("UserShow").Text
// End If
// If xmlNode.selectSingleNode("ParChang") Is Nothing Then
// ParChang = "0"
// Else
// ParChang = xmlNode.selectSingleNode("ParChang").Text
// End If
// If xmlNode.selectSingleNode("ParKuan") Is Nothing Then
// ParKuan = "0"
// Else
// ParKuan = xmlNode.selectSingleNode("ParKuan").Text
// End If
// If xmlNode.selectSingleNode("ParArea") Is Nothing Then
// ParArea = "0"
// Else
// ParArea = xmlNode.selectSingleNode("ParArea").Text
// End If
// If xmlNode.selectSingleNode("ParTime") Is Nothing Then
// ParTime = "0"
// Else
// ParTime = xmlNode.selectSingleNode("ParTime").Text
// End If
// If xmlNode.selectSingleNode("ParAreaSet") Is Nothing Then
// ParAreaSet = "0"
// Else
// ParAreaSet = xmlNode.selectSingleNode("ParAreaSet").Text
// End If
// If xmlNode.selectSingleNode("ParMIL") Is Nothing Then
// ParMIL = ""
// Else
// ParMIL = xmlNode.selectSingleNode("ParMIL").Text
// End If
// If xmlNode.selectSingleNode("ParDEF") Is Nothing Then
// ParDEF = ""
// Else
// ParDEF = xmlNode.selectSingleNode("ParDEF").Text
// End If
// If xmlNode.selectSingleNode("ParLimit") Is Nothing Then
// ParLimit = "0"
// Else
// ParLimit = xmlNode.selectSingleNode("ParLimit").Text
// End If
// If xmlNode.selectSingleNode("ParCom") Is Nothing Then
// ParCom = "0"
// Else
// ParCom = xmlNode.selectSingleNode("ParCom").Text
// End If
// If xmlNode.selectSingleNode("ParStabTime") Is Nothing Then
// ParStabTime = 0
// Else
// ParStabTime = CInt(xmlNode.selectSingleNode("ParStabTime").Text)
// End If
// If xmlNode.selectSingleNode("ParStabValue") Is Nothing Then
// ParStabValue = 0
// Else
// ParStabValue = CDbl(xmlNode.selectSingleNode("ParStabValue").Text)
// End If
// If xmlNode.selectSingleNode("ParStabCoeff") Is Nothing Then
// ParStabCoeff = 1
// Else
// ParStabCoeff = CDbl(xmlNode.selectSingleNode("ParStabCoeff").Text)
// End If
// If xmlNode.selectSingleNode("ParStabVolume") Is Nothing Then
// ParStabVolume = 1
// Else
// ParStabVolume = CDbl(xmlNode.selectSingleNode("ParStabVolume").Text)
// End If
// If xmlNode.selectSingleNode("TestDelay1") Is Nothing Then
// TestDelay1 = 5
// Else
// TestDelay1 = CDbl(xmlNode.selectSingleNode("TestDelay1").Text)
// End If
// If xmlNode.selectSingleNode("TestDelay2") Is Nothing Then
// TestDelay2 = 5
// Else
// TestDelay2 = CDbl(xmlNode.selectSingleNode("TestDelay2").Text)
// End If
// If xmlNode.selectSingleNode("ParKValue") Is Nothing Then
// ParKValue = 0
// Else
// ParKValue = CDbl(xmlNode.selectSingleNode("ParKValue").Text)
// End If
// Exit Sub
//err:
// a = MsgBox("System setting error,please reinstall your software!", vbInformation)
// Exit Sub
// Unload frmMain
//End Sub
// }
//}