Solved

I want to import address data

Posted on 2000-05-11
6
220 Views
Last Modified: 2013-12-18
I am using Notes 4.6.  We have several .csv files that contain address data (the fields and field names are unique in each .csv file).  I would like to be able to import each file into my persaonl address book and into a particular category.  To further complicate matters I wuld also like the ability to either append or overwrite any data that already exists in that given category.  Is this easily doable?
0
Comment
Question by:Kuba
  • 3
  • 2
6 Comments
 
LVL 24

Expert Comment

by:HemanthaKumar
Comment Utility
Hi

You can do that by using script only, there is no other way to achieve this easily.

If I am correct are you looking for sample code.???

~Hemanth
0
 

Author Comment

by:Kuba
Comment Utility
I guess I am looking for code or some direction.  Assuming the answer is that I can do what i want I then need to know *how* to do it.

0
 

Accepted Solution

by:
sunvanitha earned 100 total points
Comment Utility
Dear Kuba,

This can be done through scripts. First you can archive all the details in the existing address book through the archivedatabase method in lotusscript. This will archive the database(documents created with any specific forms) and then you can create a button in the address book and run an agent in the click event of the button. The agent will open the csv file and then using the input# statement of lotusscript store every value in a separate variable and then you can set doc.form to any form that you want to store the data and then create the document by using the createdocument method. You can find a good example of how to read the .csv file by looking through the notes help under the example for the "open statement". Cut and paste the example in the agent and then change the necessary details and try running it.

I have done the same task myself and it works fine. Hope you are successful in doing this.
0
How your wiki can always stay up-to-date

Quip doubles as a “living” wiki and a project management tool that evolves with your organization. As you finish projects in Quip, the work remains, easily accessible to all team members, new and old.
- Increase transparency
- Onboard new hires faster
- Access from mobile/offline

 

Expert Comment

by:sunvanitha
Comment Utility
Code to archive database

Dim archiveDb As New NotesDatabase( "", "" )
Dim doc  As NotesDocument
If ( doc.Form= "Person" ) Then
  Call doc.CopyToDatabase( archiveDb )
End If

Code for the agent that reads the csv file

Type RecType
   empId As Double
   employee As String
End Type      
Dim arrayOfRecs() As RecType
Dim txt As String
Dim fileNum As Integer
Dim counter As Integer
Dim countRec As Integer
fileNum% = FreeFile()
counter% = 0
Open "c:\My Documents\Test.csv" For Input As fileNum%
Do While Not EOF(fileNum%)
      Line Input #fileNum%, txt$
      counter% = counter% + 1
Loop
Seek fileNum%, 1
ReDim arrayOfRecs(1 To counter%)
For countRec% = 1 To counter%
   Input #fileNum%, arrayOfRecs(countRec%).employee$, _
      arrayOfRecs(countRec%).empId#
Employee=arrayofRecs(countRec%).employee$
EmpId=arrayofRecs(countRec%).empId#
dim newdoc as notesdocument
newdoc.form="Person"
newdoc.Firstname(0)=Employee
set newdoc=db.createdocument
call newdoc.save(true,true)
Next
Close fileNum%
Print arrayOfRecs(2).employee$ & " " arrayOfRecs(2).empId#


Hi Kuba,

I have written the code for the agent too. All the best.
0
 

Author Comment

by:Kuba
Comment Utility
Wow that looks great!  Of course I don't understand much of it :)

I'd like to keep the question open a bit in case I have implementation problems (I assume I have to modify the script for my environment). If I don't get around to this soon I'll close out the question with this as the answer.
0
 

Author Comment

by:Kuba
Comment Utility
Answer accepted
0

Featured Post

How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

Join & Write a Comment

For beginners of Lotus Notes user this is important to know about the types of files and their location supported by IBM Notes. Mostly users are unaware about how many file types are created and what their usages are. This Article is fully dedicated…
IBM Notes offer Encryption feature using which the user can secure its NSF emails or entire database easily. In this section we will discuss about the process to Encrypt Incoming and Outgoing Mails in depth.
Internet Business Fax to Email Made Easy - With eFax Corporate (http://www.enterprise.efax.com), you'll receive a dedicated online fax number, which is used the same way as a typical analog fax number. You'll receive secure faxes in your email, fr…
When you create an app prototype with Adobe XD, you can insert system screens -- sharing or Control Center, for example -- with just a few clicks. This video shows you how. You can take the full course on Experts Exchange at http://bit.ly/XDcourse.

763 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

9 Experts available now in Live!

Get 1:1 Help Now