The foloowing code sucessfull esecutes a dde poke from paradox v9 to Peachtree Complete Acctg v7. (I doubt that the dde syntax has changed in later versions.)
My problem is that when I activate the password feature in Peachtree, of course the dde poke no longer works. Does anyone know the syntax of poking the password.
If ddeLink.open("peachw","incspec" then
ddeLink.setItem("File=General,Field=StartDate" tmp1=ddeLink ddeLink.setItem("File=General,Field=EndDate" tmp2=ddeLink
StartDate=date(tmp1)
EndDate=date(tmp2)
ddeLink.setItem("File=SALESJOURNAL,CLEAR,FIELD=DATE"
ddeLink =InvDate
ddeLink.setItem("File=SALESJOURNAL,FIELD=CUSTOMER"
ddeLink = CustNum
ddeLink.setItem("FILE=SALESJOURNAL,FIELD=INVOICE"
ddeLink = InvNum
ddeLink.setItem("FILE=SALESJOURNAL,FIELD=DATEDUE"
ddeLink =DatDue
ddeLink.setItem("FILE=SALESJOURNAL,FIELD=firstdistribution"
ddeLink = (AcctNum + " \t" + SubTot +" \t"+" \t" +"\t"+TotDescrip+" \t"+" \t"+TaxType+" \t"
;ddeLink.setItem("FILE=SALESJOURNAL,FIELD=nextdistribution"
;ddelink = ("21025" + " \t"+ SalesX +" \t" +" \t"+ " \t" +SalesXDescrip+" \t" +" \t"+" \t"+" \t" )
ddeLink.setItem("FILE=SALESJOURNAL,FIELD=nextdistribution,SAVE"
ddelink = ("40350"+ " \t"+ BillFreight+" \t" +" \t"+ " \t" +"Billable Freight"+" \t" +" \t"+"4"+"\t"
ddeLink.close()
Any help greatly appreciated.
P.S. Randy Bell formerly of Executive Software (last known tel #303-771-8181)is an expert in theis area. Does anyone know how to reach him??
My problem is that when I activate the password feature in Peachtree, of course the dde poke no longer works. Does anyone know the syntax of poking the password.
If ddeLink.open("peachw","incspec" then
ddeLink.setItem("File=General,Field=StartDate" tmp1=ddeLink ddeLink.setItem("File=General,Field=EndDate" tmp2=ddeLink
StartDate=date(tmp1)
EndDate=date(tmp2)
ddeLink.setItem("File=SALESJOURNAL,CLEAR,FIELD=DATE"
ddeLink =InvDate
ddeLink.setItem("File=SALESJOURNAL,FIELD=CUSTOMER"
ddeLink = CustNum
ddeLink.setItem("FILE=SALESJOURNAL,FIELD=INVOICE"
ddeLink = InvNum
ddeLink.setItem("FILE=SALESJOURNAL,FIELD=DATEDUE"
ddeLink =DatDue
ddeLink.setItem("FILE=SALESJOURNAL,FIELD=firstdistribution"
ddeLink = (AcctNum + " \t" + SubTot +" \t"+" \t" +"\t"+TotDescrip+" \t"+" \t"+TaxType+" \t"
;ddeLink.setItem("FILE=SALESJOURNAL,FIELD=nextdistribution"
;ddelink = ("21025" + " \t"+ SalesX +" \t" +" \t"+ " \t" +SalesXDescrip+" \t" +" \t"+" \t"+" \t" )
ddeLink.setItem("FILE=SALESJOURNAL,FIELD=nextdistribution,SAVE"
ddelink = ("40350"+ " \t"+ BillFreight+" \t" +" \t"+ " \t" +"Billable Freight"+" \t" +" \t"+"4"+"\t"
ddeLink.close()
Any help greatly appreciated.
P.S. Randy Bell formerly of Executive Software (last known tel #303-771-8181)is an expert in theis area. Does anyone know how to reach him??