SOT: Access 2013


S

Scott

Apologies if this is considered off-topic for this group and if it
should be posted elsewhere, but I cannot find a more suitable group.

I have installed Office 2013. When trying to run an existing Access
2007 database I got error messages, so I decided it would be a good
idea to create a new database in Access 2013 importing the existing
data. So far, so good.

I created a tables database then a linked database, as this was what
had been done previously.

I am now trying to create a form for data input. The basic form that
allows you to enter one record at a time seems to be too inflexible. I
cannot for example change the size of individual boxes or move them
about. Does anyone know if I am stuck with this or if the standard
table can be manipulated? If I try to change the height of a box, it
changes the height of the whole row (ie, the box to the right as
well).

I then tried the form wizard but got a message to say that a potential
security concern has been identified and it is not possible to
determine that the content came from a trustworthy source (even though
the content is now in a table in my new database) and the file may
contain unsafe content.

I have no idea what this is supposed to mean. All I have done is to
import data. As far as I can see any macros etc were left behind when
I created a new database. Is it simply a case of declaring the
'tables' database a safe source or is there a problem I am missing?
 
Ad

Advertisements

E

Ed Cryer

Scott said:
Apologies if this is considered off-topic for this group and if it
should be posted elsewhere, but I cannot find a more suitable group.

I have installed Office 2013. When trying to run an existing Access
2007 database I got error messages, so I decided it would be a good
idea to create a new database in Access 2013 importing the existing
data. So far, so good.

I created a tables database then a linked database, as this was what
had been done previously.

I am now trying to create a form for data input. The basic form that
allows you to enter one record at a time seems to be too inflexible. I
cannot for example change the size of individual boxes or move them
about. Does anyone know if I am stuck with this or if the standard
table can be manipulated? If I try to change the height of a box, it
changes the height of the whole row (ie, the box to the right as
well).

I then tried the form wizard but got a message to say that a potential
security concern has been identified and it is not possible to
determine that the content came from a trustworthy source (even though
the content is now in a table in my new database) and the file may
contain unsafe content.

I have no idea what this is supposed to mean. All I have done is to
import data. As far as I can see any macros etc were left behind when
I created a new database. Is it simply a case of declaring the
'tables' database a safe source or is there a problem I am missing?
Have you still got all the original 2007 dB files?
If so, start over, because according to MS they should run on 2013.
I'm sorry to suggest you may have been wasting your time writing the new
dB, but I suspect the error message you got was the one you're getting
still; the stuff came from another computer.

Look here;
http://tinyurl.com/ccncdof
You might like to try the conversion process, just for fun.

Let us know the primary error message. We might be able to tell you more.

Ed
 
S

Scott

Have you still got all the original 2007 dB files?
If so, start over, because according to MS they should run on 2013.
I'm sorry to suggest you may have been wasting your time writing the new
dB, but I suspect the error message you got was the one you're getting
still; the stuff came from another computer.
You are right about the tiles 'Access 2007-2013 file format'. The
stuff came from my old computer.
Look here;
http://tinyurl.com/ccncdof
You might like to try the conversion process, just for fun.

Let us know the primary error message. We might be able to tell you more.
First 'Your Microsoft Access database or project contains a missing or
broken reference to the file OFFOWC.DLL version 1.1' then -

-----------------------------------------------------------------------------------------

Option Compare Database
Option Explicit

Private Sub Form_Open(Cancel As Integer)
' Minimize the database window and initialize the form.

Dim dbs As Database
Dim rst As Recordset

On Error GoTo Form_Open_Err

' Minimize the database window.
DoCmd.SelectObject acForm, "Switchboard", True
DoCmd.Minimize

DoCmd.Hourglass False
Set dbs = CurrentDb()
Set rst = dbs.OpenRecordset("My Organization Information")
If rst.RecordCount = 0 Then
rst.AddNew
rst![Address] = Null
rst.Update
MsgBox "Before using this application, you need to enter your
company name, address and related information."
DoCmd.OpenForm "My Organization's Information", , , , , acDialog
End If
rst.Close
dbs.Close

' Move to the switchboard page that is marked as the default.
Me.Filter = "[ItemNumber] = 0 AND [Argument] = 'Default' "
Me.FilterOn = True

Form_Open_Exit:
Exit Sub

Form_Open_Err:
MsgBox Err.Description
Resume Form_Open_Exit

End Sub

Private Sub Form_Current()
' Update the caption and fill in the list of options.

Me.Caption = Nz(Me![ItemText], "")
FillOptions

End Sub

Private Sub FillOptions()
' Fill in the options for this switchboard page.

' The number of buttons on the form.
Const conNumButtons = 8

Dim dbs As Database
Dim rst As Recordset
Dim strSQL As String
Dim intOption As Integer

' Set the focus to the first button on the form,
' and then hide all of the buttons on the form
' but the first. You can't hide the field with the focus.
Me![Option1].SetFocus
For intOption = 2 To conNumButtons
Me("Option" & intOption).Visible = False
Me("OptionLabel" & intOption).Visible = False
Next intOption

' Open the table of Switchboard Items, and find
' the first item for this Switchboard Page.
Set dbs = CurrentDb()
strSQL = "SELECT * FROM [Switchboard Items]"
strSQL = strSQL & " WHERE [ItemNumber] > 0 AND [SwitchboardID]=" &
Me![SwitchboardID]
strSQL = strSQL & " ORDER BY [ItemNumber];"
Set rst = dbs.OpenRecordset(strSQL)

' If there are no options for this Switchboard Page,
' display a message. Otherwise, fill the page with the items.
If (rst.EOF) Then
Me![OptionLabel1].Caption = "There are no items for this
switchboard page"
Else
While (Not (rst.EOF))
Me("Option" & rst![ItemNumber]).Visible = True
Me("OptionLabel" & rst![ItemNumber]).Visible = True
Me("OptionLabel" & rst![ItemNumber]).Caption =
rst![ItemText]
rst.MoveNext
Wend
End If

' Close the recordset and the database.
rst.Close
dbs.Close

End Sub

Private Function HandleButtonClick(intBtn As Integer)
' This function is called when a button is clicked.
' intBtn indicates which button was clicked.

' Constants for the commands that can be executed.
Const conCmdGotoSwitchboard = 1
Const conCmdOpenFormAdd = 2
Const conCmdOpenFormBrowse = 3
Const conCmdOpenReport = 4
Const conCmdCustomizeSwitchboard = 5
Const conCmdExitApplication = 6
Const conCmdRunMacro = 7
Const conCmdRunCode = 8

' An error that is special cased.
Const conErrDoCmdCancelled = 2501

Dim dbs As Database
Dim rst As Recordset

On Error GoTo HandleButtonClick_Err

' Find the item in the Switchboard Items table
' that corresponds to the button that was clicked.
Set dbs = CurrentDb()
Set rst = dbs.OpenRecordset("Switchboard Items", dbOpenDynaset)
rst.FindFirst "[SwitchboardID]=" & Me![SwitchboardID] & " AND
[ItemNumber]=" & intBtn

' If no item matches, report the error and exit the function.
If (rst.NoMatch) Then
MsgBox "There was an error reading the Switchboard Items
table."
rst.Close
dbs.Close
Exit Function
End If

Select Case rst![Command]

' Go to another switchboard.
Case conCmdGotoSwitchboard
Me.Filter = "[ItemNumber] = 0 AND [SwitchboardID]=" &
rst![Argument]

' Open a form in Add mode.
Case conCmdOpenFormAdd
DoCmd.OpenForm rst![Argument], , , , acAdd

' Open a form.
Case conCmdOpenFormBrowse
DoCmd.OpenForm rst![Argument]

' Open a report.
Case conCmdOpenReport
DoCmd.OpenReport rst![Argument], acPreview

' Customize the Switchboard.
Case conCmdCustomizeSwitchboard
' Handle the case where the Switchboard Manager
' is not installed (e.g. Minimal Install).
On Error Resume Next
Application.Run "WZMAIN80.sbm_Entry"
If (Err <> 0) Then MsgBox "Command not available."
On Error GoTo 0
' Update the form.
Me.Filter = "[ItemNumber] = 0 AND [Argument] = 'Default' "
Me.Caption = Nz(Me![ItemText], "")
FillOptions

' Exit the application.
Case conCmdExitApplication
CloseCurrentDatabase

' Run a macro.
Case conCmdRunMacro
DoCmd.RunMacro rst![Argument]

' Run code.
Case conCmdRunCode
Application.Run rst![Argument]

' Any other command is unrecognized.
Case Else
MsgBox "Unknown option."

End Select

' Close the recordset and the database.
rst.Close
dbs.Close

HandleButtonClick_Exit:
Exit Function

HandleButtonClick_Err:
' If the action was cancelled by the user for
' some reason, don't display an error message.
' Instead, resume on the next line.
If (Err = conErrDoCmdCancelled) Then
Resume Next
Else
MsgBox "There was an error executing the command.", vbCritical
Resume HandleButtonClick_Exit
End If

End Function

Private Sub Label1_Click()

End Sub
 
P

Paul

Scott said:
First 'Your Microsoft Access database or project contains a missing or
broken reference to the file OFFOWC.DLL version 1.1' then -
OFFOWC.DLL (Microsoft Office XP Web Components)

http://www.utteraccess.com/forum/Access-2013-Dropped-Pivo-t1995079.html

"Do take note, though, that the Microsoft Office Web Component, where
the functionaliy of Pivot* has been based was already deprecated a
while ago, long before 2013 came out."

Suggesting that file may simply be missing. And it's up to you
to guess what functions that kills. And what things need to be
rewritten.

Paul
 
S

Scott

OFFOWC.DLL (Microsoft Office XP Web Components)

http://www.utteraccess.com/forum/Access-2013-Dropped-Pivo-t1995079.html

"Do take note, though, that the Microsoft Office Web Component, where
the functionaliy of Pivot* has been based was already deprecated a
while ago, long before 2013 came out."

Suggesting that file may simply be missing. And it's up to you
to guess what functions that kills. And what things need to be
rewritten.
Thanks for the posting - beyond my abilities I'm afraid.

It seems to me that creating a new database is the only practical
option. Tables seem to be okay. Does anyone know the difference
between the standard form, the form design, the blank form and the
form wizard?
 
M

mick

Apologies if this is considered off-topic for this group and if it
should be posted elsewhere, but I cannot find a more suitable group.

I have installed Office 2013. When trying to run an existing Access
2007 database I got error messages, so I decided it would be a good
idea to create a new database in Access 2013 importing the existing
data. So far, so good.

I created a tables database then a linked database, as this was what
had been done previously.

I am now trying to create a form for data input. The basic form that
allows you to enter one record at a time seems to be too inflexible. I
cannot for example change the size of individual boxes or move them
about. Does anyone know if I am stuck with this or if the standard
table can be manipulated? If I try to change the height of a box, it
changes the height of the whole row (ie, the box to the right as
well).

I then tried the form wizard but got a message to say that a potential
security concern has been identified and it is not possible to
determine that the content came from a trustworthy source (even though
the content is now in a table in my new database) and the file may
contain unsafe content.

I have no idea what this is supposed to mean. All I have done is to
import data. As far as I can see any macros etc were left behind when
I created a new database. Is it simply a case of declaring the
'tables' database a safe source or is there a problem I am missing?
there is a news group for Access that is quite active:
comp.databases.ms-access
 
Ad

Advertisements

P

Paul

Scott said:
Thanks for the posting - beyond my abilities I'm afraid.

It seems to me that creating a new database is the only practical
option. Tables seem to be okay. Does anyone know the difference
between the standard form, the form design, the blank form and the
form wizard?
If I knew what Access was, I would have answered the question by now :)
But sadly, all I know, is it's a program that aggravates people :)
And it involves databases. And fixing stuff that Microsoft breaks.

Is there any chance, you have another employee who knows Access ?

In extreme cases, where I worked, you could go to the HR department,
and have them search the resume database, to find hidden talents.
That's how we could determine, that all employees combined,
could speak over a hundred different languages. If you need
someone who knew Swahili, HR could find them.

Paul
 
Ad

Advertisements

S

Scott

there is a news group for Access that is quite active:
comp.databases.ms-access
Thanks. I did not notice that one. They are the guys I should
pester!!!
 

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Top