Case "testCarousel.htm"
Dim wb As New weui
wb.AppendHTML("<link rel=\'stylesheet\' href=\'./weui/exweui.min.css\'/>",True)
wb.AppendHTML("<script src=\'./weui/exweui.min.js\' ></script>",True)
With ExWeUI.WebUI.AddCarousel("","sld1")
.AddImage("images/001.jpg")
.AddImage("images/002.jpg","testd.htm")
.AddImage("images/003.jpg","http://www.foxtable.com/")
wb.InsertHTML("",.BuildHtml)
End With
wb.AddForm("","form1","testres.htm")
With wb.AddInputGroup("form1","ipg1","登录")
.AddInput("xm","户名","text")
.AddInput("pw","密码","password")
End With
With wb.AddButtonGroup("form1","btg1",True)
.Add("btn1", "确定", "submit")
End With
wb.AppendHTML("<script>initExWeUI();</script>")
e.WriteString(wb.Build) \'生成网页
把版主例子的代码,复制到自己的项目,就报错了
此主题相关图片如下:212133.png
,求教下这个是什么原因