MartyConnelly
martyconnelly at shaw.ca
Tue Sep 19 20:43:46 CDT 2006
Haven't got a working WSS to try this against. But you can establish a linked table with following method. I believe you can also interrogate WSS for the GUID of a table with a Lists.GetList method. I may have code lying around from a year ago when I was testing. Gunderloy on Access and Sharepoint http://msdn.microsoft.com/library/default.asp?url=/library/en-us/dno2k3ta/html/odc_OfOfficeSysandWSS.asp To import a SharePoint list to Access, or to add a link to a SharePoint list from an Access database, you can also use the TransferDatabase method but the syntax is somewhat more complex. Here's a Microsoft Visual Basic for Applications (VBA) command to add a link to a SharePoint list named Parts: DoCmd.TransferDatabase acLink, "Windows SharePoint Services", _ "WSS;HDR=NO;IMEX=2;" & _ "DATABASE=http://server_name/sites/site_nam;" & _ "LIST={800BE2B7-FA3C-4CFC-BBB3-8500C4EDCF22};" & _ "VIEW=;RetrieveIds=Yes;TABLE=Parts", acTable, , _ "Parts" Martin Reid wrote: >Thanks to both of you > >Actually its aparameter to link to a sharepoint list form Access. All sorted now using a combination of both your and Johns suggestion. > >Thanks > >Martin > >Martin WP Reid >Training and Assessment Unit >Riddle Hall >Belfast > >tel: 02890 974477 > > >________________________________ > >From: accessd-bounces at databaseadvisors.com on behalf of Mark A Matte >Sent: Tue 19/09/2006 20:16 >To: accessd at databaseadvisors.com >Subject: Re: [AccessD] String Help > > > >Martin, > >I thought your were changing then launching the site...So here's my stab at >it. > >Good luck, > >Mark A. Matte > >Private Sub Command0_Click() >Dim site As String >site = >"http://MySite12/_layouts/ViewEdit.aspx?List=%7B2A82A404%2D5529%2D47DC%2DAE13%2DAC1D9BC0A84F%7D&View=%7B357B4FE6%2D44CF%2D4275%2DB91F%2D46558301579B%7D" >site = Replace(site, "%7B", "{") >site = Replace(site, "%2D", "-") >site = Replace(site, "%7D&", "%7D") >site = Replace(site, "%7D", "}") >OpenIE site >End Sub > > >Public Function OpenIE(vURL As String) >On Error GoTo ErrorHandler >IEObj.Visible = True >With IEObj >..Visible = True >..Navigate vURL >Do Until Not .Busy >DoEvents >Loop >End With >Exit Function >ErrorHandler: >On Error GoTo ErrorHandler2 >Set IEObj = Nothing >Set IEObj = CreateObject("InternetExplorer.Application") >ErrorHandler2: >Resume Next > >End Function > > > > >>From: "Martin Reid" <mwp.reid at qub.ac.uk> >>Reply-To: Access Developers discussion and problem >>solving<accessd at databaseadvisors.com> >>To: "Access Developers discussion and problem >>solving"<accessd at databaseadvisors.com> >>Subject: [AccessD] String Help >>Date: Tue, 19 Sep 2006 19:45:51 +0100 >> >>Given the string shown below does anyone know how to using VBA >> >>Before you can use the GUIDs from the address as arguments in this macro >>action, you must replace each %7B string with the { character, replace each >>%2D string with the - character, and replace each %7D string with the } >>character. Do not include the & (ampersand) character that follows the %7D >>string in the list GUID. >> >> >> >>The string would be of the form >> >>http://MySite12/_layouts/ViewEdit.aspx?List=%7B2A82A404%2D5529%2D47DC%2DAE13%2DAC1D9BC0A84F%7D&View=%7B357B4FE6%2D44CF%2D4275%2DB91F%2D46558301579B%7D >> >> >>This is out of the Access 2007 help file. Your response will be published >>by the way as I cant do it. >> >>Martin >> >> >> >>Martin WP Reid >>Training and Assessment Unit >>Riddle Hall >>Belfast >> >>tel: 02890 974477 >> >> >> >> -- Marty Connelly Victoria, B.C. Canada