Dropping a column from table using VB script in Powerdesigner

former_member699267 — Sat, 08 Aug 2020 19:48:19 GMT

Hi,

Anyone help me with script for dropping a column using vbscript in Powerdesigner? i used the following code snippet but it is throwing Object does not support

Dim mdl ' the current model Set mdl = ActiveModel If (mdl Is Nothing) Then
MsgBox "There is no Active Model"
ElseIf Not mdl.IsKindOf(PdPDM.cls_Model) Then
MsgBox "The Active Model is not a PDM."
else
Dim fldr, tab
Set fldr = ActiveDiagram.Parent
For Each tab In fldr.children

if tab.ObjectType = "Table" then
flag = false
for each col in tab.columns
if left(col.code,1) = "_" then
col.remove
end if
next
end if
next
end if

Re: Dropping a column from table using VB script in Powerdesigner

arnaud_laurent — Mon, 10 Aug 2020 08:12:27 GMT

Hello,

Try col.delete.

HTH

Question Re: Dropping a column from table using VB script in Powerdesigner in Technology Q&A

Dropping a column from table using VB script in Powerdesigner

Re: Dropping a column from table using VB script in Powerdesigner