options noxwait noxsync;
x '"C:\Program Files\Microsoft Office\Office10\Excel.exe"';
/* The DDE link is established using */
/* Microsoft Excel SHEET1, rows 1 */
/* through 100 and columns 1 through 3 */
filename random dde
'excel|sheet1!r1c1:r100c3';
data random;
file random;
do i=1 to 100;
x=ranuni(i);
y=10+x;
z=x-10;
put x y z;
end;
run;
options noxwait noxsync;
x '"C:\Program Files\Microsoft Office\Office10\Winword.exe"';
filename testit dde 'MSWORD|system' ;
/*英文字母会变为中文*/
data _null_;
file testit;
put "世界大同xxxx";
run;