主题：e.postValues数据传递请教？

第6行的“CP”，第7行的“GY”成功的传递给了第14行；用同样的方法第19行的“SF”和第24行的"yzcm"却不能被第39行引用。请老师指教一下！

1	Select Case e.Path
2	Case "addpyh69xg.htm"
3	Dim wb As New WeUI '定义一个基于weui框架的网页生成器
4	wb.AddForm("","form1","addpyh69xg2.htm")
5	With wb.AddInputGroup("form1","ipg1","注册码查询")
6	.AddSelect("cp","省份","黑龙江|辽宁|吉林")
7	.AddInput("gy","注册码","text")
8	End With
9	With wb.AddButtonGroup("form1","btg1",True)
10	.Add("btn1","确定","submit")
11	End With
12	e.WriteString(wb.Build) '生成网页
13	Case "addpyh69xg2.htm"
14	Dim h As DataRow = DataTables(e.PostValues("cp")).SQLFind("注册码='" & e.PostValues("gy") & "'")
15	If h IsNot Nothing Then
16	Dim xg As New WeUI '定义一个基于weui框架的网页生成器
17	xg.AddForm("","form2","test.htm")
18	With xg.AddInputGroup("form2","ipg2","注册码修改")
19	With .AddInput("sf","省份:","text")
20	.Value = e.PostValues("cp")
21	.Required = True
22	.Readonly = True
23	End With
24	With .AddInput("yzcm","注册码:","text")
25	.Value = e.PostValues("gy")
26	.Required = True
27	.Readonly = True
28	End With
29	With .AddInput("jqm","修改机器码:","text")
30	.Value = h("机器码")
31	End With
32	End With
33	With xg.AddButtonGroup("form2","btg2",True)
34	.Add("btn2","确定修改","submit","test.htm")
35	End With
36	e.WriteString(xg.Build) '生成网页
37	End If
38	Case "test.htm"
39	Dim hs As DataRow = DataTables(e.postValues("sf")).SQLFind("注册码='" & e.postValues("yzcm") & "'")
40	If hs IsNot Nothing Then
41	hs("机器码")=e.PostValues("jqm")
42	Dim wb3 As new WeUI
43	wb3.AddForm("","form3","test.htm")
44	With wb3.AddMsgPage("","msgpage","操作完成","内容详情,可通过查询查看修改结果")
45	.AddButton("btn1","确定")
46	.AddButton("btn2","返回","addpyh69xg.htm")
47	End With
48	e.WriteString(wb3.Build) '生成网页
49	End If
50	End Select