Click here to Skip to main content
15,921,174 members
Home / Discussions / Visual Basic
   

Visual Basic

 
GeneralRe: How to check if a ListView control has been clicked? Pin
Paul Hasler7-Jan-10 3:33
Paul Hasler7-Jan-10 3:33 
GeneralRe: How to check if a ListView control has been clicked? Pin
Dave Kreskowiak7-Jan-10 3:41
mveDave Kreskowiak7-Jan-10 3:41 
AnswerRe: How to check if a ListView control has been clicked? Pin
Luc Pattyn7-Jan-10 3:55
sitebuilderLuc Pattyn7-Jan-10 3:55 
GeneralRe: How to check if a ListView control has been clicked? Pin
Dave Kreskowiak7-Jan-10 4:37
mveDave Kreskowiak7-Jan-10 4:37 
AnswerRe: How to check if a ListView control has been clicked? Pin
DaveAuld7-Jan-10 6:10
professionalDaveAuld7-Jan-10 6:10 
AnswerRe: How to check if a ListView control has been clicked? Pin
Paul Hasler7-Jan-10 15:55
Paul Hasler7-Jan-10 15:55 
QuestionHow to convert open office document to pdf ?? Pin
JC.KaNNaN6-Jan-10 19:03
JC.KaNNaN6-Jan-10 19:03 
AnswerRe: How to convert open office document to pdf ?? [modified] Pin
JC.KaNNaN7-Jan-10 2:12
JC.KaNNaN7-Jan-10 2:12 
Thumbs Up | :thumbsup:
hi,

i got a solution for this conversion...
its take lot of time...


Sub SaveAsPDF_demo()

Dim oSM, oDesk, oDoc As Object 'OOo objects
Dim OpenParam(1) As Object 'Parameters to open the doc
Dim SaveParam(1) As Object 'Parameters to save the doc

Set oSM = CreateObject("com.sun.star.ServiceManager")
Set oDesk = oSM.createInstance("com.sun.star.frame.Desktop")

Set OpenParam(0) = MakePropertyValue("Hidden", True) ' Open the file hidden
Set oDoc = oDesk.loadComponentFromURL("file:///C:/tmp/testdoc.odt", "_blank", 0, OpenParam())

Set SaveParam(0) = MakePropertyValue("FilterName", "writer_pdf_Export")
Call oDoc.storeToURL("file:///C:/tmp/testdoc.pdf", SaveParam())

Set oDesk = Nothing
Set oSM = Nothing

End Sub


Public Function MakePropertyValue(cName, uValue) As Object
Dim oStruct, oServiceManager as Object
Set oServiceManager = CreateObject("com.sun.star.ServiceManager")
Set oStruct = oServiceManager.Bridge_GetStruct("com.sun.star.beans.PropertyValue")
oStruct.Name = cName
oStruct.Value = uValue
Set MakePropertyValue = oStruct
End Function

Yours,
KaNNaN

-----------------------------------------------------------------
"Success is When Ur Signature Becomes An Autograph"


modified on Thursday, January 7, 2010 8:20 AM

QuestionHide a complete row... Pin
MacIntyre6-Jan-10 18:04
MacIntyre6-Jan-10 18:04 
AnswerRe: Hide a complete row... Pin
Dave Kreskowiak7-Jan-10 0:30
mveDave Kreskowiak7-Jan-10 0:30 
QuestionHow to monitor drive activity in vb 2008 Pin
RevEd6-Jan-10 14:21
RevEd6-Jan-10 14:21 
AnswerRe: How to monitor drive activity in vb 2008 Pin
Dave Kreskowiak6-Jan-10 14:49
mveDave Kreskowiak6-Jan-10 14:49 
AnswerRe: How to monitor drive activity in vb 2008 Pin
Andy_L_J6-Jan-10 15:06
Andy_L_J6-Jan-10 15:06 
AnswerRe: How to monitor drive activity in vb 2008 Pin
Dimitri Witkowski6-Jan-10 22:26
Dimitri Witkowski6-Jan-10 22:26 
AnswerRe: How to monitor drive activity in vb 2008 Pin
RevEd7-Jan-10 15:53
RevEd7-Jan-10 15:53 
QuestionOffice version Problem in Outlook Add-in Pin
dcdhingra6-Jan-10 5:02
dcdhingra6-Jan-10 5:02 
QuestionDate manipulation and SQL.... Pin
Johnkokk5-Jan-10 23:15
Johnkokk5-Jan-10 23:15 
AnswerRe: Date manipulation and SQL.... Pin
Luc Pattyn6-Jan-10 2:14
sitebuilderLuc Pattyn6-Jan-10 2:14 
AnswerRe: Date manipulation and SQL.... Pin
loyal ginger6-Jan-10 4:34
loyal ginger6-Jan-10 4:34 
GeneralRe: Date manipulation and SQL.... Pin
Johnkokk6-Jan-10 20:54
Johnkokk6-Jan-10 20:54 
QuestionHow to open existing file in VB6 Pin
JC.KaNNaN5-Jan-10 22:59
JC.KaNNaN5-Jan-10 22:59 
AnswerRe: How to open existing file in VB6 Pin
Eddy Vluggen6-Jan-10 1:30
professionalEddy Vluggen6-Jan-10 1:30 
QuestionStackOverflowException [SOLVED] [modified] Pin
#realJSOP5-Jan-10 8:44
professional#realJSOP5-Jan-10 8:44 
AnswerRe: StackOverflowException Pin
MikeMarq5-Jan-10 9:14
MikeMarq5-Jan-10 9:14 
GeneralRe: StackOverflowException Pin
#realJSOP5-Jan-10 9:31
professional#realJSOP5-Jan-10 9:31 

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.