CARVIEW

MOTORHOMES

Select Language

HTTP/2 302 server: nginx date: Sat, 16 Aug 2025 17:09:12 GMT content-type: text/plain; charset=utf-8 content-length: 0 x-archive-redirect-reason: found capture at 20071102133057 location: https://web.archive.org/web/20071102133057/https://www.daniweb.com/code/snippet143.html server-timing: captures_list;dur=1.293235, exclusion.robots;dur=0.025546, exclusion.robots.policy;dur=0.011602, esindex;dur=0.013459, cdx.remote;dur=12.452720, LoadShardBlock;dur=354.178805, PetaboxLoader3.datanode;dur=68.103412, PetaboxLoader3.resolve;dur=235.765634 x-app-server: wwwb-app220 x-ts: 302 x-tr: 394 server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0 set-cookie: wb-p-SERVER=wwwb-app220; path=/ x-location: All x-rl: 0 x-na: 0 x-page-cache: MISS server-timing: MISS x-nid: DigitalOcean referrer-policy: no-referrer-when-downgrade permissions-policy: interest-cohort=() HTTP/2 200 server: nginx date: Sat, 16 Aug 2025 17:09:13 GMT content-type: text/html; charset=UTF-8 x-archive-orig-date: Fri, 02 Nov 2007 13:30:56 GMT x-archive-orig-server: Apache/2.2 x-archive-orig-x-powered-by: PHP/5.1.6 x-archive-orig-set-cookie: bblastactivity=0; expires=Sat, 01-Nov-2008 13:30:56 GMT; path=/; domain=.daniweb.com x-archive-orig-cache-control: private x-archive-orig-pragma: private x-archive-orig-vary: Accept-Encoding,User-Agent x-archive-orig-connection: close x-archive-guessed-content-type: text/html x-archive-guessed-charset: utf-8 memento-datetime: Fri, 02 Nov 2007 13:30:57 GMT link: ; rel="original", ; rel="timemap"; type="application/link-format", ; rel="timegate", ; rel="first memento"; datetime="Fri, 14 Jan 2005 16:40:56 GMT", ; rel="prev memento"; datetime="Mon, 12 Feb 2007 12:24:38 GMT", ; rel="memento"; datetime="Fri, 02 Nov 2007 13:30:57 GMT", ; rel="next memento"; datetime="Sun, 07 Dec 2008 12:28:01 GMT", ; rel="last memento"; datetime="Mon, 13 Apr 2009 17:30:25 GMT" content-security-policy: default-src 'self' 'unsafe-eval' 'unsafe-inline' data: blob: archive.org web.archive.org web-static.archive.org wayback-api.archive.org athena.archive.org analytics.archive.org pragma.archivelab.org wwwb-events.archive.org x-archive-src: 52_0_20071102115405_crawl108-c/52_0_20071102132836_crawl104.arc.gz server-timing: captures_list;dur=1.276683, exclusion.robots;dur=0.024037, exclusion.robots.policy;dur=0.010304, esindex;dur=0.014123, cdx.remote;dur=8.284424, LoadShardBlock;dur=112.713557, PetaboxLoader3.datanode;dur=70.183361, PetaboxLoader3.resolve;dur=111.765284, load_resource;dur=110.382719 x-app-server: wwwb-app220 x-ts: 200 x-tr: 305 server-timing: TR;dur=0,Tw;dur=0,Tc;dur=0 x-location: All x-rl: 0 x-na: 0 x-page-cache: MISS server-timing: MISS x-nid: DigitalOcean referrer-policy: no-referrer-when-downgrade permissions-policy: interest-cohort=() content-encoding: gzip Send HTML code to Internet Explorer from basic - qbasic

Send HTML code to Internet Explorer from basic

What is DaniWeb IT Discussion Community?

You're currently browsing the Legacy and Other Languages section within the Software Development category of DaniWeb, a massive community of 227,170 software developers, web developers, Internet marketers, and tech gurus who are all enthusiastic about making contacts, networking, and learning from each other. In fact, there are 2,255 IT professionals currently interacting right now! If you are in the IT industry or are just a technology enthusiast, you might find just what you're looking for in DaniWeb. Registration is free, only takes a minute and lets you enjoy all of the interactive features of the site.

Jan 6th, 2005

Views: 7,245

vegaseat

New to me, but MS InternetExplorer does have COM support you can access from basic code. I had to test this out and make it work. We are using BCX basic, one of the successors to Qbasic.

Show Printable Version

Advertisements

qbasic Syntax

Toggle Plain Text

' add HTML code to InternetExplorer using COM support
' (you must have MS InternetExplorer installed on your computer)
' needs BCX basic ver 5.05.05 or later, download free package from:
' https://www.rjpcomputing.com/programming/bcx/devsuite.html
' COM credit goes to: Ljubisa Knezevic
 
BCX_SHOW_COM_ERRORS(TRUE)
 
DIM H$            ' string H$ defaults to 2048 bytes
 
DIM ie AS Object
set ie = createobject("InternetExplorer.Application")
 
ie.navigate "about:blank" ' do this first!
ie.visible = true
ie.height = 300
ie.WIDTH = 550
ie.menubar = false
ie.toolbar = false
ie.statusbar = false
ie.resizable = true
 
' build the HTML code string ...
H$ = "<html><body><center><br><strong><font color=#A52A2A face="
' enc$() handles doublequotes within a string
H$ = H$ + enc$("comic sans ms") +">"
H$ = H$ + "--------   Church Bulletin Bloopers   ---------"
H$ = H$ + "</font></strong></center><br>"
H$ = H$ + "Don't let worry kill you -- let the church help."
H$ = H$ + "<br><br>"  
H$ = H$ + "Come hear missionary Bertha Beltsh all the way from Africa."
H$ = H$ + "<br><br>"  
H$ = H$ + "For those of you who have children and don't know it, we have a nursery downstairs."
H$ = H$ + "<br><br>" 
H$ = H$ + "This Sunday will be baptism in the South and North ends of the church. Children will be baptized at both ends."
H$ = H$ + "<br><br>" 
H$ = H$ + "Miss Judson will sing "
H$ = H$ + enc$("Put me in my little bed")
H$ = H$ + " accompanied by the pastor."
H$ = H$ + "<br><br>"  
H$ = H$ + "This Easter Sunday we will ask Mrs. Tugly to come forward and lay an egg on the altar."
H$ = H$ + "<br><br>"  
H$ = H$ + "The ladies of the church have cast off clothing of every kind.  They can be seen in the church basement Saturday."
H$ = H$ + "<br><br>"  
H$ = H$ + "A bean supper will be held on Tuesday evening in the church hall.  Music will follow."
H$ = H$ + "<br><br>"
H$ = H$ + "The Rev. Adams spoke briefly, much to the delight of his audience."
H$ = H$ + "<br><br>"
H$ = H$ + "The sermon this morning:  Jesus Walks On Water."
H$ = H$ + "<br><br>"  
H$ = H$ + "The sermon tonight:  Searching For Jesus."
H$ = H$ + "</body></html>"
 
ie.document.body.innerHTML = H$
 
Set ie = Nothing

' add HTML code to InternetExplorer using COM support
' (you must have MS InternetExplorer installed on your computer)
' needs BCX basic ver 5.05.05 or later, download free package from:
' https://www.rjpcomputing.com/programming/bcx/devsuite.html
' COM credit goes to: Ljubisa Knezevic
BCX_SHOW_COM_ERRORS(TRUE)
dim H$            ' string H$ defaults to 2048 bytes
dim ie As Object
set ie = createobject("InternetExplorer.Application")
ie.navigate "about:blank" ' do this first!
ie.visible = true
ie.height = 300
ie.width = 550
ie.menubar = false
ie.toolbar = false
ie.statusbar = false
ie.resizable = true
' build the HTML code string ...
H$ = "<html><body><center><br><strong><font color=#A52A2A face="
' enc$() handles doublequotes within a string
H$ = H$ + enc$("comic sans ms") +">"
H$ = H$ + "--------   Church Bulletin Bloopers   ---------"
H$ = H$ + "</font></strong></center><br>"
H$ = H$ + "Don't let worry kill you -- let the church help."
H$ = H$ + "<br><br>"  
H$ = H$ + "Come hear missionary Bertha Beltsh all the way from Africa."
H$ = H$ + "<br><br>"  
H$ = H$ + "For those of you who have children and don't know it, we have a nursery downstairs."
H$ = H$ + "<br><br>" 
H$ = H$ + "This Sunday will be baptism in the South and North ends of the church. Children will be baptized at both ends."
H$ = H$ + "<br><br>" 
H$ = H$ + "Miss Judson will sing "
H$ = H$ + enc$("Put me in my little bed")
H$ = H$ + " accompanied by the pastor."
H$ = H$ + "<br><br>"  
H$ = H$ + "This Easter Sunday we will ask Mrs. Tugly to come forward and lay an egg on the altar."
H$ = H$ + "<br><br>"  
H$ = H$ + "The ladies of the church have cast off clothing of every kind.  They can be seen in the church basement Saturday."
H$ = H$ + "<br><br>"  
H$ = H$ + "A bean supper will be held on Tuesday evening in the church hall.  Music will follow."
H$ = H$ + "<br><br>"
H$ = H$ + "The Rev. Adams spoke briefly, much to the delight of his audience."
H$ = H$ + "<br><br>"
H$ = H$ + "The sermon this morning:  Jesus Walks On Water."
H$ = H$ + "<br><br>"  
H$ = H$ + "The sermon tonight:  Searching For Jesus."
H$ = H$ + "</body></html>"
 
ie.document.body.innerHTML = H$
Set ie = Nothing

Post Comment

Only community members can submit or comment on code snippets. You must register or log in to contribute.

FORUM HIGHLIGHTS

Today's Posts
- This Category
- All Forums
Unanswered Threads
Related Links

X ADVERTISEMENT

STATISTICS

Members: 227,170

Users Online Now: 2,255

Active IRC Users: 10

Forum Threads: 85,241

Forum Posts: 449,956

Code Snippets: 738

Blogs: 118

Blog Entries: 1,282

Directory Links: 398

DaniWeb Home > Code Snippets > qbasic Syntax

Send HTML code to Internet Explorer from basic

What is DaniWeb IT Discussion Community?