復(fù)制代碼 代碼如下:

function getClientPcName()
{
//"請(qǐng)將您瀏覽器Internet選項(xiàng)中的“對(duì)沒有標(biāo)記為安全的ActiveX控件進(jìn)行初始化和腳本運(yùn)行”設(shè)置為“啟用”！/n/n然后刷新本頁(yè)登陸！"
var WshShellPcName = new ActiveXObject("WScript.Network");
var ComputerName = WshShellPcName.ComputerName ;
return ComputerName;
}
function getClientIp()
{
var WshShellIp = new ActiveXObject("rcbdyctl.Setting");
var ip = WshShellIp.GetIPAddress;
return ip;
}

復(fù)制代碼 代碼如下:

<?xml version="1.0" encoding="utf-8"?>
<s:Application xmlns:fx="http://ns.adobe.com/mxml/2009"
xmlns:s="library://ns.adobe.com/flex/spark"
xmlns:mx="library://ns.adobe.com/flex/mx" xmlns:supportClasses="com.esri.ags.skins.supportClasses.*" minWidth="955" minHeight="600" creationComplete="init()">
<fx:Script>
<![CDATA[
import mx.controls.Alert;
public function init():void
{
var strPCName:String = ExternalInterface.call("getClientPcName");
var strPCID = ExternalInterface.call("getClientIp");
mx.controls.Alert.show(strPCName+" "+strPCID);
}
]]>
</fx:Script>
<s:layout>
<supportClasses:AttachmentLayout/>
</s:layout>
<fx:Declarations>
<!-- 將非可視元素（例如服務(wù)、值對(duì)象）放在此處 -->

</fx:Declarations>
<mx:DataGrid x="186" y="173">
<mx:columns>
<mx:DataGridColumn headerText="列 1" dataField="col1"/>
<mx:DataGridColumn headerText="列 2" dataField="col2"/>
<mx:DataGridColumn headerText="列 3" dataField="col3"/>
</mx:columns>
</mx:DataGrid>
</s:Application>

（編輯：武林網(wǎng)）