Visual Basic

Re: Update BrowserFlags and EditFlags value in Window7 registry

29-Dec-11 3:44

My application is in VB6 and environment is Window XP. We are using WebBrowser control to display data of Word doc files i.e. we are opening word files always inside the WebBrowser control and then modifying word file using macros.Our application send email to user with body as word files i.e we paste word file data into email body part.Our VB code is perfectly working with office 2003 and office 2010.We are doing following changes in window registry via VB6 code for temporary basis:
1)..HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Word.Document.8\

updating BrowserFlags value to H80000024
2)..HKEY_CLASSES_ROOT\Word.Document.8\

updating EditFlags value to 65536
3)..HKEY_CLASSES_ROOT\Word.Template.8\

updating EditFlags value to 65536
4)..HKEY_LOCAL_MACHINE\SOFTWARE\Classes\Word.Document.12\

updating BrowserFlags value to H80000024
5)..HKEY_CLASSES_ROOT\Word.Document.12\

updating EditFlags value to 65536
6)..HKEY_CLASSES_ROOT\Word.Template.12\

updating EditFlags value to 65536

Now we are migrating environment from WinXP to Win7. I have following query for Win7 environment :
1) Will we able to do registry changes using VB6 code on the all same path as mentioned above ?
2)Will Word doc files always open inside webBrowser control ?
3)Do we require additional registry changes for BrowserFlags and EditFlags via VB6 code ?
4)Please suggest us what else we have to do for registry changes and to send email ?

I have one more query .If Win7 support team does not give us rights to change registry then without changing values of BrowserFlags and EditFlags , how word docs files will open inside webBrowser control of VB6 ?

Dave Kreskowiak29-Dec-11 4:08

Re: Update BrowserFlags and EditFlags value in Window7 registry

29-Dec-11 4:08

Your uses will not be able to modify anything under LOCAL_MACHINE or CLASSES_ROOT, so your questions are irrelevant.

You don't need a webbrowser control to open/edit/print Word documents. I suggest you Google for "VB6 Office Interop".

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

Nitin Varshneya29-Dec-11 4:14

Re: Update BrowserFlags and EditFlags value in Window7 registry

29-Dec-11 4:14

Will I able to open & modify word doc using VB6 Office Interop ?

Dave Kreskowiak29-Dec-11 5:00

Re: Update BrowserFlags and EditFlags value in Window7 registry

29-Dec-11 5:00

What did I tell you to do?? Google it and find out. You might want to try "VB6 eidt Word document".

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

Luc Pattyn29-Dec-11 5:41

Luc Pattyn

29-Dec-11 5:41

Fortunately Google seems to know you're occasionally a tad dyslexic. Big Grin | :-D

Luc Pattyn [My Articles] Nil Volentibus Arduum

Re: Update BrowserFlags and EditFlags value in Window7 registry

Dave Kreskowiak29-Dec-11 6:57

Re: Update BrowserFlags and EditFlags value in Window7 registry

29-Dec-11 6:57

My fingers are dyslexic. My mind is so frustrated with their inability to type. So much so, it's thinking of outsourcing the typing.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

Nitin Varshneya30-Dec-11 2:23

Re: Update BrowserFlags and EditFlags value in Window7 registry

30-Dec-11 2:23

we can edit word doc by VB6 Office Interop but I am not able to find control in VB6 to view and edit word doc except webBrowser control.Please help me to find solution.

Dave Kreskowiak30-Dec-11 9:10

Re: Update BrowserFlags and EditFlags value in Window7 registry

30-Dec-11 9:10

That's because there is no control. You can show Word on your form. You just have to do a little research to find out how. I already told you what to Google for. You just have to read the results to find it.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

Nitin Varshneya3-Jan-12 0:51

Re: Update BrowserFlags and EditFlags value in Window7 registry

3-Jan-12 0:51

Thanks for your reply.But in my case it is prerequisite to show word file in a control like webBrowser. we have maintenance project and currently using WebBrowser control in VB6 and it is working fine in WinXP environment.Our VB6 code is doing window registry changes for BrowserFlags & EditFlags.
But on win7, we have no rights to do registry changes.So I am looking for solution to open word file inside WebBrowser control of VB6.We are also editing word file via VB6 code.

Dave Kreskowiak3-Jan-12 9:36

Use WebBrowser control in VB6 to open an Office document on Win7

3-Jan-12 9:36

Nitin Varshneya wrote:
But in my case it is prerequisite to show word file in a control like webBrowser

That is not a requirement. That is a preference.

I spent about 5 minutes Googling for "show word in vb6" and found a small bunch of solutions to your problem, none of which use a webbrowser control. If you insist on using one, fine. Good luck finding a solution. If not, you know what to Google for. All you need to do is teach yourself something new.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

Nitin Varshneya29-Dec-11 3:41

Re: Use WebBrowser control in VB6 to open an Office document on Win7

29-Dec-11 3:41

How to use WebBrowser control in VB6 to open,edit,close,save and print an Office document on Win7 machine ?
I read that we needs to update BrowserFlags and EditFlags value of window registry via VB6 code to open word doc inside the webBrowser control but we do not have rights to edit window registry on win7 machine .

Dave Kreskowiak29-Dec-11 4:06

Re: Use WebBrowser control in VB6 to open an Office document on Win7

29-Dec-11 4:06

First, why are you still using VB6?? Do you know that there will be no VB6 runtime support in Windows 8?

Next, why are you using a web browser control? You just need to use Office Interop to do these things. No, I don't have any examples because VB6 has been dead for years and I haven't touched in since 2001.

A guide to posting questions on CodeProject[^]

Dave Kreskowiak

Nitin Varshneya30-Dec-11 2:24

Re: Use WebBrowser control in VB6 to open an Office document on Win7

30-Dec-11 2:24

we can edit word doc by VB6 Office Interop but I am not able to find control in VB6 to view and edit word doc except webBrowser control.Please help me to find solution.

JR21230-Dec-11 11:47

JR212

30-Dec-11 11:47

Can this help

Sub test()
  Dim word As Object, Doc as object
  Set word = CreateObject("Word.application")
  word.Visible = True
  Set doc = word.documents.Add
End Sub

it's simple basic code and works almost always
however Dave is correct vb6 is dead! use .net

Jan

Re: Use WebBrowser control in VB6 to open an Office document on Win7

Nitin Varshneya3-Jan-12 0:53

3-Jan-12 0:53

Thanks for your reply.But in my case it is prerequisite to show word file in a control like webBrowser. we have maintenance project and currently using WebBrowser control in VB6 and it is working fine in WinXP environment.Our VB6 code is doing window registry changes for BrowserFlags and EditFlags.I can not migrate to VB.NET now.
But on win7, we have no rights to do registry changes.So I am looking for VB6 code solution to open word file inside WebBrowser control of VB6.We are also editing word file via VB6 code.

VB6.0

spuritha28-Dec-11 18:00

spuritha

28-Dec-11 18:00

SIR,

I'm Sireesha. i want a report birthday of members by month wise , year wise .

Dim con As New ADODB.Connection
    Dim rs1 As New ADODB.Recordset
    Dim rs As New ADODB.Recordset
    Dim MonthSql
    Dim mon1 As String
    Dim month1 As String
    con.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\Program Files\Microsoft Visual Studio\VB98\FBMDetails.mdb;Persist Security Info=False"
    MonthSql = "select dob,md from fdetails"
    mon1 = InputBox("enter month", "month")
    Set rs = con.Execute(MonthSql)
    rs.MoveFirst
    While Not rs.EOF
        month1 = Month(rs.Fields("dob"))
        drMwr.Sections(1).Controls(5).Caption = mon
       If month1 = mon1 Then
          Dim monthsql1
          monthsql1 = "select name,dob,md,phone,email from fdetails where month1 =  ' " + mon1 + "'  "
          MsgBox (monthsql1)
          rs1.Open monthsql1, con
           Set rs1 = con.Execute(monthsql1)
          Set drMwr.DataSource = rs1
           drMwr.Show
       End If
     rs.MoveNext
    Wend

i got an error:u> no value given for one or more required parameters in the statement rs1.Open monthsql1, con what to do sir how to solve this

Sireesha

thatraja28-Dec-11 18:26

thatraja

28-Dec-11 18:26

Use proper title for questions.

Here 3 Scenarios with examples
No value given for one or more required parameters[^]

And I suggest you to use parameterized query[^]

thatraja

My Dad had a Heart Attack on this day so don't...
Pompeyboy3 here | Nobody remains a virgin, Life screws everyone Sigh | :sigh:

Rajesh Anuhya29-Dec-11 15:56

Rajesh Anuhya

29-Dec-11 15:56

Quote:
monthsql1 = "select name,dob,md,phone,email from fdetails where month1 = ' " + mon1 + "' "

change your query(remove the spaces

monthsql1 = "select name,dob,md,phone,email from fdetails where month1='" + mon1 + "'"

My Tip/Trick[^]

Shameel30-Dec-11 8:48

Shameel

30-Dec-11 8:48

spuritha wrote:
no value given for one or more required parameters

Check your column names. You might have misspelled them.