2012-09-18 84 views
7

Estoy trabajando por primera vez con el código vb.net, pero tengo 5 años de experiencia con C#. del desarrollador anterior me dijeron que el código que está en el servidor funciona bien sin ningún error, pero tan pronto como abrí la carpeta del sitio web (el sitio web no tiene el archivo de solución), traté de construir el sitio y tiene un montón de errores que dicen:error de vb.net: inaccesible debido a su nivel de protección

'labelControl' is not declared. It may be inaccessible due to its protection level.

lo que está sucediendo para todos los controles de dos de las páginas abrí hasta ahora. Honestamente, me da miedo abrir más páginas :).

Estas son partes del código de marcado, la lógica y el diseñador de uno de los archivos:

de marcado:

<%@ Page Title="" Language="vb" AutoEventWireup="false" MasterPageFile="~/Site.Master" CodeBehind="OverriedCalcValues.aspx.vb" Inherits="Homevesters.Overried_Calc_Values" %> 
<asp:Content ID="Content1" ContentPlaceHolderID="HeadContent" runat="server">  
    </asp:Content> 
<asp:Content ID="Content2" ContentPlaceHolderID="MainContent" runat="server"> 
     <table cellpadding="5" border="1">        
     <tr> 
        <td class="style15"><asp:label ID="lblDoorJam1" runat="server" Font-Bold="true" Text="Door Jamb"/><br />Cost per door jamb replacement</td> 
        <td class="style38"><asp:label ID="lblFactorType1" runat="server" Text="$/Each"/></td> 
        <td class="style41"><asp:label ID="lblDoorJam" runat="server" Text=""/></td> 
        <td class="style32"><asp:CheckBox ID="ckDoorJam" runat="server"/></td> 
        <td class="style35">$<asp:TextBox ID="txtDoorJam" runat="server" Text="" Width="80px" /></td> 
     </tr> 

     <tr> 
        <td class="style16"><asp:label ID="lblExtDoor1" runat="server" Font-Bold="true" Text="Exterior Door"/><br />Cost per exterior door replacement</td> 
        <td class="style39"><asp:label ID="lblFactorType2" runat="server" Text="$/Each"/></td> 
        <td class="style42"><asp:label ID="lblExtDoor" runat="server" Text=""/></td> 
        <td class="style33"><asp:CheckBox ID="ckExtDoor" runat="server"/></td> 
        <td class="style36">$<asp:TextBox ID="txtExtDoor" runat="server" Text="" Width="80px" /></td> 
     </tr> 

     <tr> 
        <td class="style15"><asp:label ID="lblGarageSingle1" runat="server" Font-Bold="true" Text="Garage (1 Single)"/><br />Cost to replace one single garage door</td> 
        <td class="style38"><asp:label ID="lblFactorType3" runat="server" Text="$/Each"/></td> 
        <td class="style41"><asp:label ID="lblGarageSingle" runat="server" Text=""/></td> 
        <td class="style32"><asp:CheckBox ID="ckGarageSingle" runat="server"/></td> 
        <td class="style35">$<asp:TextBox ID="txtGarageSingle" runat="server" Text="" Width="80px" /></td> 
     </tr> 

     <tr> 
        <td class="style16"><asp:label ID="lblGarageDouble1" runat="server" Font-Bold="true" Text="Garage (1 Double)"/><br />Cost to replace one double garage door</td> 
        <td class="style39"><asp:label ID="lblFactorType4" runat="server" Text="$/Each"/></td> 
        <td class="style42"><asp:label ID="lblGarageDouble" runat="server" Text=""/></td> 
        <td class="style33"><asp:CheckBox ID="ckGarageDouble" runat="server"/></td> 
        <td class="style36">$<asp:TextBox ID="txtGarageDouble" runat="server" Text="" Width="80px" /></td> 
     </tr> 


     <tr> 
        <td class="style15"><asp:label ID="Label1" runat="server" Font-Bold="true" Text="Interior Door"/><br />Cost per interior door replacement</td> 
        <td class="style38"><asp:label ID="Label2" runat="server" Text="$/Each"/></td> 
        <td class="style41"><asp:label ID="lblInteriorDoor" runat="server" Text=""/></td> 
        <td class="style32"><asp:CheckBox ID="ckInteriorDoor" runat="server"/></td> 
        <td class="style35">$<asp:TextBox ID="txtInteriorDoor" runat="server" Text="" Width="80px" /></td> 
     </tr> 

     <tr> 
        <td class="style16"><asp:label ID="Label4" runat="server" Font-Bold="true" Text="Patio Door"/><br />Cost to replace one patio door</td> 
        <td class="style39"><asp:label ID="Label5" runat="server" Text="$/Each"/></td> 
        <td class="style42"><asp:label ID="lblPatioDoor" runat="server" Text=""/></td> 
        <td class="style33"><asp:CheckBox ID="ckPatioDoor" runat="server"/></td> 
        <td class="style36">$<asp:TextBox ID="txtPatioDoor" runat="server" Text="" Width="80px" /></td> 
     </tr> 

     <tr> 
        <td class="style15"><asp:label ID="Label3" runat="server" Font-Bold="true" Text="Patio Glass"/><br />Cost per patio glass replacement</td> 
        <td class="style38"><asp:label ID="Label6" runat="server" Text="$/Each"/></td> 
        <td class="style41"><asp:label ID="lblPatioGlass" runat="server" Text=""/></td> 
        <td class="style32"><asp:CheckBox ID="ckPatioGlass" runat="server"/></td> 
        <td class="style35">$<asp:TextBox ID="txtPatioGlass" runat="server" Text="" Width="80px" /></td> 
     </tr> 



       <tr>   
        <td class="style16"><asp:label ID="Label7" runat="server" Font-Bold="true" Text="Dishwasher"/><br />Cost to replace one dishwasher</td> 
        <td class="style39"><asp:label ID="Label8" runat="server" Text="$/Each"/></td> 
        <td class="style42"><asp:label ID="lblDishWasher" runat="server" Text=""/></td> 
        <td class="style33"><asp:CheckBox ID="ckDishwasher" runat="server"/></td> 
        <td class="style36">$<asp:TextBox ID="txtDishwasher" runat="server" Text="" Width="80px" /></td> 
     </tr>     
</table>     
</asp:Content> 

Lógica:

Imports Homevesters 

Public Class Overried_Calc_Values 
    Inherits System.Web.UI.Page 

    Dim clsValueOrganization As New clsCalcValues 
    Dim clsValueDefaults As New clsCalcValues 


    Protected Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load 

     If IsUserLoggedIn(Me) = False Then 
      Response.Redirect("~/Account/Login.aspx") 
      Exit Sub 
     End If 

     If IsPostBack = False Then 

      clsValueOrganization.Load("", False, Session("OrgID")) 

      clsValueDefaults.Load("", False, "DEFAULT") 

      ' c is dollar format with dollar symbol 
      lblDoorJam.Text = clsValueDefaults.dDoorJamb.ToString("c") 
      lblExtDoor.Text = clsValueDefaults.dExtDoor.ToString("c") 
      lblGarageSingle.Text = clsValueDefaults.dGarageDoorSgl.ToString("c") 
      lblGarageDouble.Text = clsValueDefaults.dGarageDoorDbl.ToString("c") 
      lblInteriorDoor.Text = clsValueDefaults.dIntDoor.ToString("c") 
      lblPatioDoor.Text = clsValueDefaults.dPatioDoor.ToString("c") 
      lblPatioGlass.Text = clsValueDefaults.dPatioGlass.ToString("c") 
      lblDishWasher.Text = clsValueDefaults.dDishwasher.ToString("c") 
      lblFans.Text = clsValueDefaults.dFans.ToString("c") 
      lblLightFixtures.Text = clsValueDefaults.dLightFixture.ToString("c") 
      lblServicePanel.Text = clsValueDefaults.dServicePanel.ToString("c") 
      lblRange.Text = clsValueDefaults.dRange.ToString("c") 
      lblRefrigerator.Text = clsValueDefaults.dRefrigerator.ToString("c") 
      lblStoveTop.Text = clsValueDefaults.dStoveTop.ToString("c") 
      lblVentHood.Text = clsValueDefaults.dVentHoods.ToString("c") 
      lblElectricalWiring.Text = clsValueDefaults.dWiringReplace.ToString("c") 
      lblFloorCovering.Text = clsValueDefaults.dFloorCover.ToString("c") 
      lblTileFloor.Text = clsValueDefaults.dTileFloor.ToString("c") 
      lblOldHouse4150.Text = clsValueDefaults.dOldHouse1.ToString("c") 
      lblOldHouse2140.Text = clsValueDefaults.dOldHouse2.ToString("c") 
      lblOldHouse0020.Text = clsValueDefaults.dOldHouse3.ToString("c") 
      lblOldHouse1900.Text = clsValueDefaults.dOldHouse4.ToString("c") 

      ckMedWood.Checked = Not (clsValueOrganization.dMdWoodWindow = clsValueDefaults.dMdWoodWindow) 
      ckSmallMet.Checked = Not (clsValueOrganization.dSmMetalWindow = clsValueDefaults.dSmMetalWindow) 
      ckSmallPane.Checked = Not (clsValueOrganization.dSmGlassPanes = clsValueDefaults.dSmGlassPanes) 
      ckSmallWood.Checked = Not (clsValueOrganization.dSmWoodWindow = clsValueDefaults.dSmWoodWindow) 



     End If 



    End Sub 



End Class 

diseñador:

'------------------------------------------------------------------------------ 
' <auto-generated> 
'  This code was generated by a tool. 
' 
'  Changes to this file may cause incorrect behavior and will be lost if 
'  the code is regenerated. 
' </auto-generated> 
'------------------------------------------------------------------------------ 

Option Strict On 
Option Explicit On 


Partial Public Class Override_Calc_Values 

    '''<summary> 
    '''lblDoorJam1 control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents lblDoorJam1 As Global.System.Web.UI.WebControls.Label 

    '''<summary> 
    '''lblFactorType1 control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents lblFactorType1 As Global.System.Web.UI.WebControls.Label 

    '''<summary> 
    '''lblDoorJam control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents lblDoorJam As Global.System.Web.UI.WebControls.Label 

    '''<summary> 
    '''ckDoorJam control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents ckDoorJam As Global.System.Web.UI.WebControls.CheckBox 

    '''<summary> 
    '''txtDoorJam control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents txtDoorJam As Global.System.Web.UI.WebControls.TextBox 

    '''<summary> 
    '''lblExtDoor1 control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents lblExtDoor1 As Global.System.Web.UI.WebControls.Label 

    '''<summary> 
    '''lblFactorType2 control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents lblFactorType2 As Global.System.Web.UI.WebControls.Label 

    '''<summary> 
    '''lblExtDoor control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents lblExtDoor As Global.System.Web.UI.WebControls.Label 

    '''<summary> 
    '''ckExtDoor control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents ckExtDoor As Global.System.Web.UI.WebControls.CheckBox 

    '''<summary> 
    '''txtExtDoor control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents txtExtDoor As Global.System.Web.UI.WebControls.TextBox 

    '''<summary> 
    '''lblGarageSingle1 control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents lblGarageSingle1 As Global.System.Web.UI.WebControls.Label 

    '''<summary> 
    '''lblFactorType3 control. 
    '''</summary> 
    '''<remarks> 
    '''Auto-generated field. 
    '''To modify move field declaration from designer file to code-behind file. 
    '''</remarks> 
    Protected WithEvents lblFactorType3 As Global.System.Web.UI.WebControls.Label 

End Class 

Aquí hay algunos e de los errores que estoy recibiendo:

Screenshot

por favor hágamelo saber qué cree que puede ser la razón. Espero con interés recibir noticias suyas pronto. Gracias, Laziale

+0

cambiaste el espacio de nombre del código detrás del archivo o cambiaste las Heredades = "....." en la directiva de la página del marcado '.aspx'. verifique si coinciden – codingbiz

Respuesta

3

Si su código se copia textualmente, el nombre de la clase en el bloque de lógica está mal escrito y no coincide con el nombre en el archivo del diseñador. Esto hace que se interprete como dos clases separadas, lo que causa los errores. El código en el archivo no puede hacer referencia a los objetos definidos en el otro archivo.

Corrija el nombre de la clase en el bloque lógico para que coincida con el bloque del diseñador y los errores desaparecerán.

Editar: Observé que también estaba mal escrito en la primera línea del archivo de marcado. Asegúrese de corregir el nombre de la clase allí también.

Cuestiones relacionadas