Click here to Skip to main content
16,007,111 members
Home / Discussions / Web Development
   

Web Development

 
Generalimages in a webform Pin
cmarmr25-Jun-05 7:41
cmarmr25-Jun-05 7:41 
GeneralRe: images in a webform Pin
Guffa29-Jun-05 5:15
Guffa29-Jun-05 5:15 
GeneralForcing "Save Taget As" dialog when clicking a link Pin
Wolfram Steinke24-Jun-05 23:24
Wolfram Steinke24-Jun-05 23:24 
GeneralRe: Forcing "Save Taget As" dialog when clicking a link Pin
minhpc_bk25-Jun-05 5:42
minhpc_bk25-Jun-05 5:42 
GeneralRe: Forcing "Save Taget As" dialog when clicking a link Pin
Wolfram Steinke25-Jun-05 12:40
Wolfram Steinke25-Jun-05 12:40 
GeneralRe: Forcing "Save Taget As" dialog when clicking a link Pin
Wolfram Steinke26-Jun-05 14:24
Wolfram Steinke26-Jun-05 14:24 
GeneralRe: Forcing "Save Taget As" dialog when clicking a link Pin
minhpc_bk26-Jun-05 14:39
minhpc_bk26-Jun-05 14:39 
GeneralExporting Images From Word Pin
ironclads24-Jun-05 11:23
ironclads24-Jun-05 11:23 
Ok, I know what you are thinking. D'Oh! | :doh: Why was this posted on the web forum? Well, let me explain.

I Have a DHTML text editor that I currently import Microsoft Word documents into via IE. The only problem is only text comes across currently. I came across info on MSDN that said images can be saved out of Word 2003 as bmp files. So far I can open the document, get a handle on each image, and copy them to the clipboard, but for some odd reason, probably my fault Roll eyes | :rolleyes: , I can't seem to save them to the hard drive.

I've included the code below, perhaps you can assist, especially if you know MS VB.NET and VBScript better than I, which wouldn't be difficult to do. Wink | ;-) Basically I get the image copied to the clipboard fine but then I don't seem to be saving anything out. Nothing fails, it just doesn't save. Any help would be greatly appreciated. Wink | ;)

Sub ImportWordDoc()
On Error Resume Next
Set wApp = CreateObject("Word.Application")
wApp.Activate
wApp.WindowState=0
call wApp.Resize(400, 400)
Set wDoc = wApp.Documents.Open(document.all.FileToOpen.value)
wApp.Visible = true

For index = 1 To wDoc.InlineShapes.Count
inlineShape = ""
Set inlineShape = wApp.ActiveDocument.InlineShapes(index)
inlineShape.Select()
wApp.Selection.CopyAsPicture()
data = ""
Set data = Clipboard.GetDataObject()
If data.GetDataPresent( GetType( System.Drawing.Bitmap )) Then
bmp = ""
bmp = CType(data.GetData(GetType(System.Drawing.Image)), Bitmap)
bmp.Save( "C:\mybitmap" + cstr(index) + ".bmp" )
End If
Next
Call wDoc.Close(True)
call wApp.Quit(True)
End Sub
GeneralDHTML Menu & Iframes Pin
tranzparentl24-Jun-05 10:22
tranzparentl24-Jun-05 10:22 
GeneralRe: DHTML Menu & Iframes Pin
minhpc_bk25-Jun-05 5:55
minhpc_bk25-Jun-05 5:55 
Generalnew to web design, need guidance Pin
Joey Picerno24-Jun-05 6:25
Joey Picerno24-Jun-05 6:25 
GeneralRe: new to web design, need guidance Pin
Nino_124-Jun-05 15:17
Nino_124-Jun-05 15:17 
GeneralData on the wire Pin
nemo24-Jun-05 6:05
nemo24-Jun-05 6:05 
QuestionHow to access dynamically-generated elements Pin
Nickmatic24-Jun-05 5:47
Nickmatic24-Jun-05 5:47 
AnswerRe: How to access dynamically-generated elements Pin
minhpc_bk24-Jun-05 23:19
minhpc_bk24-Jun-05 23:19 
GeneralRe: How to access dynamically-generated elements Pin
Nickmatic25-Jun-05 5:55
Nickmatic25-Jun-05 5:55 
GeneralRe: How to access dynamically-generated elements Pin
minhpc_bk26-Jun-05 17:15
minhpc_bk26-Jun-05 17:15 
GeneralRe: How to access dynamically-generated elements Pin
Nickmatic27-Jun-05 12:43
Nickmatic27-Jun-05 12:43 
Generalweb page system recommendations Pin
Tibor Blazko23-Jun-05 23:46
Tibor Blazko23-Jun-05 23:46 
GeneralCalculating the window's size Pin
llp00na23-Jun-05 23:26
llp00na23-Jun-05 23:26 
GeneralAutomatically Click Link Pin
tranzparentl23-Jun-05 11:19
tranzparentl23-Jun-05 11:19 
GeneralRe: Automatically Click Link Pin
minhpc_bk23-Jun-05 17:52
minhpc_bk23-Jun-05 17:52 
GeneralIIS Intranet Configuration Pin
Matt Gerrans23-Jun-05 10:08
Matt Gerrans23-Jun-05 10:08 
GeneralRe: IIS Intranet Configuration Pin
minhpc_bk23-Jun-05 17:45
minhpc_bk23-Jun-05 17:45 
GeneralRe: IIS Intranet Configuration Pin
Matt Gerrans28-Jun-05 7:50
Matt Gerrans28-Jun-05 7:50 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.