由于数据存储中不存在引用的设备平台 因此无法打开项目

我安装了vs.net想新建一个智能设备的project,然后提示错误就出来了:

由于数据存储中不存在引用的设备平台 因此无法打开项目!

我的解决方法有2种:

(1)把C:/Documents and Settings/Administrator/Local Settings/Application Data/Microsoft/CoreCon/ 下面的内容删除

(2)把下面的这段代码拷到C:/Documents and Settings/Administrator/Local Settings/Application Data/Microsoft/CoreCon/1.0/conman_ds_servicecategory.xsl  的第四行下面(SERVICECATEGORYCONTAINER 这行)能解决这个问题

<SERVICECATEGORY Name="Application Level Transport Service" ID="B333580E-3924-492e-98E5-DF57E787591B">
                <SERVICEINFOCONTAINER>
                    <xsl:element name="SERVICEINFO">
                        <xsl:attribute name="Name">
                            <xsl:value-of select="LANGUAGE/MICROSOFT_SERVICECATEGORIES_8_0/TRANSPORT_TRANSPORTNAME_TCPCONNECT"/>
                        </xsl:attribute>
                        <xsl:attribute name="ID">D8E78E43-D8D6-4e57-8AD4-2164254C16D5</xsl:attribute>
                        <xsl:attribute name="Protected">true</xsl:attribute>
                        <PROPERTYCONTAINER>
                            <PROPERTY ID="default" Protected="true">yes</PROPERTY>
                            <PROPERTY ID="type" Protected="true">tcp_connect</PROPERTY>
                            <PROPERTY ID="ip" Protected="true">0.0.0.1</PROPERTY>
                            <PROPERTY ID="port" Protected="true">5655</PROPERTY>
                            <PROPERTY ID="device:ip" Protected="true">0.0.0.1</PROPERTY>
                            <PROPERTY ID="deviceort" Protected="true">5655</PROPERTY>
                            <PROPERTY ID="LocalAssemblyFile" Protected="true" _UseCcRelativePath="true">bin/tcpconnectionc.dll</PROPERTY>
                            <PROPERTY ID="DebuggerTransport" Protected="true" _UseCcRelativePath="true">transports/desktop/cmtnpt_tcpconnect.dll</PROPERTY>
                            <PROPERTY ID="LocalTransportFile" Protected="true" _UseCcRelativePath="true">target/wce400/%cpu%/TcpConnectionA.dll</PROPERTY>
                        </PROPERTYCONTAINER>
                    </xsl:element>
                    <xsl:element name="SERVICEINFO">
                        <xsl:attribute name="Name">
                            <xsl:value-of select="LANGUAGE/MICROSOFT_SERVICECATEGORIES_8_0/TRANSPORT_TRANSPORTNAME_DMA"/>
                        </xsl:attribute>
                        <xsl:attribute name="ID">26753017-B5BB-4b67-BEE3-862676DE23DC</xsl:attribute>
                        <xsl:attribute n

  • 0
    点赞
  • 1
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
您可以使用VBA的ADODB连接对象来不打开文件直接将数据从Excel文件复制到指定的工作簿。具体步骤如下: 1. 引用Microsoft ActiveX Data Objects库,打开VBA编辑器,在菜单栏选择“工具”>“引用”,勾选“Microsoft ActiveX Data Objects x.x Library”,然后点击“确定”按钮。 2. 定义ADODB连接和记录集对象,以及源Excel文件的路径和工作表名称。 ```vb Dim conn As ADODB.Connection Dim rs As ADODB.Recordset Dim filepath As String Dim sheetname As String filepath = "C:\Users\Username\Desktop\SourceFile.xlsx" sheetname = "Sheet1" Set conn = New ADODB.Connection Set rs = New ADODB.Recordset ``` 3. 打开ADODB连接对象,并将源Excel文件的路径和工作表名称作为参数传入Open方法。 ```vb conn.Open "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=" & filepath & ";Extended Properties=""Excel 12.0 Xml;HDR=YES"";" ``` 4. 执行SELECT语句,从指定的工作表获取数据,并将数据存储到记录集对象。 ```vb rs.Open "SELECT * FROM [" & sheetname & "$]", conn ``` 5. 定义目标工作簿和目标工作表的名称。 ```vb Dim targetwb As Workbook Dim targetws As Worksheet Set targetwb = ThisWorkbook '目标工作簿 Set targetws = targetwb.Worksheets("Sheet2") '目标工作表 ``` 6. 将记录集数据复制到目标工作表。 ```vb targetws.Range("A1").CopyFromRecordset rs ``` 7. 关闭记录集和连接对象。 ```vb rs.Close conn.Close ``` 需要注意的是,如果源Excel文件使用的是早期版本的Excel格式(如Excel 97-2003工作簿),则需要将连接字符串的“Excel 12.0 Xml”更改为“Excel 8.0”。
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值