mzk_3om6u , IE10에서 DOM 구조로 작업하는 가장 쉬운 방법은 VBScript/JScript를 사용하는 것입니다. WinExec()를 통해 wsf 스크립트를 실행할 수 있습니다. 태그 를 변환하려고 합니다. 무엇 때문에? 파일에 쓰는 스크립트의 끝에서 InnerText를 통해 안전하게 작업할 수 있습니다. 터키에서는 파일을 수락합니다. 다음은 예입니다.
'On Error Resume Next
Dim IE : Set IE = WSCript.CreateObject("InternetExplorer.Application")' это браузер
Dim objFSO : Set objFSO = CreateObject("Scripting.FileSystemObject")' это файловая система компьютера
Dim fCsvName : fCsvName = Left(WSCript.ScriptFullName,len(WSCript.ScriptFullName)-3) & "csv"' далёко будем записывать данные
IE.visible = false' браузер в фоновом режиме
IE.navigate "адрес_страницы"
Do While IE.Busy' пока браузер не откроется
WSCript.Sleep 500' ждём полсекунды
loop' в цикле
Do While элемент_страницы is Nothing' пока этот элемент страницы не загрузится
WSCript.Sleep 500' будем ждать загрузки страницы
loop
I1 = IE.document.getElementsByClassName("anchor1").Item(18).getElementsByTagName("TD").Item(5).InnerText' парсим две ячейки
I2 = IE.document.getElementsByClassName("anchor2").Item(21).getElementsByTagName("TD").Item(5).InnerText
Set IE = Nothing' закрываем браузер
Set Csv = objFSO.OpenTextFile(fCsvName, 2, True)'открываем файл для записи
Csv.WriteLine I1 & ";" & I2' записываем туда содержимое двух ячеек
Csv.Close' закрываем файл
WSCript.Quit()' выключаем этот скрипт
페이지 요소로 InnerText 가 없는 모든 셀이 적합합니다. 예를 들어 다음과 같습니다.
Do While IE.document.getElementsByClassName("anchor1").Item(18).getElementsByTagName("TD").Item(5) is Nothing' пока этот элемент страницы не загрузится
WSCript.Sleep 500' будем ждать загрузки страницы
loop
이 접근 방식의 장점은 WSH에 별도의 인터프리터가 필요하지 않다는 것입니다. 인터프리터는 거의 Win3.1에서 Windows 자체에 내장되어 있기 때문입니다. 즉, 스크립트는 메모장 직후에 실행됩니다.
즉, 간단히 말하자면, 예를 들어 간단한 메모장을 열고 다음과 같이 쓰십시오.
WScript.Echo "somebody"
WScript.Quit
test.vbs로 저장하고 파일을 두 번 클릭하면 "누군가"라는 메시지가 나타납니다. 특별한 개발 환경이 필요하지 않습니다.
어, 기능을 주셔서 감사합니다.
파일을 버려, 무슨 일인지 내가 볼게.
파일을 버려, 무슨 일인지 내가 볼게.
파일이 대용량(첨부)인데, 제가 임의로 문자를 복사해서(첫 문자가 없어진 경우가 있음) 문제가 있을 수 있다고 생각합니다.
이 함수에서 win1251에서 utf8로 역함수를 만들 수 있습니까?) 그렇지 않으면 실제로 함수로 win1251을 처리한 다음 MT4에서 파일을 찾아야 합니다. 그러면 러시아어 단어가 있는 줄이 있습니다. )
일반적으로 이 기능에 대해 질문이 있습니다. 그녀가 읽지 않는 문자는 무엇입니까?
그리고 다음과 같이 했습니다.
문자열 배열이 생성되면 문자열을 작성하기 전에 utf8win1251()을 통해 실행해 보니 오류가 잔뜩(잘못된 문자)나오고 특정 오류를 못 잡아서 여기저기 부딪혀서
if ( GetLastError() !=0) Print(GetLastError()); 그러나 이제 러시아어 단어에 대한 검색이 작동합니다 :) 특히 중요한 문자가 손실되었다고 생각하지 않습니다. 로그의 오류 사실이 성가신 일입니다. 로그를 차단하시겠습니까?)
mzk_3om6u , IE10에서 DOM 구조로 작업하는 가장 쉬운 방법은 VBScript/JScript를 사용하는 것입니다. WinExec()를 통해 wsf 스크립트를 실행할 수 있습니다. 태그 를 변환하려고 합니다. 무엇 때문에? 파일에 쓰는 스크립트의 끝에서 InnerText를 통해 안전하게 작업할 수 있습니다. 터키에서는 파일을 수락합니다. 다음은 예입니다.
'On Error Resume Next Dim IE : Set IE = WSCript.CreateObject("InternetExplorer.Application")' это браузер Dim objFSO : Set objFSO = CreateObject("Scripting.FileSystemObject")' это файловая система компьютера Dim fCsvName : fCsvName = Left(WSCript.ScriptFullName,len(WSCript.ScriptFullName)-3) & "csv"' далёко будем записывать данные IE.visible = false' браузер в фоновом режиме IE.navigate "адрес_страницы" Do While IE.Busy' пока браузер не откроется WSCript.Sleep 500' ждём полсекунды loop' в цикле Do While элемент_страницы is Nothing' пока этот элемент страницы не загрузится WSCript.Sleep 500' будем ждать загрузки страницы loop I1 = IE.document.getElementsByClassName("anchor1").Item(18).getElementsByTagName("TD").Item(5).InnerText' парсим две ячейки I2 = IE.document.getElementsByClassName("anchor2").Item(21).getElementsByTagName("TD").Item(5).InnerText Set IE = Nothing' закрываем браузер Set Csv = objFSO.OpenTextFile(fCsvName, 2, True)'открываем файл для записи Csv.WriteLine I1 & ";" & I2' записываем туда содержимое двух ячеек Csv.Close' закрываем файл WSCript.Quit()' выключаем этот скрипт페이지 요소로 InnerText 가 없는 모든 셀이 적합합니다. 예를 들어 다음과 같습니다.사람들은 터미널에서 5자를 4자로 바꾸는 방법을 알려줍니다!
4자리 따옴표가 있는 다른 DC에 계정을 등록합니다.
4명의 캐릭터를 가지고 있었습니다. 올빼미를 설치한 후 5자가 되었습니다. 계정에 더 이상 올빼미가 없지만 표지판을 다시 변경하는 방법은 무엇입니까?
4명의 캐릭터를 가지고 있었습니다. 올빼미를 설치한 후 5자가 되었습니다. 계정에 더 이상 올빼미가 없지만 표지판을 다시 변경하는 방법은 무엇입니까?
기적은 일어나지 않습니다. 4개의 표지판이 있고 5개는 보이지 않는 곳에서 시작하겠습니다.
나는 1유로달러 1.3469와 고문이 현재 1.36690이었던 두 번째 계좌에 두 개의 계좌를 가지고 있습니다.
나는 1유로달러 1.3469와 고문이 현재 1.36690이었던 두 번째 계좌에 두 개의 계좌를 가지고 있습니다.
1.3469 및 1.34690 죄송합니다))))) 그래서 어떤 고문을 따랐는지 기억조차 나지 않습니다.