利用脚本快速从网站上查找出原理图上元器件的相关资料

我们在设计原理图或者查看原理图时，利用理图料经常需要到网站搜索某个元器件的脚本相关资料，看能否找到规格书来查看。快速每次都要打开相关网站，从网查找出原输入关键词去搜索，站上这样的上元重复操作效率不是很高。有没有办法在原理图上，器件选中某个元器件，关资下一步就已经在网站上搜索了这个元器件的利用理图料关键词，并找出了相关网页来。脚本答案是快速有的，就是从网查找出原编写一个脚本，选中某个元器件，站上运行脚本就能实现了这个功能。上元下面介绍一下这个方法。器件

首先，打开原理图的脚本编辑器，编写以下代码。

参考代码：

SubMain

BeginDialogUserDialog260,140,"SelectaWeb",.CallbackFunc'%GRID:10,7,1,1

Text50,84,170,14,"",.Text1

OKButton40,112,90,21,.OK

CancelButton140,112,90,21

OptionButton60,14,140,14,"baidu",.OptionButton1

OptionButton60,35,90,14,"szlcsc",.OptionButton2

OptionButton60,56,90,14,"taobao",.OptionButton3

Dialog

DimdlgAsUserDialog

DimattrsAsAttributes

IfDialog(dlg)=-1Then'OKwaspressed

Setobjs=(plogObjectTypeComponent,"",True)

ForEachpartInobjs

Setattrs=

compName=attrs("Value")

Nextpart

'compName=(1).AttrVal(part,"Description")

Setie=CreateObject("")

'compName=(1).AttrVal(part,"Description")

Setie=CreateObject("")

=True

Case0

'("")

(""compName)

SKeyscompName"~"

Case1

(""compName"hot-key=CC2530F256RHAR")

Case2

(""compName)

Select

If

Sub

RemSeeDialogFunchelptopicformoreinformation.

PrivateFunctionCallbackFunc(DlgItem$,Action%,SuppValue%)AsBoolean

SelectCaseAction%

Case1'Dialogboxinitialization

Document_SelectionChange

Case2'Valuechangingorbuttonpressed

Case3'TextBoxorComboBoxtextchanged

Case4'Focuschanged

Case5'Idle

RemCallbackFunc=True'Continuegettingidleactions

Select

Function

PublicSubDocument_SelectionChange()

Setobjs=(plogObjectTypeComponent,"",True)

DlgEnable"OK",False

=1Then

compName=(1).Name

DlgText"Text1","SelectedPart:"compName

DlgEnable"OK",True

DlgText"Text1","MultipleSelection"

Else

DlgText"Text1","Selectapart"

If

Sub

然后，选中需要查找的元器件，运行脚本，就会弹出一个网站的页面让我们选择，这里设置了百度，立创和淘宝。