Pa može i bez fajla, čak i nije neka preterana mudrost. Prvo otvoriš praznu stranicu da se inicijalizuje dokument web browsera, a onda pišeš u taj dokument bez pisanja u fajl
Code:
Option Explicit
Dim blnLoaded As Boolean
Private Sub Command1_Click()
blnLoaded = False
WebBrowser1.Navigate "about:blank"
While blnLoaded = False
DoEvents
Wend
WebBrowser1.Document.open
WebBrowser1.Document.write "<HTML><BODY>Hello World</BODY></HTML>"
WebBrowser1.Document.Close
End Sub
Private Sub WebBrowser1_DocumentComplete(ByVal pDisp As Object, URL As Variant)
If Not URL = "" Then blnLoaded = True
End Sub
a možeš i direktno
Code:
WebBrowser1.Navigate "about:<HTML><BODY>Hello World</BODY></HTML>"
Ja kod sličnih stvari volim da koristim temp fajl zato što mi je tako lakše da napravim backup, undo i redo procedure i slično, a mogu u toku razvoja da otvorim taj temp fajl u nekom drugom browseru, recimo Firefoxu (WebBrowser koristi IE engine) i vidim kako tamo izgleda bez potrebe da se snima projekat. Pored toga, pisanjem u fajl, izbegavam da se u slučaju neke greške izgubi ceo HTML koji nije snimljen, nego uvek imam poslednju verziju u tom nekom fajlu. U svakom slučaju, može tako, a može i 'vako :)
-Odracuonogakomijedrpiorazmaknicu.
-Ne rxdi mi txstxturx, kxd god hocu dx
ukucxm "x" onx ukucx "x".
-Ko kaaz e da ja neuummem da kuuca
m.
-Piše "Insert disk 3", a jedva sam i ova
dva ugurao u drajv
-Postoje samo dve osobe kojima
verujem, jedna sam ja, a druga nisi ti