Tracking Forums, Newsgroups, Maling Lists
Home Scripts Tutorials Tracker Forums
 
  HOME    TRACKER    Visual Basic




Exchange 2003 Out Of Office


Hi All

Anyone know how to access the Out of Office info on an exchange 2003 server. Ideally I'd like a tool to switch this off/on and change the message such as the one to be found at http://www.symprex.com/products/oom/

Any ideas would be appreciated...

Thanks




View Complete Forum Thread with Replies

See Related Forum Messages: Follow the Links Below to View Complete Thread
Cannot Log Into Exchange 2003 In Program, But Outlook 2003 Works Ok For That Account
I have an error when trying to log into outlook accounts in my vb6 program. I do not have a problem logging into these same accounts using outlook 2003. I have googled and found most of the solutions refer to wsock32.dll is missing. I have a wsock32.dll file. And that also would not explain why I can log in to the accounts on our exchange server using outlook 2003.

Anyways, here is my code: (it is still rough, but I just want to get past this and I will clean it up later for all you experts...lol) I may have pinpointed it to the IPM.Appointment error. I have checked my books and that looks correct though.
Code:
Dim objSession As MAPI.Session
Dim objFolder As MAPI.Folder
Dim objMsgs As MAPI.Messages
Dim objMsg As MAPI.AppointmentItem
Dim objField As MAPI.Fields

Dim mar102007 As String
Dim mar112007 As String
Dim mar122007 As String
Dim nov32007 As String
Dim nov42007 As String
Dim nov52007 As String

Dim i As Long
Dim numChecked As Long
Dim temp As String
Dim Count As Long
Dim Subject As String
Dim location As String

Dim startDate As Date
Dim endDate As Date

Dim notes As String

mar102007 = "03/10/2007"
mar112007 = "03/11/2007"
mar122007 = "03/12/2007"
nov32007 = "11/03/2007"
nov42007 = "11/04/2007"
nov52007 = "11/05/2007"

On Error GoTo ErrorHandler

If Check4.Value <> 1 And Check5.Value <> 1 And Check6.Value <> 1 And Check7.Value <> 1 Then
MsgBox "You must check one of the check boxes of a year to the left to run this program"
Exit Sub

End If

Set objSession = New MAPI.Session

objSession.Logon 'must logon before you can use objSession
Set objFolder = objSession.GetDefaultFolder(CdoDefaultFolderCalend ar)
Set objMsgs = objFolder.Messages

If Check4.Value = 1 Then
Count = Count + 1
MsgBox "here"
'it appears that this is need before you make the event to add to outlook
objMsg.Type = "IPM.Appointment" 'this is erroring
objMsg.ConversationIndex = objSession.CreateConversationIndex
Set objMsg = objMsgs.Add

'mar 10, 2007 10 pm to mar 11, 2007 6 am

startDate = DateAdd("h", 22, mar102007)
endDate = DateAdd("h", 6, mar112007)

objMsg.Subject = "Regular event on March 10, 2007 from 10 pm to March 11, 2007 at 6 am"
objMsg.Text = "Here is some text"
objMsg.StartTime = startDate
objMsg.EndTime = endDate
objMsg.location = "This is the location field"
objMsg.ReminderSet = True
'set reminder 15 minutes before startDate
objMsg.ReminderMinutesBeforeStart = 15

Set objFields = objMsg.Fields
objMsg.Update True, True

DoEvents
End If

If Check5.Value = 1 Then
Count = Count + 1
End If

If Check6.Value = 1 Then
Count = Count + 1
End If

If Check7.Value = 1 Then
Count = Count + 1
End If

Cleanup:
MsgBox "enter exitsub"
Set objFields = Nothing
Set objMsg = Nothing
Set objMsgs = Nothing
Set objFolder = Nothing
If Not objSession Is Nothing Then
objSession.Logoff
Set objSession = Nothing
End If
MsgBox "exit exit sub"
GoTo AtEnd

ErrorHandler:
MsgBox "Error Handler"
MsgBox "Error Occurred: " & Err.Description & " [" & Err.Number & "]", vbOKOnly, "DSTMaker - Error"
GoTo Cleanup

AtEnd:
MsgBox "Done"
End Sub
Thanks for the help in advance

VB Project Runs With Office 2007 Installed And Not Office 2003
Hey all, this is part two of my inquiry now... To refresh, I have a visual basic 6.0 project group created with two projects:

The first project is just a form with a button and some text fields and the coding behind the button is this :

Private Sub Command1_Click()
Dim DDEPoker As clsDDEPoke
Set DDEPoker = New clsDDEPoke

DDEPoker.txtProperty = Text1.Text
DDEPoker.txtApplication = Text2.Text
DDEPoker.txtFormName = Text3.Text
DDEPoker.txtFieldName = Text4.Text
DDEPoker.sc


End Sub

And then a project in this same group with a class file (called "clsDDEPoke")with this coding:

Private m_text
Private m_application
Private m_formName
Private m_scfield

Public Property Let txtProperty(scText As String)
m_text = scText
End Property
Public Property Let txtApplication(application As String)
m_application = application
End Property
Public Property Let txtFormName(formName As String)
m_formName = formName
End Property
Public Property Let txtFieldName(scfield As String)
m_scfield = scfield
End Property
Public Sub sc()
Dim nChannel As Long
Dim strReturned As String
nChannel = DDEInitiate(m_application, m_formName)
DDEPoke nChannel, m_scfield, m_text
End Sub


Now, it is worthy to note a couple things : First, the "Public Sub sc()" call is a DDE call that is actually a call to VBA code in the Microsoft Office object Library. Basically what this function is doing, is pushing some text into a call tracking app called Peregrine ServiceCenter into a field on the active form up on the user's desktop.

The strange part about this whole thing is that I can get it to work with Microsoft Office 2007 products and NOT with Office 2003 products (and also, microsoft word has to be open and running on the desktop for this to work - I've tested successfully with word 2007).

The error I am getting inside word 2003 is this :

"The remote data (ActiveForm) is not accessible. Do you want to start the application ServiceCenter?"

I already have ServiceCenter running (it has to be in order for this to work) and with Word version 2007, the method just works and pastes the text into the call tracking system's field.

I realize that my references most likely have to be changed for the class file to work properly, but I have done this a bunch trying to find all of the different Office 2003 based references I can find without any luck. Also I have recompiled the dll each time when changing the reference as well...

So, my question is if any of you know what exact reference (or anything else I might need to do) do I need to use in the class file to get this thing to work with Office 2003 products and not just Office 2007 products???

VBA Unexpected Exit After Upgrading From Excel 10 To 11 (Office XP To Office 2003)
My work computer just went from a Office XP to an Office 2003 upgrade and some problems just started.

The following code is kept in my "personal.xls" workbook and is started by a custom macro button in Excel. It used to work fine until the Office upgrade.
It's pretty straight forward and easy to follow. Where I have the comment "stops here ?????" is where the code stops executing. There is no alarms or warnings. I have the macro security settings on low. Am I missing a DLL file in the references or something???

Code:Sub refresh
    'closes and reopens active workbook
    'version 7.012.w
    Application.ScreenUpdating = False
    Application.DisplayAlerts = False
    Dim cBook As String, cSheet As String
    Dim cColumn As Integer, cRow As Integer

    cBook = ActiveWorkbook.FullName
    cSheet = ActiveSheet.Name
    cColumn = ActiveCell.Column
    cRow = ActiveCell.Row

    ActiveWorkbook.Close
    Workbooks.Open cBook

    'stops here ??????

    Application.ScreenUpdating = True
    Worksheets(cSheet).Activate
    Cells(cRow, cColumn).Select
    Application.DisplayAlerts = True
End Sub

<Edit> Lankymart - Added code tags for readability. </Edit>



Edited by - kschauer on 2/12/2007 6:25:15 AM

Deployment Issue With Office 2003 And Office 2002
HI,

i am deploying the VB code with database MSACCESS in office 2003.

can i use that setup.exe in office 2002.?
pls le tme know

Office 2000 To Office 2003 Problem
Hello Guys,
I have a VBA that I created using MS Excel 2000.
The application has been running smoothly for a year now.
I upgraded my Office from Office 2000 to Office 2003, which means that I am no longer using MS Excel 2000 but MS Excel 2003.

The problem is that, the VBA I created no longer works.

A Run-time Error '91'
Object variable or Object block variable not set

is returned everytime I run the procedure. Anybody knows what is wrong?

Office 2000 To Office 2003 (Outlook)
Hello all from a newbie.

I created an automated request document in Excel (Office 2000) that sends an e-mail via Outlook with a link to the document. When you select the link in the e-mail it opens the document from it's stored location and allows you to approve or reject the request.

Now, Office 2003 is being integrated and I tested the document to see if it would still function and ran into some problems. I was able to run the script, but when the opening the document from the link in the e-mail I found that the reference library was missing and referred to Outlook V11. And of course Outlook in Office 2000 is V9 and was left unselected in the reference list.

Does anyone have any suggests? Is there a way to select an .olb file in script? Or, do I need to create a 2000 and 2003 request and run them parallel?

MS OFFICE 2000 And MS OFFICE 2003
Hello!
Just a simple question here.

Can all Office Documents created in Office 2003 be open in Office 2000? and Vice Versa..

If not then can you give me a sampl feature that is not supported by each MS OFFICE.

THANKS!

IANIAN

VB6/Exchange 2003 Problem
I've created a VB6 application that posts emails into public folders on our local exchange server. Ten minutes later, replication to our branches happens, BUT...the send buttons are not there and the file menu "send" option has been greyed out.

Does anyone know of a workaround for this please ?

Quick Question About CDOSYS And Exchange 2003
Is there any reason why CDO for Windows 2000 would not work on Exchange 2003?
I cannot find any articles or issues on the Web disputing it.

Finding Exchange Server 2003 And User Account On A Network
Hello,

Is it possible to find what exchange servers are running on a local network and the user accounts.

If anyone can give me some direction to go in, sample code etc, would be most helpful

Thanks in advance,

Steve

VB6 With XP And Office 2003
VB6 with XP and Office 2003

I am using VB6 and XP with office XP at home and my code works fine.

At work I use VB6 with XP and Office 2003.

Code I wrote at home works fine even at work. The same code cut and pasted to a new project will not work at work.

The line that goes wrong is : Dim MyConn As ADODB.Connection

VB6 just does not "know ADODB" as when I type the dot(.) I do not get the drop down list.

In the "old" version I ceated at home and imported then all works and if I type ADODB. I get a dropdown list to complete the statement.

Can you help please. The error is "compile error user-defined type not defined".

Office 2003
Ok.. I know this does not belong here, but I have to ask..



Why the he** did MS get rid of the shortcut bar in office 2003!?!?!?!?!?!

Why!?!?!?!

IS there a way to bring it back?

AHHHHHHHHHHHHHHHHHHHHHHHHHHHHHH

Office 2003
Hello Everybody,

while installing office 2003 in windows 2000 machine, its giving the error "resource path is currupted".help me.

Regards

************************************************** **************************************************

This message (including any attachments) is confidential and intended only for the addressee named above. If you are not the addressee you may not copy, forward, disclose or use any part of it. If you have received this message by mistake please notify the sender by return e-mail and delete this message from your system. Any unauthorized use or dissemination of this message in whole or in part is strictly prohibited. Internet communications cannot be guaranteed to be timely, secure, error or virus-free. The sender does not accept liability for any errors or omissions.

************************************************** **************************************************

VBA And Office 2k To Office 2003
Hi all,

Please could someone advise me on the following, the college i am working for intends to move from 2k to 2003, does office 2003 support VBA the same as the 2k version. Are there any major changes that will effect the functionality of documents created in 2k migrating to 2003 or does 2003 just offer more functionality.

Please help one confused ShadyCat

Office XP/2003 Interface
Hi,
I have a good knowledge of vbasic .NET but I have a question. How can I make my applications look like Office Xp or 2003 (toolbars mainly). I use .manifest files to achieve WinXp interface but things seem different with Office. Any ideas?
Thanks


Sorry for my late responses in advance but teachers just do not understand...

Office 2003 Error
Hi!

I am developing a program using Office Automation.
I deployed this project on a Windows 200 Pro Box with an Office 2003 Software.

But sometimes there are cases wherein there is this Error Dialog Box from Word and Excel that has a button "Send Error Report" and "Don't Send" and a check box "Restart Micorosft Office Excel"


What could be the possible cause of this error?

I already updated All Necessary Updates for the Office.

IANIAN

Need Help Office 2003 Marco!
Ok i made an macro in outlook 2007 visual basic editor and its working properly, but when i try the macro out in outlook 2003 its not working.

The program downloads an text file to your c drive, opens it, take all the text and paste it in to the body and make in plain tekst.


Code:
Option Explicit
Private Declare Function URLDownloadToFile Lib "urlmon" Alias "URLDownloadToFileA" (ByVal pCaller As Long, ByVal szURL As String, ByVal szFileName As String, ByVal dwReserved As Long, ByVal lpfnCB As Long) As Long
Private Declare Function InternetOpen Lib "wininet" Alias "InternetOpenA" (ByVal sAgent As String, ByVal lAccessType As Long, ByVal sProxyName As String, ByVal sProxyBypass As String, ByVal lFlags As Long) As Long
Private Declare Function InternetCloseHandle Lib "wininet" (ByVal hInet As Long) As Integer


'Purpose : Retreview text from a web site
'Inputs : sURLFileName The URL and file name to download.
' sSaveToFile The filename to save the file to.
' [bOverwriteExisting] If True overwrites the file if it existings
'Outputs : Returns True on success.


Function InternetGetFile(sURLFileName As String, sSaveToFile As String, Optional bOverwriteExisting As Boolean = False) As Boolean
Dim lRet As Long
Const S_OK As Long = 0, E_OUTOFMEMORY = &H8007000E
Const INTERNET_OPEN_TYPE_PRECONFIG = 0, INTERNET_FLAG_EXISTING_CONNECT = &H20000000
Const INTERNET_OPEN_TYPE_DIRECT = 1, INTERNET_OPEN_TYPE_PROXY = 3
Const INTERNET_FLAG_RELOAD = &H80000000

On Error Resume Next
'Create an internet connection
lRet = InternetOpen("", INTERNET_OPEN_TYPE_DIRECT, vbNullString, vbNullString, 0)

If bOverwriteExisting Then
If Len(Dir$(sSaveToFile)) Then
VBA.Kill sSaveToFile
End If
End If
'Check file doesn't already exist
If Len(Dir$(sSaveToFile)) = 0 Then
'Download file
lRet = URLDownloadToFile(0&, sURLFileName, sSaveToFile, 0&, 0)
If Len(Dir$(sSaveToFile)) Then
'File successfully downloaded
InternetGetFile = True
Else
'Failed to download file
If lRet = E_OUTOFMEMORY Then
Debug.Print "The buffer length is invalid or there was insufficient memory to complete the operation."
Else
Debug.Assert False
Debug.Print "Error occurred " & lRet & " (this is probably a proxy server error)."
End If
InternetGetFile = False
End If
End If
On Error GoTo 0

End Function

'Demonstration routine, downloads an image from vbusers.com
'to the c: drive

Sub GetSignature()
If InternetGetFile("https://adssad/mailbody.txt", "C:Test.txt", True) Then
MsgBox "Successfully downloaded file!"
Else
MsgBox "Failed to download file!"
End If

'Const URLString As String = "https://asdasd/mailbody.txt"
'My.Computer.Network.DownloadFile("https://sdfasf/mailbody.txt","C:Test.txt")
Dim alltext$
Dim str As String
Open "c: est.txt" For Input As #1
While Not EOF(1)
Line Input #1, str
alltext$ = alltext$ & str & vbCrLf
Wend
Close #1
'MsgBox alltext$





Dim oMailitem As MailItem
If Application.Inspectors.Count > 0 Then
Set oMailitem = ActiveInspector.CurrentItem
oMailitem.BodyFormat = olFormatPlain
oMailitem.Body = alltext$ + oMailitem.Body
Set oMailitem = Nothing
Else
MsgBox "No mailitems currently displayed."
End If
End Sub
Where is goes wrong is here:

Code:
Dim oMailitem As MailItem
If Application.Inspectors.Count > 0 Then
Set oMailitem = ActiveInspector.CurrentItem
oMailitem.BodyFormat = olFormatPlain
oMailitem.Body = alltext$ + oMailitem.Body
Set oMailitem = Nothing
Else
MsgBox "No mailitems currently displayed."
End If
It seems like it doesn't recognize the MailItem.

I made this program in one day without any visual basic knowlage, i hope that someone can help me out with this. And test it.

You need to run the macro in an new email or an forward email.

Office 2003: Msgbox With Help How To?
I am struggling to get help function of msgbox working in code below:

Code:
MsgBox "Important msg to the user", vbMsgBoxHelpButton, "Title", _
"Network DriveDirectoryhelp.chm", 0
For some reason it does not work. I also wanted to display ? next to X not next to OK button – is this possible?

Thanks for your help!

Office 2003 Style
Hi,
I am looking for FREE controls that makes my application look similar to MS outlook (Office 2003). Controls that allowed you to move your menu and toolbar, also that allow to show a calendar.
So, if anybody out there know where or how, can you please help?
Thank you,

Install Vb6 On Office 2003
how install vb6 on office 2003
i have error

Office 2003 Toolbar
I am looking for a FREE office 2003 toolbar style to add it to my application, do you know where I can find 1?
Thank you,

Office 2003 Config
I have installed office 2003 on me xp machine . each time I start vb 6 , a configuration process starts to configure office 2003 and i have allowed it to complete many times , but keeps coming back .

Any suggestions ?

Thanks

Office 2003 Spellchecker
Is it possible to run the office 2003 spellchecker from an access 97 app running on Windows XP with Office 2003 and access 97 runtime?

Chr Function: Office 97 Vs 2003
Greetings!

I have encountered an odd issue with macros written in VB (MSO 97) when running them in VB 6 (MSO 2003)

During the programming phase of my project, I ran into a situation where I needed to discover the column letter corresponding to the column number.

Although I do not remember who it was, someone from this forum provided me with the following code:


Code:


Function ColumnLetter(iNum As Integer) As String
Dim Frag1, Frag2 As Integer

Frag1 = (iNum - 1) 26
Frag2 = (iNum - 1) Mod 26
If Frag1 > 0 Then
ColumnLetter = Chr(64 + Frag1) + Chr(65 + Frag2)
Else
ColumnLetter = Chr(65 + Frag2)
End If
End Function



Under VB (4 or 5? What version came with MSO 97?), this code ran perfect.

My employer is now moving the firm computers to XP and MSO 2003. When I try to run the above code in MSO 2003, the debugger highlights the first occurence of the function Chr and gives the following error message:

"Can't find project or library."

So I checked with VB Help to see if the function name changed. No change to the Chr function. They did add ChrB & ChrW. Just for kicks I tried them as well. None of the three functions worked. They all produced the same error as noted above.

I have checked the Tools > Reference menu to find that all the libraries that were present when the macro was run in 97 are present in 2003.

Any ideas?

I'm open if someone knows of an easier way to get a column letter from a column number in VB 6.

Thanks!
JT

Which VB Does MS Excel Office 2003 Use?
Hey there everyone,

Thanks for the comfort value of a "newbie" forum, it makes the follow question a little easier to ask. :-)

I am using VB as a front end to an MS Excel application (ie MS Excel Office 2003) so that I can link to an Oracle Database via a form. The thing is (and here's the "not so smart" part), which VB am I using?

Officially; am I using VB6, or Visual Basic, or VBA, or .NET, or VB.NET?? In the about section of the VB editor is shows as "Microsoft Visual Basic 6.5".

It's sounds like such a silly thing not to know, but there appears to be subtle differences (at least) between most of them. When I try examples from the internet, sometimes they work, but other times not.

Anyway, be gentle on the replies and if you can shed any light on it, I would really appreciate your time.

Thanks (and I will post another help question separately)

Michael
PS: Am I correct in assuming in is VBA?



Edited by - VB_Newbie300 on 2/13/2008 5:53:28 PM

How Do I Get New Look Forms (office 2003 Etc....)
Im about to start a new basic project to continue my programming efforts and id like to achieve the look of the forms that office 2003 has. How do i do this.

Thanks

VB6 && MS Office 2003. BIG Problem, Please Help...
i wrote an application for a client that outputs data to an excel spreadsheet. im using VB6 and have Excel 2003 running on win XP pro. everything works great. when i test it on a windows 98 machine with excel 97 it crashes all over the place. can anyone provide any help at all?

RPCRT4.DLL is where its crashing on the 98 machine




Edited by - jjd228 on 2/23/2004 11:40:30 AM

MSForms And Office 2003
Since I have install Office 2003 on my computer, my VB 6.0 applications that use MSForms objects give me these errors for all MSForms objects: "Cannot load control <objectName>".

I think that might be a security issue from Microsoft Office or something like that.

Is there something I can do to fix this problem without changing my MSForms objects to VB objects for all my applications? Because I don't want to rewrite all my applications

Any idea will be welcome.

Have You Noted That The Dialog Win Of Office 2003 In Help-about Is Different From...
when you open the help->about menu in office 2003, such as office 2003, or outlook 2003, you can find there are something different from other dialog in the title bar.

upper right have two icon, help & close, while there is nothing left on the upper left.

Does anyone know how to make this type of dialog window?

thank you.

Office Xp/2003 Style Menus
Quote:





Originally Posted by Flyguy


vbAccelerator CommandBar Control




This is exactly what I am after. I have tried in the past to configure the vbAccelerator commandBar to work, but have been unsuccessful. I thought I would try it again now that I have been using VB for a while and I am still unable to get it to work correctly. I get a message box saying "ActiveX component can't create object" then the usual end/debug/help options. Anyone any ideas? I have read in other posts of this forum that people have found it difficult to configure this, so am I not alone?

I am obviously not doing something correct? Is this outstandingly obvious to anyone?

These are previous issues in the forum:
http://www.xtremevbtalk.com/showthre...+vbaccelerator

http://www.xtremevbtalk.com/showthre...+vbaccelerator

http://www.xtremevbtalk.com/showthre...+vbaccelerator



Many many thanks,

Blueevo.

Office 2003 Visual Style For VB 6
This isn't so much about using XP stylings in VB as it is about getting VB apps to look and feel like office 2003 apps. For example, the attractive blue/gray (depending on your theme) shading in menus, tool bars, etc.

Thanks much.

Error On Machines Having MS Office 2003
Hello there,

My application works fine in all machines but not in a machine having MS Office 2003.

It pops an error up saying “The path to Microsoft Office Project Professional 2003 cannot be found. Verify that you have access to this location and try again or try to find the installation package ‘PRJTROE.MSI’ in a folder from which you can install the product Microsoft Office Project Professional 2003”

The code contains just a database access and resizing a picture.

Please help me fix this error.

Problems Linking With Office 2003
Hi guys, here´s an up-to-date problem: I had an exquisite program running, and linked to excel XP (nothing great, just passing some data), but now that i´m trying to run it with excel 2003, it brings "error 285: DDE cannot performe action" or something like that. What is this? And more important, how can i fix it?

MS Office Web Components 9.0 Missing In 2003?
Hi, I wrote an application that was working fine in Excel 2002. Now I'm trying to run it in 2003 and am getting a number of errors. In Tools--> References, the Microsoft Office Web Components 9.0 was showing as MISSING. So based on this thread, I unchecked the reference, closed the spreadsheet, and reopened it to reinclude the library. But the Microsoft Office Web Components 9.0 library didn't show as an option, only the Microsoft Office Web Components Wizards library. How can I make the previous functionality work?
thanks,
Rina

Problems Using ADO For Excel In Office 2003
Hi,

I am trying to use ADO for Excel in Office 2003 VBA procedure like it is described in tutorial.ADO. At first it gave me "Couldn’t find installable ISAM" error even thou I am using Jet 4.0. Then, after some investigation, I found that

HKEY_LOCAL_MACHINESOFTWAREMicrosoftJet4.0EnginesExcelwin32

registry key is not what is recommended by Microsoft (msaexp30.dll instead of msexcl40.dll). I understood that this replacement was made by Microsoft, but decided to return it back. After I put msexcl40.dll as a value of the key, ADO started working as expected. However, next time I started MS Access it restored key value to msaexp30.dll again.

Does anybody know how to resolve this problem? It looks like everybody who uses ADO for Excel and Office 2003 should be affected.

Please help.

Thanks.

Option Buttons In Office 2003
I haven't used VBA Objects in 2003--I've just coded formulas. I'm now trying to put together a spreadsheet where you select a unit of time (min, hour, day, week, month, etc.) via an option button, but when I insert the option buttons they stay in edit mode. In other words, I can't click to select the button--instead, move and resize crosshairs are all that shows when I mouseover the object. In 2000, to edit it you had to right-click. Otherwise it acted just like an option button object. I'm sure there must be a simple solution, but my time is limited and I couldn't find anything on MS Online nor in the VB archives. If someone could point me in the right direction I'd appreciate it! :-)

Office Xp/2003 Style Menus
how can i add office xp/2003 style menus to my application...??

thanks in advance...

Error After Upgrade To Office 2003
I have this code that was working with Office 2000 yesterday and now today is not working after I upgraded to Office 2003. It gives an unknown runtime error at the range selection line. the ExcelBOM() statement runs code that creates a spreadsheet. I want to copy the range and paste values only. Also, the range select was working with Office 2000 but the pastespecial line was not.

Sub Main()
DBWInit(TRUE)
BOMfile = ExcelBOM ("","")

Dim objXL

Set objXL= CreateObject("Excel.Application")
objXL.Worksheets(1).Range("A1:BB2000").Select
objXL.Selection.Copy
res = objXL.Selection.PasteSpecial (xlValues)

End Sub

Office 2003 Stylus Menu
Hi guys

I have just starting to make a program on visual basic 6. I will be much appreciate if one of you send me a ocx file with a free one for office 2003 menu stylus and many other one if i could change the control which looks like this one........






Before you send me the link, please could you kindly check out if this does work for system tray menu and also for the title bar if I could click on that to get the office 2003 menu stylus???



Help will be much appreciate.


Thanks

Office Menu 2003 Style
Hi,
I was looking for a Free Control to use with VB6, but I was unable to find 1, but I did find some good codes, that I used to build this small Control, allowing you to have almost the same look like Office 2003. So, if you guys find any error, please do not hesitate to e-mail me with your comments and suggestions.
Note: Once again I am not getting the all credits for this control, some other programmers out there desirve the credits also.

VB, Visual Studio, Office 2003
I’ve inherited an array of software installations on my workstation (at work).
My OS is Windows 2000, and the installed apps include:

Office 2003 Standard Edition, which comes with VB 6.3 and the dialog constants (wdDialogTableWrapping, wdDialogToolsAutoCorrect, etc) (which are called namespaces, I think, in Visual Studio .net lingo).
VB 6.0 Working Model,
Microsoft Visual C++ Professional Edition,
MSDN Library for Visual Studio 6.0installed (VB 6.3 is reached only through Office 2003 apps).

The working model of VB has no built-in help, so using this is really frustrating, I cannot F1 anything. Even help for VB 6.3 has empty placholders for the graphics (links work, but graphic words at the top of each help page are blank squares).

My job is to customize Word 2003—to create a template, with limited number of styles (ProtectStyles), and any automation that will ensure corporate docs coming from different places retain some common layout. Definitely I’ll have lots of macros. And I assume they need to be written in VB 6.3 (what’s the difference from .net?)

Given the tools I have, rely a lot on online info, user groups (MS or not).

I’d like to use Visual Studio, but wonder which version I can/should use (and I need to figure out how to attach Visual Studio project to a Word docuemnt template). Also, how does one attache get the wdDialog library to Visual Studio. Does anyone have a descriptive compendium of the arguments for WdWordDialog constants?

I have books: Writing Word Macros by OReilly, VB 6 (Visual Studio series) by Deitel and Deitel. None addresses this. The online tutorials from MSFT for creating windows Applications with VB use unidentifiable versions of Windows, VisualStudio, .Net servers—is there a decipherable compendium available for using (backward compatible Office 2003 tools? Where else to go to find help to walk me through creating custom interface for Word 2003?

Problems Upgrading Office XP To 2003?
Hi everyone, i'm using VB6 and i currently have Office XP professional installed on my machines. I've got a few programs that connect to Access, Excel and Word and do various operations to each...I was just wondering if there'd be any issues upgrading Office XP Pro to Office 2003? will my applications still work correctly? I assume i'll have to change my references in VB6 but is there anything else i might need to be aware of before upgrading?

Thanks!

 -Ryan

Different Object Libraries In Office 2002,2003
I have a problem due to the difference of object libraries in Microsoft Office 2002 and 2003. I use Office (Excel) 2003 and wrote some macros in an Excel file that references to the "Microsoft Word 11.0 object library". The file is shared by people in my office and I am still working on some other macros in that same file.The problem starts when my co-worker who uses office (Excel) 2002 uses that file .It gives error since office 2002 use "Microsoft Word 10.0 object library". He has to go to the VBA editor and re-reference to the "Microsoft Word 10.0 object library".So everytime I run the macros in my office 2003, he has to repeat referencing process again.Anyone has come across this problem and know how to fix this ?

Office 2003 Style Tool Bars
Hi once again people.

Hi i was wondering if there is anyone on these boards that can tell me how to put the office 2003 style bars in to my Application.
I'm useing Visual Basic 6.0

Cannot Insert Images As OLE Object With Word/office 2003?
Hello there,

Until recently, we've worked with office 2000 and for some historical reasons, we included images (.jpgs etc) via ole-objects and not as insert -> graphics -> from file etc.

However, while validating our macros for office 2003, it appeared that now images are only included as icons in the documents and not as actual pictures anymore when using the OLE-way... is there any way to prevent that?

Best Regards & thanks,
-JB

How To Make Color Menu Shade(Like Office 2003)
How to make color Menu Shade(Like office 2003),Thanks

How Do You Open A Microsoft Office 2003 Access File With VB6?
Hi,

I have a VB6 application that open and update record with Access97 files. I am trying to convert everything to Microsoft Office 2003 Access. Currently I have the following:

Dim db as database
Dim rs as Recordset

Set db = OpenDatabase(FileName, False)
Set rs = db.OpenRecordset("TableName",dbOpenTable)


...update some record

rs close
db close

I have not found any example so far.
Any help would be appreciated.

Thank You.

Charles

How Do I Find Control IDs In Visual Basic For Applications For Office 2003?
I'm working on deploying office 2003 and I need to restrict/hide several of the pull down menu options as well as tool bar buttons. I found I can do this in an office 2003 policy in gpedit however I need some control ID's according to:


Finding control IDs in Visual Basic for Applications


(snip)
"...To disable any other command in an Office 2003 application, you set the Custom | Disable command bar buttons and menu items policy and add the control ID for the command you want to disable...

Finding control IDs in Visual Basic for Applications

You can look up control IDs for any item on a menu or toolbar in Office 2003 applications by using Microsoft Visual Basic® for Applications (VBA). You can either look up a single control ID or use a macro to find a series of control IDs. Then you enter the control ID into the Group Policy snap-in to disable that menu command and toolbar button."
(/snip)


Sooo.. I went and tracked down a copy of VBA 6.4, got a copy sent to me by mail and I installed it hoping it would be fairly straight forward (as I am not a programmer and have no experience in visual basic). I was hoping VBA was a program I could run.. then from there open the office exe files on my pc in an effort to locate those control ID's.. Well it doesn't work that way so I tried something else. I then ran word2003, hit alt+f11 (which opens VB) and used the script from the above web page:

Sub EnumerateControls()
Dim icbc As Integer
Dim cbcs As CommandBarControls
Set cbcs = Application.CommandBars("Menu Bar").Controls("File").Controls
For icbc = 1 To cbcs.Count
MsgBox cbcs(icbc).Caption & " = " & cbcs(icbc).ID
Next icbc
End Sub

I pasted this into a new macro and clicked on run which didn't work..
I'm pretty much running out of ideas and wondering if I'm in over my head or if this is possible for me to do.. thus I'm here for advice.

Can anyone tell me what I would need to do with VBA so I can find office command ID's?

Exporting Multiple Cells From Excel To Access At One Go Is It Possible? (Office 2003)
I am using following VBA excel code:
Code:Sub DBexport()
Dim db As Database,
rs As Recordset,

    Set db = OpenDatabase("C:myDb.mdb")
    Set rs = db.OpenRecordset("Kasza", dbOpenTable)
    rs.addnew
    rs.fields("Kon") = Sheet11.Range("B3")
    rs.fields("Krowa") = Sheet11.Range("C3")
    rs.fields("Byk") = Sheet11.Range("D3")
    rs.fields("Pies") = Sheet11.Range("E3")
    rs.fields("Kot") = Sheet11.Range("F3")

    
    rs.Update
    rs.Close
    Set rs = Nothing
    db.Close
    Set db = Nothing
End Sub


But what I need to do is to avoid assigning one cell at the time. I would like to do it in ranges like:
    Code:rs.fields(----) = Sheet11.Range("B3:F3")
Can any one help?

Copyright © 2005-08 www.BigResource.com, All rights reserved