LIVECRM.IT  : IL PRIMO HOSTING PROVIDER PER IL NOLEGGIO DEL MICROSOFT DYNAMICS CRM 4.0

SB Soft S.r.l. mette a disposizione i suoi server per il noleggio del potente software targato Microsoft®

Per la prima volta in Italia e in Europa, il CRM 4.0 viene venduto in modalità Hosting grazie a SB Soft S.r.l., che, in collaborazione con Microsoft®, permette di noleggiare il CRM 4.0 attraverso il sito web www.livecrm.it

Tutta la potenza del software leader nel mondo per la gestione dei clienti da oggi può essere noleggiato a partire da € 25,00 + iva al mese. Inoltre, viene data la possibilità alle aziende di scegliere tra il ventaglio delle soluzioni presentate sul sito quella più vicina alle loro esigenze, oppure di utilizzare il software gratuitamente per 30 giorni prima dell’acquisto.

SB Soft S.r.l. ha anche in cantiere un accordo con Poste Italiane per arricchire il software di un componente per l’invio di telegrammi e raccomandate direttamente dal software.

Microsoft Italia ha espresso grande soddisfazione per questo progetto perché consente alle aziende, in un momento di incertezza economica, di approcciarsi a questa piattaforma senza eccessivi investimenti iniziali per il potenziamento delle proprie capacità operative e della forza vendita.

Microsoft Dynamics CRM 4.0 è un’applicazione di gestione delle relazioni con i clienti completamente integrata, pensata per le aziende di qualsiasi dimensione. L’integrazione nativa con Microsoft Outlook permette alle persone di accedere facilmente al sistema mentre l’interfaccia utente simile ad Outlook diminuisce costi e tempi di formazione. In particolare, Microsoft Dynamics CRM consente al personale di vendita di un’azienda di gestire le informazioni dei clienti o prospect in modo più efficiente, spendendo meno tempo in attività amministrative e più tempo in attività commerciali.

Per maggiori informazioni sul prodotto collegarsi al sito www.livecrm.it oppure telefonare allo 0832.331040

“Sono molto lieto che un’azienda come SB Soft abbia scelto di distribuire Dynamics CRM in modalità hosting -  dichiara Giovanni Stifano Direttore Divisione Dynamics Microsoft Italia - perché questa modalità rappresenta un approccio vincente per le aziende che l’hanno adottato. “Abbiamo potuto constatare non solo un importante riduzione nei  tempi e nei costi di start up ma anche di quelli mensili a fronte, inoltre, di un rischio per l’investimento notevolmente ridotto”.

What is SaaS? (Software-as-a-Service)
Instead of owning software - and all the investment, maintenance, and depreciation it entails – you can simply rent use of that software from LiveCRM.

Save on:
- Hardware
- Software purchase and updates
- Microsoft Certified Support
- Power
- Security devices
- Remote access devices
- Administration

Set up is fast
Your choice of application(s) can be available to all your team members within hours, compared to months with a physical installation.

Use it from Anywhere
SaaS also offers increased mobility. Workers at multiple office locations, on the road, or at home can use the same essential documents, data, and tools. All you need is Internet access.

For companies of all sizes.
According to a 2006 survey by Forrester Research, SaaS is a good deal for companies with 100 - 499 employees. And "For companies with 50-100 users, SaaS is a slam dunk," says Ray Wang. View the entire report at: Forrester: The ROI Of SaaS.

See how SaaS with LiveCRM is a better way to use software. We offer a 30-day, money back guarantee, and full Microsoft Certified support teams that enable you to be productive within minutes.

To close Office application after you open it, you must use this method:

System.Runtime.InteropServices.Marshal.ReleaseComObject

For more information you can visit Microsoft knowledge base: http://support.microsoft.com/default.aspx?scid=KB;EN-US;q317109

Hi to all

Fulvio

Ciao a tutti,

un articolo che ho scritto per Microsoft MSDN corporate su VSTO 2005 RC2 Excel, Word e Webservices in ASP.NET 2.0

http://msdn2.microsoft.com/en-us/library/aa701256(office.11).aspx

Ciao a tutti e buona programmazione

Fulvio

Ciao a tutti. Uno dei problemi che molti utenti mi hanno posto è quello di riuscire ad inserire all'interno di un foglio di Excel un grafico utilizzando solo il codice.

Per fare questo dovete utilizzare il namespace Microsoft.Office.Tools.Excel.Chart.
Per prima cosa create un nuovo progetto Office Ecel Workbook. Selezionate il "foglio1" (Sheet1 se avete Office in lingua inglese), ed inserite all'interno dell'evento Foglio1_Startup (Sheet1_Startup se è in inglese Office) le seguenti righe di codice:

Spero sia utile, "Happy Programming"

Fulvio

Durante un progetto Office con VSTO 2005 e Visual Studio 2005 mi è capitato di voler evitare di far richiedere all'applicazione Office di visualizzare la DialogBox per il salvataggio del documento all'utente.

Ho risolto questo piccolo inconveniente inserendo nell'evento ThisDocument_BeforeClose la seguente riga di codice:

In questo modo diremo all'applicazione Office che il documento è già stato salvato. Quindi alla chiusura dell'applicazione non ci verrà richiesto il salvataggio.

Ciao a tutti e buona programmazione

Fulvio

Tecnologie utilizzate:

-         Visual Studio 2005

-         SQL 2005 Server Std

-         VSTO 2005

-         ASP.NET 2.0

Obiettivi:

-         Panoramica VSTO e Framework 2.0

-         Panoramica potenzialità Task Pane di Word ed Excel

-         Creazione Webservice con VS 2005 e Framework 2.0 per agganciarsi ai dati

-         Utilizzo dei VSTO per creare documenti Excel e Word che interagiscano con i webservice

Software Richiesto:

-         Windows 2003 Server Std

-         Office 2003 Professional

-         VSTO 2005

-         Visual Studio 2005 Professional

-         SQL Server 2005 std

-         IIS e ASP.NET 2.0

Grazie all’avvento del nuovo framework 2.0 e Visual Studio 2005 microsoft ha puntato decisamente alla programmazione Office introducendo I Visual Studio tools for Office 2005. A differenza dei precedenti (VSTO 2003), la programmazione Office è notevolmente migliorata grazie anche alla possibilità di poter avere integrato nel IDE di Visual Studio quello di Word o di Excel. Quindi oggi creare delle applicazioni office che possano interagire con I componenti che creiamo è molto più semplice.

In questo articolo andremo ad analizzare alcuni aspetti della nuova programmazione Office. Gli aspetti che andremo a toccare sono: Webservice, TaskPane, Word ed Excel.

L’applicazione che ho creato per questo articolo riprende il sito web AdventureWorks utilizzato durante gli eventi di lancio di Visual Studio 2005 (comunque sarà inserito nel file che andrete a scaricare). Questo sito è stato creato con la tecnologia ASP.NET 2.0 e come database usa SQL Server standard 2005. Creeremo due webservice: il primo che si occuperà di estrapolare tutti gli impiegati addetti alle vendite in base al territorio scelto e riempirà una lettera di ringraziamento scritta in Word 2003, il secondo si occuperà di estrapolare tutti gli acquisti avvenuti in un determinato periodo per popolare un diagramma su Excel 2003.

Di seguito troverete lo schema logico che la nostra applicazione seguirà:

http://blog.shareoffice.it/webmaster/gallery/image/145.aspx

Creazione webservice con Visual Studio 2005 e connettiamolo a SQL Server 2005

Prima di tutto creiamo un progetto vuoto che chiameremo AdventureWorks. A questo progetto vuoto aggiungiamo un progetto ASP.NET (il linguaggio utilizzato da me è il VB.NET) che chiameremo AdventureWeb.

NB: Nel progetto che potrete scaricare troverete anche il sito AdventureWorks completo

Per prima cosa aggiungiamo al nostro progetto web un primo webservice che chiameremo AdvOrders.asmx. Questo webservice verrà utilizzato dall’applicazione Excel per generare i grafici di fatturato in base ad ogni anno fiscale.

Visualizziamo il codice del webservice appena aggiunto al nostro progetto web e creiamo una funzione che chiameremo “Verify” .

NB: Questa funzione ho l’abitudine di crearla per verificare se il webservice è raggiungibile. E’ inutile che lanci una funzione senza prima aver controllato se il webservice è raggiungibile dalla mia applicazione. Immaginate di avere una funzione fondamentale (come quella del nostro esempio) nel webservice. Se quest’ultimo non è raggiungibile bloccherà tutta la nostra applicazione.

Il codice da inserire nel behind code del webservice:

            "Returns “OK” if Webservice in online", _

              EnableSession:=False)> _

              Public Function Verify() As String

                  Return "OK"

            End Function

La funzione restituisce il valore “OK”.

Adesso possiamo passare a creare la funzione che genera il DataSet che utilizzeremo per il riempire l’oggetto ListObject del foglio di Excel.

Per prima cosa dobbiamo importare i NameSpace SQL, inseriamo nel codice del webservice le seguenti righe di codice:

Imports System.Web

Imports System.Data

Imports System.Data.SqlClient

Imports System.Web.Services

Imports System.Web.Services.Protocols

Importati i NameSpace principali di SQL possiamo creare la funzione che andrà a creare il DataSet. Questa funzione la chiameremo “RequestData”. Questa funzione si connetterà al Database SQL 2005 e lancerà una query che andrà ad estrapolare dalla tabella Sales.SalesOrderDetail tutti gli importi e li sommerà in base all’anno. (ES: Verranno estrapolati tutti gli ordini del anno 2004 e verranno sommati).

La funzione si presenterà così:

"Returns dataset with information about orders", _

            EnableSession:=False, BufferResponse:=True, CacheDuration:=600000)> _

            Public Function RequestData() As DataSet

                  Dim OrdersData As New DataSet 'This is the dataset to return

                  Dim ConnectionToSql As New SqlConnection(System.Configuration.ConfigurationManager.AppSettings("ConnectionSql"))

                  ConnectionToSql.Open()

                  Dim daLinks As New SqlDataAdapter("SELECT TOP (100) PERCENT SUM(Sales.SalesOrderDetail.LineTotal) AS Total, DATEPART(yy, Sales.SalesOrderHeader.OrderDate) AS Year FROM Sales.SalesOrderDetail INNER JOIN Sales.SalesOrderHeader ON Sales.SalesOrderDetail.SalesOrderID = Sales.SalesOrderHeader.SalesOrderID GROUP BY DATEPART(yy, Sales.SalesOrderHeader.OrderDate)ORDER BY Year", ConnectionToSql)

                  daLinks.Fill(OrdersData, "View1")

                  Return OrdersData

            End Function

Adesso che abbiamo completato il webservice, salviamolo pubblichiamolo sul server web con IIS 6.0 e le ASP.NET 2.0 abilitate.

NB: Ricordatevi di settare la stringa di connessione al DB nel file web.config

Creazione Foglio di excel per la generazione del grafico con i dati estrapolati dal Webservice.

Aggiungiamo alla soluzione AdventureWorks un progetto Excel scritto con il linguaggio Visual Basic .NET. Chiamiamo il progetto DiagramOrder.

Visual Studio 2005 ci chiederà se vogliamo creare un documento Excel vuoto con il nome DiagramOrder.xls. Accettiamo premendo OK.

Come potrete notare si aprirà l’IDE di Excel 2003 all’interno di Visual Studio 2005.

Aggiungiamo una referenza al webservice precedentemente creato facendo click con il tasto destro sul progetto excel e selezionando la voce “Add Web Reference”.

Visual Studio ci chiederà dove possiamo trovare il webservice e selezioniamo la voce “Webservice in this solution” e chiamiamola “AdvWebservice”.

Trasciniamo dalla “Toolbox” di VS il controllo ListObject nella casella A-5 del foglio1 di Excel e chiamiamolo “List1”.

Referenziamo nel progetto il namespace del webservice:

Imports DiagramOrder.AdvWebservice

Inseriamo nello startup del foglio il seguente codice:

'Verify if Webservice is online

            If AdvWebService.Verify.ToString = "OK" Then

                  'If Webservice is online i create a new dataset and fill List1

                  Dim ds As New DataSet

                  ds = AdvWebService.RequestData

                  List1.AutoSetDataBoundColumnHeaders = True 'Autoset cell

                  List1.DataSource = ds

                  List1.DataMember = "View1"

            Else

                  'If Webservice is Down, excel write a message to the user

                  MessageBox.Show("Attenction: The webservice is unreacheable", "Error", MessageBoxButtons.OK, MessageBoxIcon.Warning, MessageBoxDefaultButton.Button1, MessageBoxOptions.DefaultDesktopOnly, False)

            End If

Questo codice ci permette di verificare se effettivamente il webservice è online, se questo viene raggiunto, creiamo un DataSet e riempiamo il controllo List1 precedentemente creato.

Ritorniamo al nostro foglio di excel, selezioniamo il controllo ListObject. Si aprirà un menu che ci permetterà di aggiungere il grafico (<< graph.bmp >>).

Si[FG1]  aprirà il wizard per la creazione del grafico. Selezioniamo il grafico Istogramma “3D non in pila” e premiamo sul pulsante “OK”.

Excel ci chiederà di selezionare la fonte di dati, selezioniamo il menu “Serie”. Nel campo “Nome” inseriamo “=Foglio1!$A$5”, nel campo “Valori” inseriamo “=Foglio1!$A$6”, nel campo “Etichette asse categorie (X)” inseriamo “=Foglio1!$B$6”.

Premiamo il tasto “Fine” per concludere il wizard.

Facciamo click con il tasto destro del mouse sul progetto “DiagramOrder”, selezioniamo la voce Debug e facciamo click su “Start new instance”. Visual Studio 2005 lancerà l’applicazione e sarà simile a questa:

http://blog.shareoffice.it/webmaster/gallery/image/175.aspx

Creazione webservice per estrapolare i dati degli impiegati addetti alle vendite

Questo webservice verrà utilizzato dalla nostra applicazione Word 2003 per riempire in maniera automatica una lettera di ringraziamento per il lavoro svolto e il fatturato raggiunto.

Questo webservice sarà composto da 4 funzioni di tipo public.

1)     Verify (Questa funzione verrà utilizzata dall’applicazione word 2003 per verificare se il webservice è raggiungibile

2)     TerritoryReturn (Questa funzione estrapola tutti i territori dal database)

3)     ListEmployeeSales (Questa funzione estrapola tutti i commerciali in base al territorio di appartenenza)

4)     EmployeeInformation (Questa funzione estrapola le informazioni di un dipendente in base al suo ID)

Per prima cosa creiamo un nuovo webservice all’interno del progetto web AdventureWeb, chiamiamo questo webservice EmployeeSales.asmx .

Creiamo la funzione TerritoriReturn che andrà ad estrapolare tutti i territori dal DB e restituirà un oggetto DataSet contenente tutti i dati sui territori:

'Return all Territory from Database

            "Return all Territory", _

              EnableSession:=False)> _

              Public Function TerritoryReturn() As DataSet

                  Dim TerritoryTable As New DataSet

                  Dim ConnectionToSQL As New SqlConnection(System.Configuration.ConfigurationManager.AppSettings("ConnectionSql"))

                  Dim daLinks As New SqlDataAdapter("SELECT Sales.SalesTerritory.*" _

                  & "FROM Sales.SalesTerritory", ConnectionToSQL)

                  ConnectionToSQL.Open()

                  daLinks.Fill(TerritoryTable, "Territory")

                  Return TerritoryTable

                  ConnectionToSQL.Close()

            End Function

Creaiamo la funzione LIstEmployeeSales che estrapolerà tutti gli impiegati addetti alle vendite in base ad un determinato territorio e restituirà un DataSet:

'Return a DataSet with Sales Employee selected by Territory

            "Returns dataset with information about Sales Employee", _

            EnableSession:=False, BufferResponse:=True, CacheDuration:=600000)> _

            Public Function ListEmployeeSales(ByVal Territory As String) As DataSet

                  Dim SalesData As New DataSet 'This is the dataset to return

                  Dim ConnectionToSql As New SqlConnection(System.Configuration.ConfigurationManager.AppSettings("ConnectionSql"))

                  ConnectionToSql.Open()

                  Dim daLinks As New SqlDataAdapter("SELECT Person.Contact.FirstName, Person.Contact.LastName, Sales.SalesTerritory.TerritoryID, HumanResources.Employee.EmployeeID " _

      & "FROM Person.Contact INNER JOIN HumanResources.Employee ON Person.Contact.ContactID = HumanResources.Employee.ContactID " _

      & "INNER JOIN Sales.SalesPerson AS SalesPerson_1 ON HumanResources.Employee.EmployeeID = SalesPerson_1.SalesPersonID " _

      & "INNER JOIN Sales.SalesTerritory ON SalesPerson_1.TerritoryID = Sales.SalesTerritory.TerritoryID " _

      & "WHERE (SalesPerson_1.TerritoryID = " & Territory & ")", ConnectionToSql)

                  daLinks.Fill(SalesData, "SalesEmployeeTable")

                  Return SalesData

                  ConnectionToSql.Close()

            End Function

L’ultima funzione che andremo a creare è quella che estrapola tutte le informazioni relative al dipendente (via, città, CAP, ecc …) in base ad un ID. La funzione restituirà un DataSet con tutte l informazioni estrapolate.

            'Return all information about Sales Employee

            "Return all information about sales employee", _

            EnableSession:=False)> _

            Public Function EmployeeInformation(ByVal EmployeeID As String) As DataSet

                  Dim EmployeeInfo As New DataSet

                  Dim ConnectionToSQL As New SqlConnection(System.Configuration.ConfigurationManager.AppSettings("ConnectionSql"))

                  Dim daLinks As New SqlDataAdapter("SELECT Person.Contact.FirstName, Person.Contact.LastName, Sales.SalesTerritory.TerritoryID, HumanResources.Employee.EmployeeID, " _

                  & "Person.Address.AddressLine1, Person.Address.City, Person.Address.PostalCode, SalesPerson_1.SalesLastYear, SalesPerson_1.SalesQuota " _

                  & "FROM Person.Contact INNER JOIN " _

                    & "HumanResources.Employee ON Person.Contact.ContactID = HumanResources.Employee.ContactID INNER JOIN " _

                  & "Sales.SalesPerson AS SalesPerson_1 ON HumanResources.Employee.EmployeeID = SalesPerson_1.SalesPersonID INNER JOIN " _

                  & "Sales.SalesTerritory ON SalesPerson_1.TerritoryID = Sales.SalesTerritory.TerritoryID INNER JOIN " _

                    & "HumanResources.EmployeeAddress ON HumanResources.Employee.EmployeeID = HumanResources.EmployeeAddress.EmployeeID INNER JOIN " _

                  & "Person.Address ON HumanResources.EmployeeAddress.AddressID = Person.Address.AddressID AND " _

                    & "HumanResources.EmployeeAddress.AddressID = Person.Address.AddressID AND " _

                  & "HumanResources.EmployeeAddress.AddressID = Person.Address.AddressID AND " _

                  & "HumanResources.EmployeeAddress.AddressID = Person.Address.AddressID " _

                  & "WHERE (HumanResources.Employee.EmployeeID = " & EmployeeID & ")", ConnectionToSQL)

                  ConnectionToSQL.Open()

                  daLinks.Fill(EmployeeInfo, "EmployeeInformation")

                  Return EmployeeInfo

                  ConnectionToSQL.Close()

            End Function

Ripubblichiamo nuovamente il progetto web AdwentureWeb sul server con IIS 6 o 5 e le ASP.NET 2.0 abilitate.

NB: Per testare il corretto funzionamento del webservice possiamo lanciare un’istanza di Debug su Visual Studio 2005. I webservice, essendo lanciati in modalità localhost, dovrebbero darci la possibilità di inserire i dati per verificare il corretto funzionamento delle funzioni appena scritte.

http://blog.shareoffice.it/webmaster/gallery/image/178.aspx

http://blog.shareoffice.it/webmaster/gallery/image/179.aspx

Creazione applicazione word 2003 e TaskPane

Cosa dovrà fare l’applicazione:

Questa applicazione word, dovrà connettersi al webservice e visualizzare sul tast pane i territori all’interno di un controllo “DropDownList”. Una volta selezionato il territorio dovremo prmere il pulsante “Search” per estrapolare tutti gli addetti alle vendite del territorio selezionato.

Apparirà sul TaskPane un altro controllo DropDownList che verrà popolato con i cognomi dei dipendenti.

Selezioneremo il cognome che ci interessa e premendo il tasto “Select Employee” verranno estrapolati tutti i dati relativi a quel dipendente e verranno popolati tutti i bookmark sul foglio di Word 2003

Una volta creato il webservice possiamo passare alla creazione della lettera (che renderemo dinamica grazia ai VSTO 2005) scritta in Word 2003.

Per prima cosa aggiungiamo alla soluzione AdwentureWorks un nuovo progetto Office Word 2003 scritto in Visual Basic .NET. Questo progetto lo chiamiamo CongratulationLetter. Come per il progetto Excel, Visual Studio 2005 ci richiederà se vogliamo utilizzare come template un documento word già scritto in precedenza o se vogliamo utilizzare un documento word bianco.

Selezioniamo la voce “Copy an existing document” e premiamo il tasto “Browse … “.

Selezioniamo il documento word CongratulationLetter.doc (si trova all’interno della soluzione che scaricherete insieme a questo articolo), premete il tasto “OK” per confermare. Se tutto è andato bene, Visual Studio dovrebbe presentarsi così:

Come per Excel anche l’IDE di Word 2003 verrà integrato all’interno di Visual Studio 2005.

NB: Come avrete potuto notare, all’interno del documento word vi sono già dei Bookmark (parole all’interno di parentesi quadre di colore grigio chiaro). I Bookmark per i VSTO 2005 sono a tutti gli effetti degli oggetti e quindi hanno delle proprietà. Per dare un’occhiata alle proprietà di ogni singolo bookmark, basta posizionare il cursore all’interno del bookmark.

Per prima cosa dobbiamo creare l’ “Actions Pane Controls”  che andremo a caricare all’interno del TaskPane. Facciamo click con il tasto destro del mouse ad aggiungiamo una nuova cartella che chiameremo “TaskPane”.

Aggiungiamo all’interno di questa cartella un nuovo “Item” di tipo “Actions Pane Control” e chiamiamolo “TaskMenu.vb”.

Aggiungiamo a questo oggetto i seguenti controlli:

N° 2 DropDownList

N° 3 Label

N° 2 Button

Una volta aggiunti i controlli, graficamente dovrebbe apparire così:

<< TaskMenu1.bmp >>

Andiamo nel Behindcode del controllo “TaskMenu.vb”. Per prima cosa dobbiamo popolare il primo DropDownList  (nel mio progetto si chiama ListTerritory):

      Private Sub TaskMenu_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

            Dim Ds As New DataSet

            Ds = AdvWebService.TerritoryReturn

            ListTerritory.DataSource = Ds

            ListTerritory.DisplayMember = "Territory.Name"

            ListTerritory.ValueMember = "Territory.TerritoryID"

      End Sub

Poi dobbiamo creare la funzione per i due pulsanti:

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

            ListEmployee.Visible = True

            Label3.Visible = True

            Dim Ds2 As New DataSet

            Ds2 = AdvWebService.ListEmployeeSales(ListTerritory.SelectedValue.ToString)

            ListEmployee.DataSource = Ds2

            ListEmployee.DisplayMember = "SalesEmployeeTable.LastName"

            ListEmployee.ValueMember = "SalesEmployeeTable.EmployeeID"

      End Sub

      Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click

            Dim Ds3 As New DataSet

            Ds3.Clear()

            Ds3 = AdvWebService.EmployeeInformation(ListEmployee.SelectedValue.ToString)

            Dim FName As New Binding("Text", Ds3, "EmployeeInformation.FirstName")

            Dim LName As New Binding("Text", Ds3, "EmployeeInformation.LastName")

            Dim AddressL As New Binding("Text", Ds3, "EmployeeInformation.AddressLine1")

            Dim PCode As New Binding("Text", Ds3, "EmployeeInformation.PostalCode")

            Dim City As New Binding("Text", Ds3, "EmployeeInformation.City")

            Dim DearName As New Binding("Text", Ds3, "EmployeeInformation.FirstName")

            Dim TotalSales As New Binding("Text", Ds3, "EmployeeInformation.SalesLastYear")

            Dim TotalRevenue As New Binding("Text", Ds3, "EmployeeInformation.SalesQuota")

            CongratulationLetter.Globals.ThisDocument.FirstName.DataBindings.Clear()

            CongratulationLetter.Globals.ThisDocument.FirstName.DataBindings.Add(FName)

            CongratulationLetter.Globals.ThisDocument.LastName.DataBindings.Clear()

            CongratulationLetter.Globals.ThisDocument.LastName.DataBindings.Add(LName)

            CongratulationLetter.Globals.ThisDocument.address.DataBindings.Clear()

            CongratulationLetter.Globals.ThisDocument.address.DataBindings.Add(AddressL)

            CongratulationLetter.Globals.ThisDocument.zip.DataBindings.Clear()

            CongratulationLetter.Globals.ThisDocument.zip.DataBindings.Add(PCode)

            CongratulationLetter.Globals.ThisDocument.city.DataBindings.Clear()

            CongratulationLetter.Globals.ThisDocument.city.DataBindings.Add(City)

            CongratulationLetter.Globals.ThisDocument.Dear.DataBindings.Clear()

            CongratulationLetter.Globals.ThisDocument.Dear.DataBindings.Add(DearName)

            CongratulationLetter.Globals.ThisDocument.TotalSales.DataBindings.Clear()

            CongratulationLetter.Globals.ThisDocument.TotalSales.DataBindings.Add(TotalSales)

            CongratulationLetter.Globals.ThisDocument.revenue.DataBindings.Clear()

            CongratulationLetter.Globals.ThisDocument.revenue.DataBindings.Add(TotalRevenue)

      End Sub

Ora passiamo al Behindcode del documento word. Aggiungiamo all’interno della subroutine “ThisDocument_Startup” le seguenti linee di codice:

            'Add to Taskpane the usercontrol TaskMenu.vb

            Me.ActionsPane.Controls.Add(ActionMenu)

            Me.ActionsPane.Visible = True

In questo modo stiamo aggiungendo al documento word l’ “Action Task Pane” contenente il controllo TaskMenu.

Lanciamo il debug dell’applicazione “CongratulationLetter.doc” e noteremo che al cambiare del territorio e del dipendente cambieranno anche i dati presenti nel documento word.

http://blog.shareoffice.it/webmaster/gallery/image/180.aspx

Conclusioni

In questo progetto abbiamo visto come le applicazioni office 2003 possano interagire con i webservice presenti su di un sito web. Immaginate quante altre applicazioni possono essere create per ogni singola necessità (fatture, documenti di trasporto, cedolini ecc ecc).

Ciao a tutti.
Molti di voi mi hanno scritto chiedendomi come mai non trovano tra i progetti di Visual Studio 2005 quelli Office.
Questo plug-in (si chiama VSTO 2005) lo si può avere o con Office Professional o lo si può scaricare con l'abbonamento MSDN.
Se volete richiedere un CD trial contenente anche i VSTO potete farlo andando su questo link:
http://msdn.microsoft.com/trial/

Ciao a tutti e buona programmazione

Fulvio

================================================
Fulvio Giaccari [MCAD/MCSD/MCT]
Responsabile Usergroup
ShareOffice.it - Usergroup Italiano Sviluppatori Office
Blog: http://blog.shareoffice.it/webmaster
================================================

Qui troverete la mia recensione su questo utilissimo compendio su Microsoft Excel e VBA scritto da Gianni Giaccaglini.

http://blog.shareoffice.it/webmaster/articles/2854.aspx

Ciao a tutti. Scusate per il ritardo con cui inserisco le slide ma sono stato incasinatissimo!!!

Volevo ringraziarvi tutti per aver partecipato così numerosi all'evento (e soprattutto per non esservi addormentati dopo pranzo!!).

Fate click qui per fare il download delle mie slide.

Ciao

Fulvio