суть такая - я отслеживаю в винсоке запрос браузера на открытие страницы
- Код: Выделить всё
GET /index.html HTTP/1.1
и при нахождении - отсылаю ему файлы index.html но в браузере он открывается без картинок.
- Код: Выделить всё
If Mid(sData, 1, 3) = "GET" Then
...
HTML = LoadFile("c:\index.html")
pm1 = "HTTP/1.1 200 OK"
pm2 = "Content-Length: " & Len(HTML)
pm3 = "Content-Type: text/html"
sData = pm1 & vbCrLf & pm2 & vbCrLf & pm3 & vbCrLf & vbCrLf & HTML
Winsock(Index).SendData sData
End If
я так понимаю что надо передать ему и сами файлы картинок тоже?