簡體   English   中英

使用Java的DIV的導航問題。 使用VS2013和VB構建的項目

[英]Navigation problems with DIVs using Javascript. Project built using VS2013 and VB

嘿,我在尋求幫助,因為我的應用程序導航出現問題。 基本上,該站點分為Divs,並且有一個save / next按鈕,應將用戶帶到下一個Div(屏幕)。 客戶端事件是JavaScript。 問題是,當我單擊按鈕時,整個應用程序出現在屏幕上,而不僅僅是單個屏幕。 有人可以建議如何隱藏其他Divs,以便僅顯示當前Divs。 我的主div稱為divOverview,然后下一個屏幕稱為divContactDetails,然后依次類推,以此類推,另外9個屏幕(divs)。 謝謝

     <dx:LayoutItem ColSpan="1" ShowCaption="False">
            <LayoutItemNestedControlCollection>
                <dx:LayoutItemNestedControlContainer runat="server" Width="100%">
                    <dx:ASPxButton ID="btnSave" runat="server" AutoPostBack="False" Text="Save/Next" Theme="Office2010Blue" OnClick="btnSave_Click">
                        <ClientSideEvents Click="function(s,e) {javascript:showonlyonev2('divContactDetails');}" />
                    </dx:ASPxButton>
                </dx:LayoutItemNestedControlContainer>
            </LayoutItemNestedControlCollection>
        </dx:LayoutItem>

帶有保存按鈕的on_click是后面的VB代碼

        If FocusSet = True Then
            ErrDetails.ForeColor = Drawing.Color.Red
            ErrDetails.Height = 20 * errCount
            ' Show the Overview screen at the beginning
            If (Not ClientScript.IsStartupScriptRegistered("showonlyonev2")) Then
                Page.ClientScript.RegisterStartupScript _
                (Me.GetType(), "showonlyonev2", "showonlyonev2('divContactDetails');", True)
            End If
            If (Not ClientScript.IsStartupScriptRegistered("showonlyonev2")) Then
                Page.ClientScript.RegisterStartupScript _
                (Me.GetType(), "showonlyonev2", "showonlyonev2('divContactDetails');", True)
            End If
            Return
        End If

JavaScript代碼(編輯):

               <script type="text/javascript">
    function showonlyonev2(thechosenone) {
        var newboxes = document.getElementsByTagName("div");
        for (var x = 0; x < newboxes.length; x++) {
            name = newboxes[x].getAttribute("class");
            if (name == 'newboxes-2') {
                if (newboxes[x].id == thechosenone) {
                    if (newboxes[x].style.display == 'block') {
                        newboxes[x].style.display = 'none';
                    }
                    else {
                        newboxes[x].style.display = 'block';
                    }
                } else {
                    newboxes[x].style.display = 'none';
                }
            }
        }
    }

我似乎已經解決了可見性問題。 我簡單地刪除了VB代碼的第二部分。

        If (Not ClientScript.IsStartupScriptRegistered("showonlyonev2")) Then
            Page.ClientScript.RegisterStartupScript _
            (Me.GetType(), "showonlyonev2", "showonlyonev2('divContactDetails');", True)
        End If
        Return
    End If

現在導航更好,但現在在其他代碼上獲得了空引用。 編程的樂趣!

暫無
暫無

聲明:本站的技術帖子網頁,遵循CC BY-SA 4.0協議,如果您需要轉載,請注明本站網址或者原文地址。任何問題請咨詢:yoyou2525@163.com.

 
粵ICP備18138465號  © 2020-2024 STACKOOM.COM