Visual Basic :: Microsoft Calendar And Access

Microsoft Access 2000, SQL And Calendar Control
Hello!

I'm doing a little project with MS Access 2000 and I have been stucked with the following problem a few days:

I have a SQL query:

SELECT Sum(Table.Column) As Total
FROM Table WHERE Table.Date = [Forms]![MyForm]![ActiveXCtl].[Value] (I've also tried many other SQL-queries)

On the form I have a Calendar Control and its name is ActiveXCtl, I have put the following function call to the ActiveXCtl's Click-method: Form_MyForm.Total.Requery

I also have that query on the form as edit box (Name: Total).
Now when I click on a certain date on the calendar control, I would like to see query results for that date, but nothing happens.

Can anyone help me with this one?

Problems Linking Outlook Calendar To Microsoft Calendar Control In Vb.
Hi,
For a while now I've been trying to find a way to link my outlook calendar to the microsoft calendar control in visual basic. When I click on the calendar in my program, I want it to show the appointment subject in a text box and the appointment body in a Richtext box. I'd appreciate any help?
Thanks.

Microsoft Calendar
Hello,
I am using a calendar control (Common Control 2.6.0), and also a Tab (Microsoft Tabbed Dialog Control) with 6 tab. My problem is:
When I add a calendar to tab # 6, the calendar will be shown on the other tabs, and I only want to see it on the 6th tab (only).
Does anybody know why or how I can fix this problem?
Please help!!

Microsoft Calendar Control 8.0
How come this control when put on a form just crashes my VB?!

Is there any other calendar control besides the one in the mswindows common controls (that one sucks)

Microsoft Calendar Control 8.0
Is there anyway to select more than 1 day on this control? I want a user to be able to move through the calendar and on days where there is an appointment, mark the day somehow. So the calendar could have unlimited days marked to show something is on them.

Microsoft Calendar Control 8
how yes we do I use some calendar for more forms, and that value get in forms in textbox.
I use Microsoft Calendar Control 8.
beginner

Microsoft Calendar Control
Can I know whether is there any way or how to make a mark on a certain date on the calendar? for example, highlight, or put some text or whatever in it? I raelly appreaciate it if anyone could tell me on that... or is there other calendar which i can use that have this function??? THANKS A LOT !!!

Microsoft Calendar Control 8.0
Hi,

Just wondering if anyone knows any more than I do about this?

I would like to add some text to the dates, but I am predicting this calendar object is not very versatile.

Can anyone help?

Cheers, Lee

Microsoft Calendar Control
Hey ppl. Here is my problem: I want the user to be able to pick a date range. I have NO idea how to do this. Can I use the Microsoft Calendar Control and, if so, how? I'm using VB6. Please help!

Microsoft Calendar Control
hi!!
im making a vb application wich must use a calendar in order to work
but when i choose the ms calendar control 8.0 it appears in the toolbar
but when i try to use it it makes an error and closes the vb enviroment.
any ideas of what to do?
thanks alot!!!

Microsoft Calendar Control
I have an application with 2 calendars in 2 different forms. It was working fine in Windows 2000.

Now that I have Windows XP, one calendar is correct and the other one only shows a BIG "O" for october.. it seems the month name is showing with a font size something like 90 !

I look at both calendar, both settings are the same.

And the strangest part, in the IDE, both calendar are correct when I run the application !

Anyone knows what's happening ???

Microsoft Calendar Control 10.0
I started using an old VB6 project that I developed using office 97.

Now I am using Office XP and am having problems.

My calendar 8.0 seems to be the problem and it seems that v 10.0 fixes the problem. Right now if I even click on the calendar object(without running the program), VB6 crashes.

I cannot find 10.0 ANYWHERE.

Can someone point me to a place to download it as well as instructions on how to install it??

Microsoft Calendar Control 8.0
Has anyone had problems with this control? When I try to add this to my form, visual studio closes after a message comes up "VB has encountered a problem and needs to close" This is in Visual Studio 6.0 SP5

MicroSoft Calendar CHECK DAY
I have a microsoft calendar, the user has to select several days from it, but these days have to be checked on the calendar.

How can this be possible?

Microsoft Calendar Control 8.0
I'm trying to use the calendar control in my project , but each time i'm trying to use it VB6 will crash to desktop.

I' not even using it , selecting the control and drop it on a form make my project crashed.

My system is :

- Windows XP SP1
- VB6 SP5

Microsoft Calendar Control 9.0
I can't make the calendar control display the current date automatically when it loads... Thanks for help on this!

ddutke

Microsoft Calendar Control 8.0 WIN XP <> WIN 2000
I've developed a VB appliction with the calendar control 8.0 on a Windows XP system with Office XP.
When I run that applictation under Windows XP with Office XP, the calendar works fine.
BUT when I run the same application under Windows 2000, I can't see the values on the calendar, I only see buttons, but no dates.....

I've registered mscall.ocx on Windows 2000.

Hope somebody can tell me what's going wrong.

Thanks in advance!

Tinne.

Problem Using Microsoft Calendar Control 8.0
Hi!

My program uses the Problem Using Microsoft Calendar control 8.0, (mscal.ocx)
and when i run the program it only shows the dates till 1999....what could the problem be?

Thanks all.

Writing To MIcrosoft Calendar Control 8.0
Hello,

I am using Microsoft calendar control 8.0 and I was wondering if it is possible to write to the day cells?

Meanning the 16 of december cell would have text in it.

Thanks Fraggy

Microsoft Calendar Control 9.0 Can't Display On Most PC
Hi all, I am quite new in VB6 and need for some help~

I just add a VB existed component "Microsoft Calendar Control 9.0" in my project. But this calendar control only work on some Window XP platform. For those who using Win2000 and some of WinXP platform, all the font on calendar can't be display properly (just blank and show the grid only).

Note that I am using VB6sp6, and the calendar also worked fine on my WinXP sp2 PC, but mayb not for others.

Any idea about this problem?

Microsoft Calendar Control Error..
I have added a Calendar Control in a Form. After some days when i clicked the control to change some of its properties, VB IDE got stucked. and when i ran the project An error message is displayed

-2147352560(80020010)
'Automation Error ...
Invalid Callee..'

I reinstalled my Windows XP and VB. Even after the installation, the same error is coming out. Why its so?

Microsoft Calendar Control Is Missing In VB
Hi,
My program was working fine before I packed it.
After I packaged program and installed it and uninstalled several time
for testing purpose, it seemed that I lost MSCAL.OCX control from my VB
program.
I couldn't find it anywhere in my PC.

Where can I download it?

Thanks!!

Create Microsoft Project Calendar Using VB6
Can anyone point me in the direction of a good link or book? Thanks.

Swi

Problem With Microsoft Calendar Control In VB
Hello, all
in the application developed in vb6.0 we are using calendar control 11.0
in all machines we have tested the application, everything looks fine, but on the clients machine no number shows for dates when opening the calendar form. Please, if anyone could help me with this. Thank you a lot!

VB5, Microsoft Excel, Microsoft Access, And Microsoft Word
I am currently using VB5 and I am trying to write a program that takes the data from an Excel file, copy and paste the desired data into a worksheet in the same workbook. I would then take that data, sort it, and then extract one type of data into one column and another type in the next column. With the data extract the code will tell Access to create a blank database and to import the data from the Excel file into a new table. After the importing the code will then match data from the Access file to data in a Word file. If there is a link, the code will then parse the data into the form.

Is there a way to do all of this?

Microsoft Calendar Control Version 9.0 Usage
I am using Microsoft Calendar Control 9.0 for selection and display a set of specific dates for each month.

I need to use the calendar control in the following way :

Data entry :

To use the calendar control to select a particular month of a particular year, then allow the user to select several dates to enter. The program then stores these dates to database.

Enquiry :

To use the calendar control to select a particular month of a particular year, then the program would read the database to retrieve all previously entered date for that month and display is a listbox.

THe problem:

Maybe I don't know enough how to use the control but I found that I am unable to know which month the user has selected. There is event for a "new" month or "new" year but there is no property for the currently displayed month or year. There is neither event for a next month or previous month, so it is impossible for the program to know which month's dates are to be retrieved.

I doubt why the control is so primitive, or is that I don't understand how to use it ?

Could someone help to enlighten me ?

Thanks.

Selecting Multiple Days In Microsoft Calendar Control 8.0
What I want to do is to be able to select two days..highlight the day if possible ..(Is there a way to do this).. then do a search through each day and add up the data I have on each day's form.

Any Ideas Anyone?!?!?!

Multiple Selections On Microsoft Calendar Control Using Ctrl
Hello all,

I am wondering if there is a way that a user can select multiple days within the Microsoft Calendar Control 8.0 or do I need to hard code this method in. If I need to hard code, can someone please provide a snipet of what I need to do and where?

Thanks...

Changing Colour Of Cell In Microsoft Calendar Control?
I am using the Microsoft Calendar Control 9.0. What I want to do is change the colour of a specific cell on a specific date. (either the backcolour of the cell or the colour of the date) How do I do this in code?

Sending A Meeting Request To Public Microsoft Outlook Calendar
I sent this message out Friday and have received no replies.

I am looking to send a meeting request to a public calendar through vb code. The code I have sends the request to a specified address and then saves meeting request on default (the sender's personal calendar). The problem I have is that I want the meeting request to be saved to a public Outlook calendar instead of the default.

Here is the code I am currently using:

'----Encapsulated Code Sends Meeting Request----
Dim MyOlApp As New Outlook.Application
Dim MyItem As Outlook.AppointmentItem

Set MyItem = MyOlApp.CreateItem(olAppointmentItem)
MyItem.MeetingStatus = olMeeting
MyItem.Subject = cboDeal.Text
MyItem.Body = MyDate & " " & cboTZone.Text & vbCr & _
mebPhone.Text & vbCr & _
txtAccess.Text & vbCr & vbCr & _
txtDetail.Text
MyItem.start = MyDate
MyItem.Duration = 30
Set MyRequiredAttendee = MyItem.Recipients.Add(AnalystEMail)
MyRequiredAttendee.Type = olRequired
MyItem.Send

Set MyItem = Nothing
Set MyOlApp = Nothing
'-----------------------------------------------

RUN-TIME ERROR:[Microsoft][ODBC Microsoft Access Driver]cannot Update
Error message; Cannot Update1 Database or object is read-only?

please help me? i'm having a prolem updating my tblSubject in my database. here's my code:

Dim Record As New ADODB.Recordset
Private Sub Form_Load()
     SQL = "Select a.*, b.Subj_Desc, b.Subj_Units From tblSubj_Intrc a, tblSubjects b " _
        & "Where a.Subj_Code = b.Subj_Code"

    Record.Open SQL, MyConn, adOpenStatic, adLockOptimistic

    getFields
    SetLock (True)
    Set_Buttons
End Sub
Sub getFields()

    If Record.EOF Or Record.BOF Then
        MsgBox "Wala nay Recordord"
        Exit Sub
    End If

    txtDesc = Record!Subj_Desc
    txtSubCode = Record!Subj_Code
    txtUnits = Record!Subj_Units
    txtNum = Record!Num_Stud
End Sub
Sub ClearFields()
    txtDesc = ""
    txtSubCode = ""
    txtUnits = ""
    txtNum = ""
End Sub

Sub SetButtons()
    cmdAdd.Enabled = False
    cmdEdit.Enabled = False
    cmdDel.Enabled = False
    cmdSave.Enabled = True
    cmdCancel.Enabled = True
End Sub
Sub Set_Buttons()
    cmdAdd.Enabled = True
    cmdEdit.Enabled = True
    cmdDel.Enabled = True
    cmdSave.Enabled = False
    cmdCancel.Enabled = False
End Sub
Sub SetLock(Stat As Boolean)
    txtDesc.Locked = Stat
    txtSubCode.Locked = Stat
    txtUnits.Locked = Stat
    txtNum.Locked = Stat
End Sub
Private Sub cmdLast_Click()
    If Record.RecordCount > 0 Then
        Record.MoveLast
        getFields
    End If
End Sub
Private Sub cmdNext_Click()
    If Record.RecordCount > 0 Then
        Record.MoveNext
        getFields
    End If
End Sub
Private Sub cmdPrev_Click()
    If Record.RecordCount > 0 Then
        Record.MovePrevious
        getFields
    End If
End Sub
Private Sub cmdFirst_Click()
    If Record.RecordCount > 0 Then
        Record.MoveFirst
        getFields
    End If
End Sub
Private Sub cmdAdd_Click()
    ClearFields
    SetButtons
    SetLock (False)
    txtDesc.SetFocus
    EditMode = False
End Sub
Private Sub cmdSave_Click()
    If Not EditMode Then
        Record.AddNew
        Record!Subj_Desc = txtDesc
        Record!Subj_Code = txtSubCode
        Record!Subj_Units = txtUnits
        Record!Num_Stud = txtNum
        Record.Update
        SetLock True
        Set_Buttons
    Else
        Record!Subj_Desc = txtDesc
        Record!Subj_Code = txtSubCode
        Record!Subj_Units = txtUnits
        Record!Num_Stud = txtNum
        Record.Update
        SetLock True
        Set_Buttons
    End If
End Sub

Tnx1

Importing Microsoft Excel Files Into Microsoft Access Database?
Hello, I was wondering how to automate Microsoft Access to import a Microsoft Excel File? I can do it normally, but I want to know how (or what commands to use) so that my Visual Basic program will create a Microsoft Access database from a Microsoft Excel spreadsheet internally?

Any help will be appreciated - Thanks.

[Microsoft][ODBC Microsoft Access Driver] Could Not Delete From Specified Tables.
I've searched hi & lo and found alot of titles that read the same, but nothing that really addresses this situation.

The code below runs fine, until iCnt = 5, because the table is still held open by the previous Execute.
If I put a break on that line and run to that point, step that line, then continue the run, no problem. Works great.
But if I run it continuous from a cmdButton, I get the error.
I've tried transactions, different providers, more than default timeouts on command and connection, do.cmd runsql,....
This is one of those where I said, "sure, that's easy", about a month ago.

Dim ..., Cnxn As New ADODB.Connection

sPath = CurrentProject.FullName
Cnxn.CursorLocation = adUseClient
Cnxn.Mode = adModeReadWrite
Cnxn.Open "Provider=MSDASQL.1;DBQ=" & sPath & ";Driver={Microsoft Access Driver (*.mdb)}"

iCnt = 0
DoCmd.Close acForm, "Personnel List", acSaveNo
iCnt = iCnt + 1
Cnxn.Execute "DELETE ALPHA.* FROM ALPHA;", , adExecuteNoRecords
iCnt = iCnt + 1
DoCmd.TransferSpreadsheet acImport, acSpreadsheetTypeExcel7, "ALPHA", "file.xls", True
iCnt = iCnt + 1
Cnxn.Execute "DELETE [Civilian Backup].* FROM [Civilian Backup];", , adExecuteNoRecords
iCnt = iCnt + 1
Cnxn.Execute "INSERT INTO [Civilian Backup] SELECT Civilian.* FROM Civilian;"
iCnt = iCnt + 1
Cnxn.Execute "DELETE Civilian.* FROM Civilian;", , adExecuteNoRecords
iCnt = iCnt + 1
Cnxn.Execute "INSERT INTO Civilian ( [Full Name], [Rank], [Office Symbol], [Unit Desc] ) SELECT ALPHA.[Full Name], [PP] & '-' & [GR] AS Rank, ALPHA.[Office Symbol], ALPHA.[Unit Desc] FROM ALPHA;", , adExecuteNoRecords
iCnt = iCnt + 1
Cnxn.Execute "DELETE ALPHA.* FROM ALPHA;", , adExecuteNoRecords

What's the catch?
Thanks!!!

[Microsoft][ODBC Microsoft Access Driver] Not Enough Space On Temporar
Hi all,
----------------------------------
Set connData = New ADODB.Connection
connData.ConnectionString = Data_Master
connData.Open
connData.BeginTrans
connData.Execute "Delete * from feed_msg where date < date()"
connData.CommitTrans
------------------------------
at conndata.execute following error is occuring,please update, can anyone please help me in this
''''''
-2147024882
[Microsoft][ODBC Microsoft Access Driver] Not enough space on temporary disk.

regards
John Philip

*** Even the Best, did the Bad and Made the Best ***

John Philip

[Microsoft][ODBC Microsoft Access Driver] Attribute Cannot Be Set Now
I have got an option to save a file in my program. This is the code to it:

Code:
Public Function saveblast()

Select Case flagsave

Case 1:
' Save only Blast Desing & these related information
On Error GoTo errortrap:
contoRCB.BeginTrans
Call addtodetail
Call addtodesign
Call addtoperformance
Call makestr
contoRCB.CommitTrans
Case 2:
' Save only Blast Desing & these related information
On Error GoTo errortrap:
contoRCB.BeginTrans
Call addtodetail
Call addtodesign
Call addtoperformance
Call makestr
flagfound = False
Call addtochrgsht
contoRCB.CommitTrans
Case 3:'........................

Now the error trap has the following code:

Code:
errortrap:
MsgBox Err.Description, vbInformation
contoRCB.RollbackTrans

Now when I disable the error trap it simply exits the function without performing the required operation & does not give any error message.

But with error trap enabled, I manage to get the above mentioned error:
[Microsoft][ODBC Microsoft Access Driver] Attribute cannot be set now

could somebody please help me

Thanks in advance

Help! -- Put Calendar In Access
Could anybody helps me?

How to insert a calendar in Access, so that I can click the calandar icon and choose the date I want to input into the database instead of typing date like 09/03/2004 in a blank.

Thanks in adv!!!

Access Calendar
I am trying to build a form in MSAccess where clicking on a date in the activex calendar produces a list
of records with that date. When I click on the date I get all the records not just the date selected. I am a beginner who really needs some guidance on this. Thanks

Runnning A VB-Access Application On A System Where Microsoft Access Is Not Installed. 2
Hello

I´m Using an VB & Access2002 DB. I´m trying to make the installer for my application where Access97 is installed in target PC´s, or no Access at all.

I´ve solved the problem... I insert the MSOffice XP Install CD into the target PC to update the system (Windows) so that Access 2002 DBs work properly, then i abort the MSOffice XP installation. Some clients ask about the licence of Office XP, and i have to explain that Office XP is not installed in their computers (this sucks, they don´t seem to trust me).

I´ve already checked this topic, it´s helpless

Runnning a VB-Access application on a system where Microsoft Access is not installed.

I´ve already found many MDAC versions but no one seems to work.

Does anybody knows what files does MSOffice XP Install CD uses to update the system before MSOffice XP is installed? I´m clueless, and the file names in the CD are not helping.

Any comment may work...

Edited by - Shandy on 9/8/2003 11:59:02 PM

Runnning A VB-Access Application On A System Where Microsoft Access Is Not Installed.
Hello All,

I am developing an application in VB & Microsoft Access.Now I want to install that application on a system where Access is not loaded.
How to run the application in such conditiion without installation of Microsift Access on PC.

Could any body suggest any solution ...

Thanks
Sachin

Outlook Web Access Calendar
Hey guys,

Being new to VB and not really knowing how to pursue this project, I thought I'd ask the gurus.

How would I go about placing a reminder in the calendar of a user through Outlook Web Access? What code would I need to implement? I'm sure it's not the same as VBA...or is it?

Being that we run on an Exchange server, we have access to our outlook accounts through Outlook Web Access and I thought it would be a great way to place reminders in the calendars through web access.

Thanks for your input

sharpie00

Calendar Access From Excel
I've written some code that exports information from Excel into the Outlook calendar - all works fine. in order to mak sure I'm not duplicating an item I have to search through the calendar to make sure it isn't already there.

The code I use is

For Each olApt In olFldr.Items
If InStr(1, olApt.start, start, vbTextCompare) > 0 Then
found = True
ques = MsgBox("An Appointment for " & start & " with" & Chr(13) & olApt.subject & Chr(13) & "Already exists. Do you want to replace it with" & Chr(13) & subject, vbYesNo)
If ques = vbYes Then
olApt.delete
SetAppt start, subject, location, body, True
Exit Sub
Else
Exit Sub
End If
End If
Next olApt

unfortunatly this is a slow process and takes about five seconds for each appointment item.

I found the olfldr.items.find function but I can't seem to make it work, does anyone know of a quick search method that will pull an appointment up quickly or even a method of directly referencing the item?

this would help me a lot.

Craig

Can You Use An HTML Form To Access A Microsoft Access Database?
Can you use an HTML form to access a Microsoft Access Database?

Access To Outlook Calendar Automation
I import information from an access database into the calendar in Outlook, i would like to be able to automate the importing of this information (as the database is regularly updated) either from outlook or from access (or both if possible). I need to be able to select specific tables and records from this database and link them to the appropriate fields in the calendar.

Any help on this would be much appreciated, thanks in advance.

VB 6.0 Calendar Control With Access Database
Ok, I'm most certain I'm not the only one who has been in this boat!

Calendar Control for VB6. Quite the nice tool. When you click on it, it passes the value of the date you clicked on to the "Value" property. Spiffy...

Now here's my dilema. I'm working on a scheduling application. My form is frm2Schedule, my ado Control is adoSched, my Calendar Control is MSched, I have text fields bound to my database for both the date, and the various time slots of this schedule application. My goal is to have the Calendar Control perform a few things:

1. When a date is clicked on in the calendar control, the function will begin a search query.
2. If this query fails (date not currently found in database), the function will call another function to create a new record, and the date for the record will match MSched.Value.
3. If this query succeeds (a record is found with that date), the function will call up this record.

Below is the start of my code. I'm familiar with VB, but this is my first time using the calendar control. Does anyone have any helpful advice to tackle this problem. I think I need to put an IF in here, but my IF failed.

Code:
Private Sub MSched_Click()
Dim nSearch As String
nSearch = MSched.Value
frm2Schedule.adoSched.Recordset.Find ("SDate =" & nSearch)
'I tried an IF statement here, but when I tested it, it failed.
'The messagebox I used to catch it never displayed.
End If
End Sub
Any help would be greatly appreciated.

Access - Using VB To Control Popup Of Calendar
I'm trying to use a calendar in Access 2003 to enter data in data fields.
I found a site that showed how to write the code so it will popup when you click on the date field and then disappear when you select the date from the calendar.
I got it working but I want to be able to access that same calendar for other date fields on the form.
So I used a variable call 'originator' to pass the originators name to the variable.
Only thing is...now it doesn't work. I get a type mismatch error and I don't know why. It's exactly the same as the example I found(obviously with my names substituted in).

Please help. (dob is the field I want the date to go into and Calendar6 is the name of the calendar I'm using.) Here's my code:

Option Compare Database
Option Explicit
Dim originator As ComboBox

Private Sub dob_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)

Set originator = dob
Calendar6.Visible = True
Calendar6.SetFocus

If Not IsNull(originator) Then
Calendar6.Value = originator.Value
Else
Calendar6.Value = Date
End If

End Sub

Private Sub Calendar6_Click()
originator.Value = Calendar6.Value
originator.SetFocus
Calendar6.Visible = False
Set originator = Nothing

End Sub

Access Date + Calendar Control
The access date when i want dd/mm/yy is weird!
it shows 24/4/01 as 4/1/24 how do i fix this?
So it's show properly?

Also with the claendar control or dt picker how do i get it to set a value into a db? when i date is clicked on?

Access && Calendar ActiveX Control
Hi,
I am creating an Access database and I want to add a Calendar control to ensure users pick a valid date. In my form I click on 'More Controls...' in the toolbox. I have a long list available and choose CoyoteCalendar2.Calendar and this adds the functionality I need.
However, I am a little worried that when I move this database to another users computer the ActiveX control may not be on their machine. Is this correct and if so how would I get the control onto their computer?
I don't even know how the Coyote Control got onto my machine - it may have been while installing another program e.g. Visual Studio.
Any help is appreciated.
Thanks,
jonny