Сохранение Web-страницы в файл?
От: oporaold  
Дата: 29.07.03 17:56
Оценка:
Такая проблема. Загружаю в WebBrowser страничку. Мне нужно каким-то образом сохранить её содержимое(не HTML код, а именно в таком виде в котором она там присутствует) в строку или файл. Читал в форумах, что можно сделам с помощью модуля MSHTML. Ставил. Мало того, что он большой, он еще ошибки выдает и не может откомпилировать. Если можно кода побольше нарежьте. Помогите пожалуйста!
Re: Сохранение Web-страницы в файл?
От: night  
Дата: 30.07.03 12:47
Оценка:
Здравствуйте, oporaold, Вы писали:

O>Такая проблема. Загружаю в WebBrowser страничку. Мне нужно каким-то образом сохранить её содержимое(не HTML код, а именно в таком виде в котором она там присутствует) в строку или файл. Читал в форумах, что можно сделам с помощью модуля MSHTML. Ставил. Мало того, что он большой, он еще ошибки выдает и не может откомпилировать. Если можно кода побольше нарежьте. Помогите пожалуйста!


на сайте есть для этого целая статья, с несколькими способами, выбирай не хочу
Статья на RSDN
Автор(ы): Тимофей Чадов
Дата: 14.10.2001
Re[2]: Сохранение Web-страницы в файл?
От: oporaold  
Дата: 30.07.03 20:25
Оценка:
Здравствуйте, night, Вы писали:

N>Здравствуйте, oporaold, Вы писали:


O>>Такая проблема. Загружаю в WebBrowser страничку. Мне нужно каким-то образом сохранить её содержимое(не HTML код, а именно в таком виде в котором она там присутствует) в строку или файл. Читал в форумах, что можно сделам с помощью модуля MSHTML. Ставил. Мало того, что он большой, он еще ошибки выдает и не может откомпилировать. Если можно кода побольше нарежьте. Помогите пожалуйста!


N>на сайте есть для этого целая статья, с несколькими способами, выбирай не хочу

N>Статья на RSDN
Автор(ы): Тимофей Чадов
Дата: 14.10.2001


ВОТ СПАСИБО! ВЫРУЧИЛ!
Re[2]: Сохранение Web-страницы в файл?
От: oporaold  
Дата: 30.07.03 20:39
Оценка:
Но как эту библиотеку встроить в Delphi? И сохранить Delphi'им webbrowser'ом?
Re: Сохранение Web-страницы в файл?
От: oporaold  
Дата: 31.07.03 05:14
Оценка:
Я НАШЕЛ!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!!
procedure TMainForm.ToolButton1Click(Sender: TObject);
var
str : string;
IpersFile: IPersistFile;
begin
IpersFile := WebBrowser1.Document as IPersistFile;
IpersFile.Save('test.txt', False);
end;
Re[3]: Сохранение Web-страницы в файл?
От: Аноним  
Дата: 01.03.06 18:11
Оценка:
Здравствуйте, oporaold, Вы писали:

O>Здравствуйте, night, Вы писали:


N>>Здравствуйте, oporaold, Вы писали:


O>>>Такая проблема. Загружаю в WebBrowser страничку. Мне нужно каким-то образом сохранить её содержимое(не HTML код, а именно в таком виде в котором она там присутствует) в строку или файл. Читал в форумах, что можно сделам с помощью модуля MSHTML. Ставил. Мало того, что он большой, он еще ошибки выдает и не может откомпилировать. Если можно кода побольше нарежьте. Помогите пожалуйста!


N>>на сайте есть для этого целая статья, с несколькими способами, выбирай не хочу

N>>Статья на RSDN
Автор(ы): Тимофей Чадов
Дата: 14.10.2001


O>ВОТ СПАСИБО! ВЫРУЧИЛ!


Здравствуйте, у меня тоже возник подобный вопрос и благодаря этой замечательной статье я его вроде бы благополучно решил,
Но во время тестирования возникла одна проблема (исходный код сохранения странички в файл у меня из статьи, пишу я без использования MFC: СOM + ATL):
Есть следующая страничка:

<script language="JavaScript">
function changeColor() {
document.getElementById("text").style.color = "#CC0000";
}
function onLoadScript() {
document.getElementById("text").style.color = "#CC0000";
document.getElementById("text").value = "onLoad";
}
</script>

<body onLoad="onLoadScript()">
<input type="text" id="text" value="text text"><br><br>
<input type="button" id="bt" value="Color" onClick="changeColor()">

<script language="JavaScript">

document.getElementById("bt").style.display = "none";

</script>
</body>

После сохранения ее или моей прожкой, или ИЕ я получаю следующее:

<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.0 Transitional//EN">
<!-- saved from url=(0031)http://www.grafika.com.ua/test/ -->
<HTML><HEAD>
<META http-equiv=Content-Type content="text/html; charset=windows-1251">
<SCRIPT language=JavaScript>

function changeColor() {
document.getElementById("text").style.color = "#CC0000";
}

function onLoadScript() {
document.getElementById("text").style.color = "#CC0000";
document.getElementById("text").value = "onLoad";
}

</SCRIPT>

<META content="MSHTML 6.00.2900.2180" name=GENERATOR></HEAD>
<BODY onload=onLoadScript()><INPUT id=text value="text text"><BR><BR><INPUT id=bt onclick=changeColor() type=button value=Color>
<SCRIPT language=JavaScript>

document.getElementById("bt").style.display = "none";

</SCRIPT>
</BODY></HTML>

а вот после сохранения старнички программой из статьи результат
имеет вид:

<HTML><HEAD>
<SCRIPT language=JavaScript>

function changeColor() {
document.getElementById("text").style.color = "#CC0000";
}

function onLoadScript() {
document.getElementById("text").style.color = "#CC0000";
document.getElementById("text").value = "onLoad";
}
</SCRIPT>

<META content="MSHTML 6.00.2900.2180" name=GENERATOR></HEAD>

<BODY onload=onLoadScript()><INPUT id=text style="COLOR: #cc0000" value=onLoad><BR><BR><INPUT id=bt style="DISPLAY: none" onclick=changeColor() type=button value=Color>

<SCRIPT language=JavaScript>
document.getElementById("bt").style.display = "none";
</SCRIPT>
</BODY></HTML>

т.е. в этом случае я действительно получаю то что вижу, после всех обработок,
в принципе именно это мне и нужно, только вот не наю как этого добиться

Может ктото встречался с подобным и знает в чем тут соль?
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.