Форум: Форум PHPФорум ApacheФорум Регулярные ВыраженияФорум MySQLHTML+CSS+JavaScriptФорум FlashРазное
Новые темы: 0000000
PHP. Практика создания Web-сайтов (второе издание). Авторы: Кузнецов М.В., Симдянов И.В. PHP на примерах (2 издание). Авторы: Кузнецов М.В., Симдянов И.В. Самоучитель PHP 5 / 6 (3 издание). Авторы: Кузнецов М.В., Симдянов И.В. MySQL на примерах. Авторы: Кузнецов М.В., Симдянов И.В. Самоучитель MySQL 5. Авторы: Кузнецов М.В., Симдянов И.В.
ВСЕ НАШИ КНИГИ
Консультационный центр SoftTime

HTML+CSS+JavaScript

Выбрать другой форум

 

Здравствуйте, Посетитель!

вид форума:
Линейный форум Структурный форум

тема: JavaScript-код работает в InterneExplorer, как заставить работать во всех браузерах?
 
 автор: displayser   (11.01.2012 в 15:12)   письмо автору
369 байт
 
 

Добрый день.
Вопрос такого плана: есть JS - который работает корректно только в IE в остальных браузерах выглядит это не очень.
Приложил файл - код вставить в сообщение не получилось.

Подскажите пожалуйста что нужно добавить (убрать) чтобы работало везде.
Я с JS на "вы" так что прошу сильно не ругать

  Ответить  
 
 автор: АЯС   (11.01.2012 в 17:36)   письмо автору
 
   для: displayser   (11.01.2012 в 15:12)
 

Вместо document.all [что-то] везде пропишите document.getElementById (что-то)

  Ответить  
 
 автор: displayser   (11.01.2012 в 18:19)   письмо автору
 
   для: АЯС   (11.01.2012 в 17:36)
 

В таком случае перестает реагировать на клик и ошибка в браузере (Chrome)
Uncaught ReferenceError: el is not defined

  Ответить  
 
 автор: АЯС   (11.01.2012 в 18:54)   письмо автору
 
   для: displayser   (11.01.2012 в 18:19)
 

Это уже не проблема работы функции.

Это проблема вызова функции.

Что за параметр вы ей передаёте, когда её вызываете?

  Ответить  
 
 автор: displayser   (12.01.2012 в 11:25)   письмо автору
 
   для: АЯС   (11.01.2012 в 18:54)
 

Ну собственно сам код вот такой
  !el = "[el]"
  !elpic = '[el + "pic"]'
  !plus = "'[+]'"
  !minus = "'[-]'"
  !plus1 = "[+]"
  
 // Загрузить строки локализации
  !OrgSummStr = LoadString('DIRLABEL_B4BC53F5-21C0-44EB-9901-BD253C9F2A80'; 'COMMON') // Сводка по организации
  !ContStr = LoadString('DIRLABEL_CC334A8C-D458-4B76-8740-90D4F7CA7122'; 'COMMON') // Координаты
  !AddrStr = LoadString('DIRLABEL_55C2B863-92DD-46C5-BD46-DC43441A3AA7'; 'COMMON') // Адрес
  !ParOrgStr = LoadString('DIRSTR_MAIN_FIRM'; 'CRM') // Головная организация
  !ContPersOrgStr = LoadString('REF_Д000023'; 'COMMON') // Контактные лица организации
  !ActualStr = LoadString('DIRLABEL_0DCD12BD-CF1C-4664-8D14-1D0E86B8378A'; 'COMMON') // Действующие
  !ClosedStr = LoadString('DIRLABEL_079AAFD7-12B8-4B2D-AFB6-601743F12FC7'; 'COMMON') // Закрытые
  !OrgEDocs = LoadString('DIRLABEL_F494D1D1-681C-4FF7-A668-114611881C10'; 'COMMON') // Электронные документы по организации
  !InLists = LoadString('DIRLABEL_9E270127-21C0-4C71-831D-397E0A7AC28C'; 'COMMON') // Входит в списки организаций
  !CharOrgStr = LoadString('DIRLABEL_EF40449D-D8EA-46CE-BC0A-FF745DE8AE71'; 'COMMON') // Характеристика организации
  !AddRecvKind = LoadString('REQ_Д000150'; 'COMMON') // Вид доп. реквизита
  !AddRecvVal = LoadString('REQ_Д000151'; 'COMMON') // Значение доп. реквизита
  !OrgContStr = LoadString('DIRLABEL_63108588-5FF5-48F7-90F7-A37CE188BBD8'; 'COMMON') // Контакты с организацией
  !PartOfMEStr = LoadString('REF_Д000044'; 'CRM') // Участия в маркетинговых мероприятиях   
  !EMailDistrStr = LoadString('REF_Д000040'; 'CRM') // Рассылки по электронной почте
  !IerarhStr = LoadString('DIRLABEL_145F6AA0-AA3B-4596-B98D-A6FEB3DB360A'; 'COMMON') // Иерархия подведомственных организаций

  #<html>
  #<head>
  
  #<style>
  #<!--
  #H1 {TEXT-ALIGN: center; FONT-SIZE: 170%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial}
  #H2 {FONT-SIZE: 130%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial}
  #H3 {FONT-SIZE: 90%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial}
  #H4 {PADDING-RIGHT: 83pt; FONT-SIZE: 83%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial; TEXT-ALIGN: left}
  #H5 {FONT-WEIGHT: normal; FONT-SIZE: 83%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial}  
  #P {FONT-SIZE: 83%; MARGIN: 6pt 10pt 3pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial; TEXT-ALIGN: justify}
  #TD {FONT-SIZE: 83%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial}
  #TABLE {BORDER-RIGHT: 0px; BORDER-TOP: 0px; BORDER-LEFT: 0px; BORDER-BOTTOM: 0px}
  #TH {FONT-SIZE: 83%; FONT-WEIGHT: bold; TEXT-ALIGN: center; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial}
  #-->
  #</style>

  #<script language="JavaScript">
  #<!--
  #function OpenTree(el) {
  #  if (document.getElementById[!el]!=null) {
  #    if (document.getElementById[!el].style.overflow == "visible") {
  #      document.getElementById[!el].style.overflow = "hidden";
  #      document.getElementById[!elpic].innerText = [!plus];
  #    }  
  #    else {
  #      document.getElementById[!el].style.overflow = "visible";
  #      document.getElementById[!elpic].innerText = [!minus];
  #    }
  #  }
  #}
  #-->
  #</script>

  #</head>
  #<body>

  #<h1>[!OrgSummStr] <a href="[!OrgHyperlink]">[!OrgName]</a> ([!CityName])</h1>

 // =======================================================================================
 // Формирование раздела Координаты
 // ---------------------------------------------------------------------------------------
  #<h2 style='cursor:hand' onclick='OpenTree("ID_1")'> 
  #<span id='ID_1pic'>[!plus1]</span>&nbsp;[!ContStr]
  #</h2>
  #<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_1'>
  #<p>Адрес: [!OrgAddress]</p>
  
  if !MainOrgName <<>> "" 
    #<p>[!ParOrgStr]: <a href="[!MainOrgHyperlink]">[!MainOrgName]</a> ([!CityMainOrgName])</p>
  endif
  
  #<h3> &nbsp;[!ContPersOrgStr] </h3>
  

  if !StrActingContacts <<>> "" 
    #<h4 style='cursor:hand' onclick='OpenTree("ID_10")'>
    # <span id='ID_10pic'>[!plus1]</span>&nbsp;[!ActualStr]
    #</h4>
    #<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_10'>
    #[!StrActingContacts]
    #</div>
  endif

  if !StrClosedContacts <<>> "" 
    #<h4 style='cursor:hand' onclick='OpenTree("ID_11")'>
    # <span id='ID_11pic'>[!plus1]</span>&nbsp;[!ClosedStr]
    #</h4>
    #<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_11'>
    #[!StrClosedContacts]
    #</div>
  endif
  
  #</div>
  
 // =======================================================================================
 // Формирование раздела Электронные документы по организации
 // ---------------------------------------------------------------------------------------
  if !StrEDocuments <<>> ""

    #<h2 style='cursor:hand' onclick='OpenTree("ID_2")'>
    #  <span id='ID_2pic'>[!plus1]</span>&nbsp;[!OrgEDocs]
    #</h2>
    #<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_2'>

    #[!StrEDocuments]
    #</div>
  endif
  
 // =======================================================================================
 // Формирование раздела Входит в списки
 // ---------------------------------------------------------------------------------------
  if !StrLists <<>> "" 
    #<h2 style='cursor:hand' onclick='OpenTree("ID_3")'>
    #  <span id='ID_3pic'>[!plus1]</span>&nbsp;[!InLists]
    #</h2>
    #<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_3'>
    #[!StrLists]
    #</div>
  endif

 // =======================================================================================
 // Формирование раздела Характеристика организации
 // ---------------------------------------------------------------------------------------
  if !StrAddRequisites <<>> "" 
    #<h2>[!CharOrgStr]</h2>
    #<table border="1" width="100%">
    #<tr>
    #  <th>[!AddRecvKind]</th>
    #  <th>[!AddRecvVal]</th>
    #</tr>

    #[!StrAddRequisites]
    #</table>
  endif

 // =======================================================================================
 // Формирование раздела Контакты с клиентами
 // ---------------------------------------------------------------------------------------
  #<h2 style='cursor:hand' onclick='OpenTree("ID_4")'>
  #  <span id='ID_4pic'>[!plus1]</span>&nbsp;[!OrgContStr]
  #</h2>
  #<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_4'>

  !RefNPR = CreateReference("НПР") // Направления деятельности           
  !RefNPRDataSet = !RefNPR.DataSet
  !RefNPRDataSet.AddOrderBy(!RefNPRDataSet.TableName & "." & !RefNPRDataSet.Requisites("Наименование").Field.SQLFieldName)
  !RefNPRDataSet.Open

  !RefKSK = CreateReference("КСК") // Контакты с клиентами           
  !RefKSKDataSet = !RefKSK.DataSet
  !RefKSKDataSet.AddOrderBy(!RefKSKDataSet.TableName & '.' & !RefKSKDataSet.Requisites("ВидРабот").Field.SQLFieldName)
  !RefKSKDataSet.AddOrderBy(!RefKSKDataSet.TableName & '.' & !RefKSKDataSet.Requisites("ДатаВремя2").Field.SQLFieldName & ' DESC')
  !Component=GetComponent()
  !IDTypRefKSK=ИДТипСпр("КСК")
  
  !OrgFieldName = !RefKSKDataSet.Requisites("Организация").Field.SQLFieldName
  !ActivityFieldName = !RefKSKDataSet.Requisites("НапрПрод").Field.SQLFieldName
  !ContactDateFieldName = !RefKSKDataSet.Requisites("ДатаВремя2").Field.SQLFieldName  

 // Цикл по всем Направлениям деятельности
  !J=1
  while not !RefNPRDataSet.EOF
    !ActivityID = !RefNPRDataSet.Requisites("ИД").AsString
    !ActivityName = !RefNPRDataSet.Requisites("Наименование").AsString 
    !AddWhere = !RefKSKDataSet.TableName & '.' & !OrgFieldName & ' = ' & !OrgID  // ограничение по организации    
    !AddWhere = !AddWhere & ' and ' & !RefKSKDataSet.TableName & '.' & !ActivityFieldName & ' = ' & !ActivityID  // ограничение по направлению деятельности
    !AddWhere = !AddWhere & ' and ' & !RefKSKDataSet.TableName & '.' & !ContactDateFieldName & ' is not null' // только состоявшиеся контакты   
    !AddWhereID=!RefKSKDataSet.AddWhere(!AddWhere)
  
    !RefKSKDataSet.Open
    !RefKSKDetailDataSet = !RefKSKDataSet.DetailDataset(1)
    if !RefKSKDataSet.RecordCount > 0
      #<h3 style='cursor:hand' onclick='OpenTree("ID_4[!J]")'>
      # <span id='ID_4[!J]pic'>[!plus1]</span>[!ActivityName]
      #</h3>
      #<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_4[!J]'>
      !J=!J+1
    endif 
    !VidWorksOld=""
    !JJ=1     
   // Цикл по контактам с клиентами в рамках Направления деятельности
    while not !RefKSKDataSet.EOF
      !RefKSKDataSet.OpenRecord 
      !VidWorks = !RefKSKDataSet.Requisites("ВидРабот").AsString
      !NameVidWorks=СпрРекв("ВРН";!VidWorks;"Наименование")
      If !VidWorksOld<<>>!VidWorks
        If !JJ>1
          #</div>
        EndIf  
        #<h3 style='cursor:hand' onclick='OpenTree("ID_4[!J][!JJ]")'>
        # <span id='ID_4[!J][!JJ]pic'>[!plus1]</span>[!NameVidWorks]
        #</h3>
        #<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_4[!J][!JJ]'>
        !JJ=!JJ+1
        !VidWorksOld=!VidWorks
      EndIf       
      !ContactDate = !RefKSKDataSet.Requisites("ДатаВремя2").AsString
       
      !Text = !RefKSKDataSet.Requisites("Текст").AsString 
      
      !StageCode = !RefKSKDataSet.Requisites("СтадияПродаж").AsString
      !StageName = СпрРекв("СТП"; !StageCode; "Наименование")

      !TypeCode = !RefKSKDataSet.Requisites("ВидВзаим").AsString
      !TypeName = СпрРекв("ВВК"; !TypeCode; "Наименование")

      !ResultCode = !RefKSKDataSet.Requisites("РезВзаим1").AsString
      !ResultName = СпрРекв("РВК"; !ResultCode; "Наименование")  
      
      Comment = !RefKSKDataSet.Requisites("Дополнение").AsString 
      if Comment <<>> ""
        #<p><b>[!ContactDate]. [!StageName]/ [!TypeName]/ [Comment]</b></p>
      else 
        #<p><b>[!ContactDate]. [!StageName]/ [!TypeName]</b></p> 
      endif
      !StrPersons = ""      
      while not !RefKSKDetailDataSet.EOF
        !PersonCode = !RefKSKDetailDataSet.Requisites("КонтактТ").AsString
        !PersonName = СпрРекв("КНТ"; !PersonCode; "Содержание")
        !PersonPost = !RefKSKDetailDataSet.Requisites("ДопТ").AsString 
        !StrPersons = AddSubString(!PersonName & " (" & !PersonPost & ")"; !StrPersons; ", ")
        !RefKSKDetailDataSet.Next  
      endwhile

      #[!StrPersons] - [!ResultName]
      
      if !Text <<>> ""
        #<table border="1" width="100%">
        #<tr>
        #  <td>[!Text]</td>
        #</tr>
        #</table>
      endif
     //=========================================== 
     // Вытащим список всех электронных документов связанных с контактом
     //===========================================    
      !IDRef=!RefKSKDataSet.Requisites("ИД").Value
      !AddFrom='MBAnalit MBAnalit, SBLinks sv'
      !AddWhere="MBAnalit.Vid="&!IDTypRefKSK
          &" and MBAnalit.Analit="&!IDRef
          &" and sv.SourceID=MBAnalit.Analit"
          &" and sv.SourceType='R'"
          &" and sv.DestType='E'"
          &" and isnull(sv.SourceSystemCode, '')=''"
          &" and EDocuments.XRecID=sv.DestID"
      !Search = !Component.Application.SearchFactory.CreateNew(ckEDocument)
      !Criteria = !Search.SearchCriteria
      !Criteria.AddWhere = !AddWhere
      !Criteria.AddFrom = !AddFrom
      !Contents = !Component.Application.SearchFactory.Execute(!Search)
      !EDocCount=!Contents.Count
      if !EDocCount > 0
        !Contents.Reset
        !StrEDocuments=""
        While not !Contents.EOF
          !Doc=!Contents.Value.Document
          !EDocName = !Doc.DataSet.Requisites('ISBEDocName').AsString
          !EDocID = !Contents.Value.ID
          !EDocHyperlink = ГиперссылкаСоздать(!EDocID; "Эл.документ")  
          !StrEDocuments = !StrEDocuments & "<p><a href='"& !EDocHyperlink & "'>" & !EDocName & "</a></p>"
         // Добавить вывод ссылок на документы.
         // То же самое сделвть для УММ 
          !Contents.Next
        EndWhile
        #[!StrEDocuments]
      endif      
      !RefKSKDataSet.CloseRecord     
      !RefKSKDataSet.Next
    endwhile
    If !JJ>1
      #</div>
    EndIf
    if !RefKSKDataSet.RecordCount > 0
      #</div>
    EndIf
    !RefKSKDataSet.Close
    !RefKSKDataSet.DelWhere(!AddWhereID)
       
    !RefNPRDataSet.Next
  endwhile 
  #</div>
 // =======================================================================================
 // Формирование раздела Участия в маркетинговых мероприятиях
 // ---------------------------------------------------------------------------------------
  #<h2 style='cursor:hand' onclick='OpenTree("ID_5")'>
  #  <span id='ID_5pic'>[!plus1]</span>&nbsp;[!PartOfMEStr]
  #</h2>
  #<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_5'>

  !RefMM = CreateReference("ММ") // Направления деятельности           
  !RefMMDataSet = !RefMM.DataSet
  !RefMMDataSet.Open

  !RefUMM = CreateReference("УММ") // Участия в маркетинговых мероприятиях    
  !RefUMMDataSet = !RefUMM.DataSet
  !RefUMMDataSet.AddOrderBy(!RefUMMDataSet.TableName & '.' & !RefUMMDataSet.Requisites("ДатаВремя2").Field.SQLFieldName&' DESC')

  !OrgFieldName = !RefUMMDataSet.Requisites("Организация").Field.SQLFieldName
  !ActivityFieldName = !RefUMMDataSet.Requisites("НапрПрод").Field.SQLFieldName 
  !ContactDateFieldName = !RefUMMDataSet.Requisites("ДатаВремя2").Field.SQLFieldName
  
 // Цикл по всем Направлениям деятельности
  !RefNPRDataSet.First
  !J=1
  while not !RefNPRDataSet.EOF
    !ActivityID = !RefNPRDataSet.Requisites("ИД").AsString
    !ActivityName = !RefNPRDataSet.Requisites("Наименование").AsString 

    !AddWhere = !RefUMMDataSet.TableName & '.' & !OrgFieldName & ' = "' & !OrgID & '"'    
    !AddWhere = !AddWhere & ' and ' & !RefUMMDataSet.TableName & '.' & !ActivityFieldName & ' = "' & !ActivityID & '"'
    !AddWhere = !AddWhere & ' and ' & !RefUMMDataSet.TableName & '.' & !ContactDateFieldName & ' is not null' // только состоявшиеся контакты 
    !AddWhereID=!RefUMMDataSet.AddWhere(!AddWhere)    
    !RefUMMDataSet.Open
    !RefUMMDetailDataSet = !RefUMMDataSet.DetailDataset(1)
     
    if !RefUMMDataSet.RecordCount > 0 
      #<h3 style='cursor:hand' onclick='OpenTree("ID_5[!J]")'>
      # <span id='ID_5[!J]pic'>[!plus1]</span>&nbsp;[!ActivityName]
      #</h3>
      #<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_5[!J]'>
      !J=!J+1
    endif              
   // Цикл по участиям в рамках Направления деятельности
    while not !RefUMMDataSet.EOF 
      !RefUMMDataSet.OpenRecord     
      !ContactDate = !RefUMMDataSet.Requisites("ДатаВремя2").AsString
      !Text = !RefUMMDataSet.Requisites("Текст").AsString 

      !ActionCode = !RefUMMDataSet.Requisites("Ведущая аналитика").AsString
      !ActionName = СпрРекв("ММ"; !ActionCode; "Наименование")
      
      Comment = GetRequisiteValueAsString("ММ"; !ActionCode; 'Дополнение')

      !ActionStageCode = !RefUMMDataSet.Requisites("ЭтапМаркМероприятия").AsString
      !ActionStageName = СпрРекв("ЭММ"; !ActionStageCode; "Наименование")

      !TypeCode = !RefUMMDataSet.Requisites("ВидВзаим").AsString
      !TypeName = СпрРекв("ВВК"; !TypeCode; "Наименование")

      !ResultCode = !RefUMMDataSet.Requisites("РезВзаим1").AsString
      !ResultName = СпрРекв("РВК"; !ResultCode; "Наименование")  
      
      #<p><b>[!ContactDate]. [!ActionName]. [!ActionStageName]</b></p>   

      !StrPersons = ""      
      while not !RefUMMDetailDataSet.EOF
        !PersonCode = !RefUMMDetailDataSet.Requisites("КонтактТ").AsString
        !PersonName = СпрРекв("КНТ"; !PersonCode; "Содержание")
        !PersonPost = !RefUMMDetailDataSet.Requisites("СтрокаТ").AsString 
        !StrPersons = AddSubString(!PersonName & " (" & !PersonPost & ")-"&!TypeName; !StrPersons; ", ")
        !RefUMMDetailDataSet.Next  
      endwhile
      
      #[!StrPersons] - [!ResultName]
      
      if !Text <<>> ""
        #<table border="1" width="100%">
        #<tr>
        #  <td>[!Text]</td>
        #</tr>
        #</table>
      endif

      !RefUMMDataSet.CloseRecord           
      !RefUMMDataSet.Next
    endwhile
    if !RefUMMDataSet.RecordCount > 0 
      #</div>
    endif 
    !RefUMMDataSet.Close
    !RefUMMDataSet.DelWhere(!AddWhereID)
      
    !RefNPRDataSet.Next
  endwhile
  #</div> 
  !RefNPRDataSet.Close

 // =======================================================================================
 // Формирование раздела Рассылки
 // ---------------------------------------------------------------------------------------
  #<h2 style='cursor:hand' onclick='OpenTree("ID_6")'>
  #<span id='ID_6pic'>[!plus1]</span>&nbsp;[!EMailDistrStr]
  #</h2>
  #<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_6'>
  !IDOrg=СпрПолеЗнач("ОРГ";!Org;"Analit")
  !IDTypeRefRSL=ИДТипСпр("РСЛ")
  !IDTypeRefESO=ИДТипСпр("ЭСО")
  !IDTyprRefUMM=ИДТипСпр("УММ")
  !Запрос="select a.Dop,a.Kod from MBAnalit a, MBAnalit eso
             where a.Vid="&!IDTypeRefRSL&"
               and eso.Vid="&!IDTypeRefESO&"
               and eso.HighLvl=a.SpisokOrg
               and eso.Org="&!IDOrg&"
           UNION
           select a.Dop,a.Kod from MBAnalit a, MBAnalit umm
             where a.Vid="&!IDTypeRefRSL&"
               and umm.Vid="&!IDTyprRefUMM&"
               and umm.HighLvl=a.MarkMeropr
               and umm.Org="&!IDOrg
  !Query = CreateQuery()
  !Query.CommandText = !Запрос
  !Query.Open
  while not !Query.EOF
    !NameRSL = !Query.Fields("Dop").Value
    #<p>[!NameRSL]</p>
    !CodeRSL = !Query.Fields("Kod").Value
    !Query.Next
  EndWhile                   
  #</div>

 // =======================================================================================
 // Формирование раздела Иерархия подведомственных организаций
 // ---------------------------------------------------------------------------------------

  if !CountOrg > 0
    #<h2>[!IerarhStr]</h2>

    !Query = CreateQuery()
    !Query.CommandText = "select Uroven, Analit, NameAn, NameGorod from "&!tmpTableName
    !Query.Open

    while not !Query.EOF
      !Name = !Query.Fields("NameAn").Value
      !Level = !Query.Fields("Uroven").Value 
      !ID = !Query.Fields("Analit").Value
      !City = !Query.Fields("NameGorod").Value

     // формирование отступа
      !i = 0
      !nbsp = ""
      while !i < !Level * 5
        !nbsp = !nbsp & "&nbsp;" 
        !i = !i + 1
      endwhile

      !OrgHyperlink = "http://" & !WebServerName & "/reference.asp?sys=" & !CurrSys & '&CompCode=ОРГ&ID=' & !ID

      #<p>[!nbsp]<a href = [!OrgHyperlink] > [!Name]</a> ([!City])</p>       

      !Query.Next
    endwhile
      
  endif
  УдалитьТаблицу("tmpOrgTree")

  
  #</body>
  #</html>    

  Ответить  
 
 автор: АЯС   (12.01.2012 в 14:55)   письмо автору
 
   для: displayser   (12.01.2012 в 11:25)
 

Повторяю написанное мною ранее:
Вместо document.all [что-то] везде пропишите document.getElementById (что-то)

И обращаю ваше внимание на то, что скобки - они разными бывают: круглыми, квадратными, фигурными...

  Ответить  
 
 автор: displayser   (12.01.2012 в 15:16)   письмо автору
 
   для: АЯС   (12.01.2012 в 14:55)
 

Я прошу прощения, не обратил внимание на скобки голова занята основной работай - это так для себя.
В общем после изменения везде на круглые скобки - не обрабатывает клик, и не пишет ошибок в консоль

  #<script>

  #function OpenTree(el) {
  #  if (document.getElementById(!el)!=null) {
  #    if (document.getElementById(!el).style.overflow == "visible") {
  #      document.getElementById(!el).style.overflow = "hidden";
  #      document.getElementById(!elpic).innerText = [!plus];
  #    }  
  #    else {
  #      document.getElementById(!el).style.overflow = "visible";
  #      document.getElementById(!elpic).innerText = [!minus];
  #    }
  #  }
  #}

  #</script>

  Ответить  
 
 автор: АЯС   (12.01.2012 в 16:36)   письмо автору
 
   для: displayser   (12.01.2012 в 15:16)
 

Если хотите, чтобы вам помогли - запустите страницу в любом браузере, откройте "исходный код", скопируйте его и выложите здесь.

  Ответить  
 
 автор: displayser   (12.01.2012 в 16:41)   письмо автору
 
   для: АЯС   (12.01.2012 в 16:36)
 


<html>

<head>

<style>

<!--

H1 {TEXT-ALIGN: center; FONT-SIZE: 170%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial}

H2 {FONT-SIZE: 130%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial}

H3 {FONT-SIZE: 90%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial}

H4 {PADDING-RIGHT: 83pt; FONT-SIZE: 83%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial; TEXT-ALIGN: left}

H5 {FONT-WEIGHT: normal; FONT-SIZE: 83%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial}  

P {FONT-SIZE: 83%; MARGIN: 6pt 10pt 3pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial; TEXT-ALIGN: justify}

TD {FONT-SIZE: 83%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial}

TABLE {BORDER-RIGHT: 0px; BORDER-TOP: 0px; BORDER-LEFT: 0px; BORDER-BOTTOM: 0px}

TH {FONT-SIZE: 83%; FONT-WEIGHT: bold; TEXT-ALIGN: center; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial}

-->

</style>

<script>

function OpenTree(el) {

  if (document.getElementById(!el)!=null) {

    if (document.getElementById(!el).style.overflow == "visible") {

      document.getElementById(!el).style.overflow = "hidden";

      document.getElementById(!elpic).innerText = '[+]';

    }  

    else {

      document.getElementById(!el).style.overflow = "visible";

      document.getElementById(!elpic).innerText = '[-]';

    }

  }

}

</script>

</head>

<body>

<h1>Сводка по организации <a href="http://exchange/reference.asp?sys=directum&CompCode=ОРГ&ID=111277">Балтийские Офисные Технологии, ООО</a> ()</h1>

<h2 style='cursor:hand' onclick='OpenTree("ID_1")'>

<span id='ID_1pic'>[+]</span>&nbsp;Координаты

</h2>

<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_1'>

<p>Адрес: 236010 РОССИЯ, Калининградская обл, Калининград г, проспект Мира, дом 136, к.319</p>

<h3> &nbsp;Контактные лица организаций </h3>

</div>

<h2 style='cursor:hand' onclick='OpenTree("ID_4")'>

  <span id='ID_4pic'>[+]</span>&nbsp;Контакты с организацией

</h2>

<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_4'>

</div>

<h2 style='cursor:hand' onclick='OpenTree("ID_5")'>

  <span id='ID_5pic'>[+]</span>&nbsp;Участия в маркетинговых мероприятиях

</h2>

<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_5'>

</div> 

<h2 style='cursor:hand' onclick='OpenTree("ID_6")'>

<span id='ID_6pic'>[+]</span>&nbsp;Рассылки по электронной почте

</h2>

<div style='padding-left: 1cm; overflow:hidden; height:1px' id='ID_6'>

</div>

</body>

</html>

  Ответить  
 
 автор: АЯС   (12.01.2012 в 16:56)   письмо автору
 
   для: displayser   (12.01.2012 в 16:41)
 

<html>
<head>
<style>
<!-- комментирование стилей и скриптов нужно было в прошлом веке, 12 лет назад. Сейчас уже не надо -->
H1 {TEXT-ALIGN: center; FONT-SIZE: 170%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial}
H2 {FONT-SIZE: 130%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial}
H3 {FONT-SIZE: 90%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial}
H4 {PADDING-RIGHT: 83pt; FONT-SIZE: 83%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Helvetica, Arial; TEXT-ALIGN: left}
H5 {FONT-WEIGHT: normal; FONT-SIZE: 83%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial}  
P {FONT-SIZE: 83%; MARGIN: 6pt 10pt 3pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial; TEXT-ALIGN: justify}
TD {FONT-SIZE: 83%; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial}
TABLE {BORDER-RIGHT: 0px; BORDER-TOP: 0px; BORDER-LEFT: 0px; BORDER-BOTTOM: 0px}
TH {FONT-SIZE: 83%; FONT-WEIGHT: bold; TEXT-ALIGN: center; MARGIN-LEFT: 10pt; MARGIN-RIGHT: 10pt; FONT-FAMILY: Tahoma, Verdana, Helvetica, Arial}
</style>
<script>
function OpenTree (el)
{
if (document.getElementById (el).style.display == 'none')
   {
   document.getElementById (el).style.display = 'block';
   document.getElementById (el + 'pic').innerHTML = '[&#150;]';
   }  
else
   {
   document.getElementById (el).style.display = 'none';
   document.getElementById (el + 'pic').innerHTML = '[+]';
   }
}
//стиль overflow - он не для того, чтобы скрывать/открывать содержимое
</script>
</head>
<body>

<h1>Сводка по организации <a href="http://exchange/reference.asp?sys=directum&CompCode=ОРГ&ID=111277">Балтийские Офисные Технологии, ООО</a> ()</h1>

<h2 style='cursor: pointer' onclick='OpenTree("ID_1")'>
<!-- значение hand для курсора  - оно только для MSIE -->

<span id='ID_1pic'>[+]</span>&nbsp;Координаты

</h2>

<div style='padding-left: 1cm; display: none' id='ID_1'>
<!-- высоту указывать не надо в принципе -->

<p>Адрес: 236010 РОССИЯ, Калининградская обл, Калининград г, проспект Мира, дом 136, к.319</p>

<h3> &nbsp;Контактные лица организаций </h3>

</div>

<h2 style='cursor:pointer' onclick='OpenTree("ID_4")'>

  <span id='ID_4pic'>[+]</span>&nbsp;Контакты с организацией

</h2>

<div style='padding-left: 1cm;  display: none' id='ID_4'>

</div>

<h2 style='cursor:pointer' onclick='OpenTree("ID_5")'>

  <span id='ID_5pic'>[+]</span>&nbsp;Участия в маркетинговых мероприятиях

</h2>

<div style='padding-left: 1cm; display: none' id='ID_5'>

</div> 

<h2 style='cursor:pointer' onclick='OpenTree("ID_6")'>

<span id='ID_6pic'>[+]</span>&nbsp;Рассылки по электронной почте

</h2>

<div style='padding-left: 1cm; display: none' id='ID_6'>

</div>

</body>

</html> 

  Ответить  
 
 автор: displayser   (12.01.2012 в 18:01)   письмо автору
 
   для: АЯС   (12.01.2012 в 16:56)
 

Большое спасибо.
Все работает - правда в JS оставил text а не HTML.
Я очень давно ничего не делал такого вот и код как под старые браузеры

  Ответить  
 
 автор: АЯС   (12.01.2012 в 18:09)   письмо автору
 
   для: displayser   (12.01.2012 в 18:01)
 

>"в JS оставил text а не HTML"

Это вы зря.
Во многих браузерах (например, в FireFox) в ранних версиях свойство innerText не работает совсем (в FireFox вместо него там - textContent).

А вот innerHTML - свойство кроссбраузерное, всё браузеры его понимают, и понимают одинаково.

  Ответить  
 
 автор: displayser   (12.01.2012 в 18:18)   письмо автору
 
   для: АЯС   (12.01.2012 в 18:09)
 

Ясно значит верну как было))
И еще раз спасибо за обьяснение - все в мемориз, думаю что пригодится в будущем

  Ответить  
 
 автор: displayser   (12.01.2012 в 18:40)   письмо автору
 
   для: АЯС   (12.01.2012 в 18:09)
 

Одно тока не понятно - не меняет + на -
правда так как это не совсем веб приложение я не могу использовать почему то такие конструкции '[-]' и '[+]' ругается на неверный синтаксис в самой программе - хоть это и не кретично но все же :-)

  Ответить  
 
 автор: АЯС   (12.01.2012 в 21:12)   письмо автору
 
   для: displayser   (12.01.2012 в 18:40)
 

Скопируйте написанный здесь МНОЮ (не вами - а именно МНОЮ) HTML-код, сохраните его AS IS ("как есть") в любом текстовом редакторе под любым_именем.html и запустите этот файл в любом браузере.

Всё работает?
Плюсик на минусик (и обратно) меняется?
-----

Если в вашей интерпретации моего кода что-то "не меняется" или работает "не так", то вывод можете сделать однозначный: код нормальный, но руки у вас - "кривые" :-((

  Ответить  
 
 автор: displayser   (13.01.2012 в 10:13)   письмо автору
 
   для: АЯС   (12.01.2012 в 21:12)
 

Я же сказал что претензий нет -одна благодарность.
Строки где описан + и - программа считает некорректными, а если поменять на те что было все нормально.

Все - разобрался как надо, теперь меняется. Проблема была в том что + и - были в квадратных скобках, поменял на круглые и все стало меняться.
И опять же дело не в руках, дело в том где этот отчет формируется в html.

  Ответить  
 
 автор: АЯС   (13.01.2012 в 13:25)   письмо автору
 
   для: displayser   (13.01.2012 в 10:13)
 

>"дело не в руках, дело в том где этот отчет формируется в html."

Очень интересно:-)

Значится, вы хотите сказать, что существует такая программная среда, в которой невозможно вывести комбинацию символов [+] и [-] ?

Или же всё-таки вывести такую комбинацию символов можно, но... просто у кого-то "руки кривые"?

  Ответить  
 
 автор: displayser   (13.01.2012 в 14:28)   письмо автору
 
   для: АЯС   (13.01.2012 в 13:25)
 

Возможно у меня не хватает знаний чтобы вывести так [-] и [+]. Мне не критично как будет выводится в () или []. Я в первую очередь делал это для себя - так как я не пользуюсь IE, хотел чтобы отчет работал в хроме. Просто представленный вами код выдает ошибку о неверном синтаксисе при сохранении его в СЭД Директум в строках где определяется + и -, при изменении строк на то как было не происходит изменения + на - вообще, поменял [] на () все стало работать

  Ответить  
Rambler's Top100
вверх

Rambler's Top100 Яндекс.Метрика Яндекс цитирования