05-15-2018
01:18 AM
- Mark as New
- Bookmark
- Subscribe
- Mute
- Subscribe to RSS Feed
- Permalink
- Report
05-15-2018
01:18 AM
This is the code for the replacement and this works fine
SyntaxEditor Code Snippet
HOL0103206125 = "C:\Database Maurice\Onderdelen\Afvoer\Bocht\HOL0103206125.ipt" HOL0103106125 = "C:\Database Maurice\Onderdelen\Afvoer\Bocht\HOL0103106125.ipt" HOL0103292125 = "C:\Database Maurice\Onderdelen\Afvoer\Overschuifmof\HOL0103292125.ipt" HOL0103603160 = "C:\Database Maurice\Onderdelen\Afvoer\Verloop\HOL0103603160.ipt" HOL0103606500 = "C:\Database Maurice\Onderdelen\Afvoer\Knevelinlaat\HOL0103606500.ipt" HOL0108670125 = "C:\Database Maurice\Onderdelen\Afvoer\Diverse\HOL0108670125.ipt" HOL0101104125_L_124_mm = "C:\Database Maurice\Onderdelen\Afvoer\Buis\Standpijp_Koppelbuis\HOL0101104125_L_124_mm.ipt" HOL0103206160 = "C:\Database Maurice\Onderdelen\Afvoer\Bocht\HOL0103206160.ipt" HOL0103106160 = "C:\Database Maurice\Onderdelen\Afvoer\Bocht\HOL0103106160.ipt" HOL0103292160 = "C:\Database Maurice\Onderdelen\Afvoer\Overschuifmof\HOL0103292160.ipt" HOL0108670160 = "C:\Database Maurice\Onderdelen\Afvoer\Diverse\HOL0108670160.ipt" HOL0101104160_L_146_mm = "C:\Database Maurice\Onderdelen\Afvoer\Buis\Standpijp_Koppelbuis\HOL0101104160_L_146_mm.ipt" If Parameter("module_standpijp_diameter") = 125 Then Component.Replace("Overschuifmof", HOL0103292125, True) Component.Replace("Ophangbeugel", HOL0108670125, True) Component.Replace("Standpijp_Koppelbuis", HOL0101104125_L_124_mm, True) ElseIf Parameter("module_standpijp_diameter") = 160 Then Component.Replace("Overschuifmof", HOL0103292160, True) Component.Replace("Ophangbeugel", HOL0108670160, True) Component.Replace("Standpijp_Koppelbuis", HOL0101104160_L_146_mm, True) End If