
UPDATE: I can use the Acrobat Reader control from Access 2003, VB 6, VB.Net and C#. I am working on setting up Notes 7 so I can see if this problem is specific to 8.5.1.
UPDATE #2: Confirmed it is also a problem on 7.0.4. Opening a PMR now.
(Declarations)
Declare Function NSFDbOpen Lib "nnotes.dll" Alias "NSFDbOpen" (Byval dbName As String, hDb As Long) As Integer
Declare Function NSFDbClose Lib "nnotes.dll" Alias "NSFDbClose" (hDb As Long) As Integer
Declare Function NSFDbSpaceUsage Lib "nnotes.dll" Alias "NSFDbSpaceUsage" (ByVal hDB As Long, retAllocatedBytes As Long, retFreeBytes As Long) As Integer
Sub Initialize
Dim s As New NotesSession
Dim rdoc As NotesDocument
Dim mfile As String
Dim success As Variant
Dim pmail As String
Dim dbdir As New NotesDbDirectory("server/domain")
Dim db As NotesDatabase
Dim thisDb As NotesDatabase
Dim view As NotesView
Dim nvec As NotesViewEntryCollection
Dim eOne As NotesViewEntry
Dim eTWo As NotesViewEntry
Dim dbHandle As Long
Dim usedBytes As Long
Dim freeBytes As Long
'Using NotesDBDirectory gives us a handle to the database
'and limited information about it. The rest of the
'information, such as PercentUsed, won't be populated until
'db.Open is called, which we don't want to do because
'that's what drags the server down. Instead we'll combine
'information from the closed database and some Notes C API
'calls to get the specific information we want.
Set db = dbdir.GetFirstDatabase(DATABASE)
While Not db Is Nothing
mfile = db.FilePath
'Only get databases in the mail subdirectory
If Left$(mfile, 4) = "mail" Then
'Get a handle to the database. The NotesDatabase object
'has a LotusScript handle, we need a C API handle.
Call NSFDbOpen ("server/domain!!" + mfile, dbHandle)
If dbHandle <> 0 Then
'Peek inside and get the used bytes and free bytes
Call NSFDbSpaceUsage(dbHandle, usedBytes, freeBytes)
'We have what we need so close the C API handle to prevent a memory leak
Call NSFDbClose(dbHandle)
End If
Set rdoc = New NotesDocument(s.CurrentDatabase)
rdoc.form = "EmailRecord"
rdoc.dbFilename = FilePath
rdoc.title = db.title
rdoc.mailfile = db.FilePath
rdoc.dbsize = db.size
rdoc.pctused = Round((usedBytes / db.size, 2) * 100
rdoc.server = db.Server
rdoc.Username = db.Title
Call rdoc.Save(True,False)
mfile = ""
End If
Set db = dbdir.GetNextDatabase
Wend
' Next we walk the all docs view and write the user's ranking to their document
Set thisDB = s.CurrentDatabase
Set view = thisDb.GetView("AllDocs")
Set nvec = view.AllEntries
Set eOne = nvec.GetFirstEntry
Do Until eOne Is Nothing
Set doc = eOne.Document
Print "On doc " + Cstr( eOne.GetPosition("."))
doc.Ranking = Cstr( eOne.GetPosition("."))
Call doc.Save(True, False)
Set eTwo = eOne
Set eOne = nvec.GetNextEntry( eTwo )
Loop
End Sub
0x1B1 - Version mismatch between executable and preexisting shared memory versions! EXITING. You may need to stop RTVSCAN or reboot.
Called client and explained the reason for the delay. Enormous
amount of PMR's currently opened and ongoing, impacting
unfortunately all, especially lower prior/sev 4/4.
For the cake
| For the icing and garnish
|
Marketing is defined by the American Marketing Association as the activity, set of institutions, and processes for creating, communicating, delivering, and exchanging offerings that have value for customers, clients, partners, and society at large. The term developed from the original meaning which referred literally to going to market, as in shopping, or going to a market to sell goods or services.Okay... that still sounds about the same, right? First, advertising is a subset of marketing. Therefore all advertising is marketing, but not all marketing is advertising. Second, the distinction lies in the intent. Marketing is about disseminating information; advertising is about persuasion.
Advertising is a form of communication that typically attempts to persuade potential customers to purchase or to consume more of a particular brand of product or service.
Top Ten ways you know you have PLSD
1. You have a sudden urge to put up a tent in your backyard, in Maine, in February, so family dinners will feel more natural.
2. You insist that all of you children's backpacks be yellow
3. All of your children's backpacks ARE yellow
4. You insist on rows of uncomfortable chairs in the living room for movie night.
5. You fill out an evaluation form after every television show you watch at home.
6. You fill out an evaluation form for completely inappropriate things. Out to the dining tent for you, mister.
7. You see a tchotke at a neighbors house and ask if you can have it if they swipe your card.
8. You get invited to a party, and don't tell your spouse just in case she wasn't invited.
9. You drink your coffee REALLY FAST so the Disney bots don't take it away mid-swallow.
for six months, every time you leave your bedroom you check to make sure you remembered your badgeholder.
You line up for lunch, even when eating at home.
you think it's normal to show up for work after only 2 hours sleep
You ask your spouse if you can stay in the same room you were in last year.
You are willing to listen to 5 minutes of crap talk just to get a free pen.
You keep asking your coworkers, kids, and spouse where you can get this year's CULT shirt from; they look at you in horror.
You ask the neighbors if it's ok to use their pool without a room key
You ask your spouse if she's coming to your session.
And if it merits a repeat.
You ask your neighbors if it is OK to use their driveway to park.
You ask your kid if he's filming your session
You put RFID badges on the cats.
you mutter "I can't remember if I'm swan or dolphin this year"
and then look for your two huge carp on your roof
you build a 3 stage waterfall from same said roof
In Maine, in February
You scream out SAKE! at the top of your lungs after finishing each drink
you wished they'd put your room number on your key, in case you ever need to go there
You applaud when your wife introduces a new dish for dinner, even though you seem to remember you should have had it years ago.
and you keep asking her, "Can I have this to go in a box, I'm late for my session"
You applaud after sex even if it wasn't that good. Then you hog the microphone for Q&A.
you have a favorite seat in every meeting room in 3 different disney hotels
You knock on neighbor's houses asking if they know where Jamfest (or SpeedGeeking) is.
You walk into your bedroom announcing, "OK, before we begin, please turn off all cell phones and pagers".
11. Every Wednesday night for four months, you randomly get on a bus.
12. You know what CULT stands for
13. You're jazzed because you have a CULT shirt for every day of the week.
you are hard-core because you have the original "Notes World Order" shirt.
14. You go home and claim to your spouse that you're going to be agile from now on.
hmm, "Brokeback Novak"... another CULT theme
beats my original suggestion, FSCK Portal.
Ingredients | Preparation |
1 12oz bottle of root beer 1 12oz bottle of Samuel Adams Cranberry Lambic 1 – 1.5 lb stew beef 2T cooking oil 1t black pepper (for the beef) 1t black pepper (for the sauce) 1t salt (for the beef) 1t salt (for the sauce) A medium-sized non-reactive pot with a lid in the 4 to 6 quart range. Nonstick is fine, but don’t use unenameled cast iron. A simmer plate (assuming you’re cooking with gas) A bowl or plate for holding the beef after browning. |
|