我用VB做了个控件,控件中有个文本框,并且定义了一个属性,想用控件与ASP页交互,在ASP页中显示控件内容已经实现,但怎么才能实现网页中内容传向控件中:属性定义如下:
Public Property Let mtext(ByVal s As String)
Text1.Text = s
End Property
Public Property Get mtext() As String
mtext = Text1.Text
End PropertyASP页中
<%set a=server.CreateObject("aaa1.usercontrol1")%>
<%=a.mtext%>
显示没问题
但<%a.mtext=12345%>好象实现不了啊,也不知道怎么才能看出来变量值是否变了问题困饶我好久,希望高手给个详细的解答
Public Property Let mtext(ByVal s As String)
Text1.Text = s
End Property
Public Property Get mtext() As String
mtext = Text1.Text
End PropertyASP页中
<%set a=server.CreateObject("aaa1.usercontrol1")%>
<%=a.mtext%>
显示没问题
但<%a.mtext=12345%>好象实现不了啊,也不知道怎么才能看出来变量值是否变了问题困饶我好久,希望高手给个详细的解答
解决方案 »
- vb里怎样让程序每3秒按一下F1键????
- 这个问题需要知识比较全面的人来回答
- 如何用MSHFlexGrid对象将表1中一个字段列内容做为表2中的表头名字
- 求水晶报表9下载地址和水晶报表8的cd key
- 怎样在VB中同时让键盘和鼠标失效?
- ------如何测试重要变量和属性的值?
- 请问 Crystal Report Enterprise 8.0 版的注册码是什么???
- 请问如何自动选定combobox控件里的关键字的行?
- 找解决问题的方法!
- 怎样将图片存入SQL SERVER中,又怎么样把它读出来显示,请给出例子,
- 请问form 与 picturebox 的Cls方法用了哪些Api函数? 我想用Api函数代替cls方法。
- 关于调用com组建的问题,大家救我啊!!!(在线等待)
<%a.mtext=12345%>
<%=a.mtext%>这样得不到12345吗?肯定能,不用试了你是看不到控件吧set a=server.CreateObject("aaa1.usercontrol1")
这句是在服务端创建控件,相当于dll(只提供服务,没有界面的),客户端当然是不可能看到的
function get_mtext() as string
get_mtext=mtext
end function
private sub command1_click()
dim a as string
a=msgbox(get_mtext,vbmsgboxright)
end sub
好象还是不行啊,为什么呢
怎么在控件里显示,因为控件也是可视的啊,控件也有文本框,按钮什么的啊
---------
不明白你的意思function get_mtext() as string
get_mtext=mtext
end function
private sub command1_click()
dim a as string
a=msgbox(get_mtext,vbmsgboxright)
end sub
好象还是不行啊,为什么呢 ''什么不行?对于server.CreateObject来说,dll和控件是一样的
只是在服务端(这里可以理解为后台吧)提供服务(或者叫计算)
<%=a.mtext%>
显示没问题
但<%a.mtext=12345%>好象实现不了啊,也不知道怎么才能看出来变量值是否变了------------------------------------
<%set a=server.CreateObject("aaa1.usercontrol1")%>
<%a.mtext=12345%>
<%=a.mtext%>这样得不到12345吗?