Every organization (and developer) has their own development project structure. I’ve set up a BizTalk project structure that my company will use for all new BizTalk projects. To make life easy, I also built a simple VBScript file to automatically build the structure for us.
My folder structure looks like this:

I’ve got a spot for deployment packages (Installation), test files, instance data, file adapter pickup/dropoff (Filedrops), strong name key(s), and the actual projects. What’s nice is that each BizTalk project’s strong name key reference looks the same (..\..\..\..\Keys\MyCompany.snk). No hard coded file path. So far, this has worked really well for me.
To make construction of this structure easier, I built the following script. Just copy and paste it into a .vbs file and you’re good to go.
‘
‘ BizTalk Project Structure Creation Script
‘ Created by: Richard Seroter
‘ https://seroter.wordpress.com
‘
‘*******************************************
‘declare variables
Dim objFSO, objFolder, strDirectory, strProjectName, strRootFolder, strCurrentFolder
‘request data from user
strDirectory = InputBox(“Set path here (e.g. C:\BizTalk\Projects)”, “Set path”)
strProjectName = InputBox(“Set project here (e.g. MyCompany.Department.Project):”, “Set project”)
‘set root folder of the project
strRootFolder = strDirectory & “\” & strProjectName
‘ Create FileSystemObject
Set objFSO = CreateObject(“Scripting.FileSystemObject”)
‘ Create BizTalk project root folder
Set objFolder = objFSO.CreateFolder(strRootFolder)
‘create BizTalk folder: Documentation
strCurrentFolder = strRootFolder & “\” & “Documentation”
Set objFolder = objFSO.CreateFolder(strCurrentFolder)
‘create BizTalk folder: Filedrop
strCurrentFolder = strRootFolder & “\” & “Filedrop”
Set objFolder = objFSO.CreateFolder(strCurrentFolder)
‘create BizTalk folder: Installation
strCurrentFolder = strRootFolder & “\” & “Installation”
Set objFolder = objFSO.CreateFolder(strCurrentFolder)
‘create BizTalk folder: Installation –> Bindings
strCurrentFolder = strRootFolder & “\” & “Installation” & “\” & “Bindings”
Set objFolder = objFSO.CreateFolder(strCurrentFolder)
‘create BizTalk folder: Installation –> Packages
strCurrentFolder = strRootFolder & “\” & “Installation” & “\” & “Packages”
Set objFolder = objFSO.CreateFolder(strCurrentFolder)
‘create BizTalk folder: Installation –> Scripts
strCurrentFolder = strRootFolder & “\” & “Installation” & “\” & “Scripts”
Set objFolder = objFSO.CreateFolder(strCurrentFolder)
‘create BizTalk folder: Instance Data
strCurrentFolder = strRootFolder & “\” & “Instance Data”
Set objFolder = objFSO.CreateFolder(strCurrentFolder)
‘create BizTalk folder: Keys
strCurrentFolder = strRootFolder & “\” & “Keys”
Set objFolder = objFSO.CreateFolder(strCurrentFolder)
‘create BizTalk folder: Projects
strCurrentFolder = strRootFolder & “\” & “Projects”
Set objFolder = objFSO.CreateFolder(strCurrentFolder)
‘create BizTalk folder: Templates
strCurrentFolder = strRootFolder & “\” & “Templates”
Set objFolder = objFSO.CreateFolder(strCurrentFolder)
‘create BizTalk folder: Tests
strCurrentFolder = strRootFolder & “\” & “Tests”
Set objFolder = objFSO.CreateFolder(strCurrentFolder)
WScript.Echo “Finished creating ” & strProjectName
WScript.Quit
Any changes you might suggest?
Technorati Tags: BizTalk


























