Ò׽ؽØÍ¼Èí¼þ¡¢µ¥Îļþ¡¢Ãâ°²×°¡¢´¿ÂÌÉ«¡¢½ö160KB

JAVAÈçºÎµ÷ÓÃvb дµÄ dll

ÎÒʹÓÃjawinÈ¥µ÷ÓÃdll..²âÊÔjawin×Ô´øµÄÀý×ӳɹ¦,µ«Êǵ÷ÓÃÎÒ×Ô¼ºµÄ¾Í²»ÐÐ.

vb дµÄ dll

·½·¨Ç©Ãû:
VBScript code:
Private Declare Function GetHeadXh Lib "MSControlctl.dll" (ByVal tmpXxdm As String, ByRef tmpHeadXh As String, ByRef tmpJxmc As String) As Boolean


ÎÒµÄJAVAÔ´Âë:
Java code:
package com.gam.cl;

import org.jawin.FuncPtr;
import org.jawin.ReturnFlags;
import org.jawin.io.LittleEndianOutputStream;
import org.jawin.io.NakedByteStream;

public class yz {
public static void main(String[] args) {
try {

FuncPtr msgBox = new FuncPtr("MSControlctl.DLL", "GetHeadXh");

NakedByteStream nbs = new NakedByteStream();

LittleEndianOutputStream leos = new LittleEndianOutputStream(nbs);
leos.writeStringUnicode("701");

byte[] b=msgBox.invoke("G:GG:", 16, nbs, null, ReturnFlags.CHECK_FALSE);
//Õâ¸öµØ·½µÄG:GG:Ó¦¸ÃÔõÃ´Ð´ÄØ?»òÕ߯äËü²ÎÊý.
System.out.println("aa");
System.out.println(b);

leos.close();

} catch (Exception e) {

e.printStackTrace


Ïà¹ØÎÊ´ð£º

vb - VB / »ù´¡Àà

vbÖÐ ÏÖÔÚÎÒÒª°ÑÊý¾Ý¿âÀï´æ´¢µÄÒ»¸ö¸½¼þµÄÄÚÈÝÌæ»»ÁË£¬Ôõô×ö£¬Ö»ÊÇÌæ»»ÎÒÖ¸¶¨µÄλÖ㬲»ÊÇÈ«²¿Ìæ»»
Ç뽫ÎÊÌâ˵Ã÷°×£¬´æ´¢×ֶθñʽ£¬Èç¹ûÊÇBinary¸ñʽµÄ±È½ÏÂé·³£¬Èç¹ûÊÇ×Ö´®£¬Ö±½ÓÌæ»»¡£×îºÃ²»Òª½øÐÐÖ¸¶¨Î»ÖÃÌæ»»¡ ......

vb - VB / ·Ç¼¼ÊõÀà

Ôõô°ÑÒÑÖªµÄÊý¾Ý±£´æ³ÉxmlÎļþ£¬ÏÖÔÚÒÑÖªµÄÊý¾ÝÊÇ
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xmlns:o=& ......

vb¶ÁÈ¡xml - VB / »ù´¡Àà

ÏÖÔÚÓиöxmlÎļþÊÇ<?xml version="1.0"?>
<?mso-application progid="Excel.Sheet"?>
<Workbook xmlns="urn:schemas-microsoft-com:office:spreadsheet"
 xm ......
© 2009 ej38.com All Rights Reserved. ¹ØÓÚE½¡ÍøÁªÏµÎÒÃÇ | Õ¾µãµØÍ¼ | ¸ÓICP±¸09004571ºÅ