53687_zh-TW

liliconcom

文本瀏覽器：從短語列表中選擇腳本

在“文本資源管理器”窗口中，您可以右鍵單擊將選擇數據庫中行的短語。  我該如何編寫此功能的腳本？我想要做的是在文本資源管理器窗口中選擇前三個短語，以便對錶進行子集化。

 

Re：Text Explorer：從短語列表中選擇腳本

謝謝！這就像一個魅力。:)

Re：Text Explorer：從短語列表中選擇腳本

同樣小寫：Dispo Text，項目可能已經是小寫。  

 

dt1 <SPAN class="token operator"><</SPAN><SPAN class="token operator"><</SPAN> Select Where<SPAN class="token punctuation">(</SPAN><SPAN class="token function">contains</SPAN><SPAN class="token punctuation">(lowercase(</SPAN><SPAN class="token punctuation">:</SPAN>DISPO <SPAN class="token function">TEXT)</SPAN><SPAN class="token punctuation">,</SPAN> items<SPAN class="token punctuation">[</SPAN>i<SPAN class="token punctuation">]</SPAN><SPAN class="token punctuation">)</SPAN><SPAN class="token punctuation">,</SPAN> current selection<SPAN class="token punctuation">(</SPAN><SPAN class="token string">"extend"</SPAN><SPAN class="token punctuation">)</SPAN><SPAN class="token punctuation">)</SPAN><SPAN class="token punctuation">;</SPAN>

Re：Text Explorer：從短語列表中選擇腳本

文斯，謝謝你的回复...... 它似乎有時工作但包含函數區分大小寫。  我試圖將物品強制為小寫但是當它們與大小寫混合時仍然沒有被選中。

 

 

lowercase(items[1]);
lowercase(items[2]);
lowercase(items[3]);
 
　
for(i=1, i<=3, i++,
dt1 << Select Where(contains(:DISPO TEXT, items[i]), current selection("extend"));
);

 

 

有任何想法嗎？

Re：Text Explorer：從短語列表中選擇腳本

可能應該首先閱讀整個問題。   

 

Names Default to here(1);
dt = open("$SAMPLE_DATA\Aircraft Incidents.jmp");
te = dt << Text Explorer(
 Text Columns( :Final Narrative ),
 Set Regex(
  Library( "Domain names" ),
  Library( "Money" ),
  Library( "Words" ),
  Library( "HTML Link Grabber" ),
  Library( "\[Bang!!! cleaner]\" ),
  Library( "Time" ),
  Library( "Numbers" )
 ),
 Language( "English" )
);

rep = te << report;

scb = (rep << xpath("//StringColBoxHeader[text()='Phrase']/.."))[1]; // finds the phrase string col box
items = scb << Get; // gets the values

for(i=1, i<=3, i++, 
 dt << Select Where(Contains(:Final Narrative, items[i]), current selection("extend"));
);

希望這對你有用。