倒数第4行,创建cookie,跳转到zhucwc.htm时,发现cookie:qrregister没有创建
局部代码:
Dim queren As String = "ok"
wb.AppendCookie("qrregister",queren,5) '此cookie在valid_register.htm底部创建,用于:如果进入下个页面,没有这个cookie,则跳转到首页(httprequest删除)
msgbox(14)
wb.InsertHTML("<meta http-equiv='Refresh' con-tent='0; ur-l=/zhucwc.htm'>") '那么直接跳转页面
e.WriteString(wb.Build) '生成网页
全部代码:(倒数第4行)