我用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%>好象实现不了啊,也不知道怎么才能看出来变量值是否变了问题困饶我好久,希望高手给个详细的解答

解决方案 »

  1.   

    <%set a=server.CreateObject("aaa1.usercontrol1")%>
    <%a.mtext=12345%>
    <%=a.mtext%>这样得不到12345吗?肯定能,不用试了你是看不到控件吧set a=server.CreateObject("aaa1.usercontrol1")
    这句是在服务端创建控件,相当于dll(只提供服务,没有界面的),客户端当然是不可能看到的
      

  2.   

    怎么在在服务器端显示,我加入:
    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
    好象还是不行啊,为什么呢
      

  3.   

    回复人: super2002tian(大田) ( ) 信誉:100  2003-12-09 18:18:00  得分:0 
      
      怎么在控件里显示,因为控件也是可视的啊,控件也有文本框,按钮什么的啊
      
    ---------
    不明白你的意思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和控件是一样的
    只是在服务端(这里可以理解为后台吧)提供服务(或者叫计算)
      

  4.   

    在ASP页中显示控件内容已经实现,但怎么才能实现网页中内容传向控件中
    <%=a.mtext%>
    显示没问题
    但<%a.mtext=12345%>好象实现不了啊,也不知道怎么才能看出来变量值是否变了------------------------------------
    <%set a=server.CreateObject("aaa1.usercontrol1")%>
    <%a.mtext=12345%>
    <%=a.mtext%>这样得不到12345吗?