1、创建一个Java Class代码可以简单如下
public class Test {
public static void main(String[] args) {
System.out.println("Test")
}
}
2、编译Class
3、在VBA中通过如下代码调用java
Dim ws As WshShell
Dim we As WshExec
Dim i As Integer
Set ws = New WshShell
Set we = ws.Exec("javaw e:\Test")
MsgBox we.StdOut.ReadAll
Set ws = Nothing
Set we = Nothing
4、执行上面VBA代码会d出对话框显示Test字样
注意要点:
(1)VBA工程中药引用Windows Script Host Object Model
(2)机器上要安装JRE,而且要将JRE Bin路径写入到环境变量PATH中,否则需要指出JAVAW的完整路径
其实可以使用 VBA中的Shell调用JAVA,但是这样就只能是执行java,没有返回值,使用如上方法可以通过System.out.print输出字符作为返回结果被获取到
Java是一种可以撰写跨平台应用程序的面向对象的程序设计语言。Java 技术具有卓越的通用性、高效性、平台移植性和安全性,广泛应用于PC、数据中心、游戏控制台、科学超级计算机、移动电话和互联网,同时拥有全球最大的开发者专业社群。
dim sql as Stringsql="insert into goushudan(name,BookName,ISBN,No,ID) values ('" + TextBox1.Text + "','" + TextBox2.Text + "','" + TextBox3.Text + "','" + TextBox4.Text + "','" + TextBox5.Text + "')"
Set conn=new ADODB.Connection
Set rs=new ADODB.Recordset
conn.ConnectionString="driver={sqlserver}uid=sapwd=123456database=表名"
rs.open sql,conn,1,3
一楼的不懂不要误导别人,网络协议是国际标准,语言都必须遵循,互通没有障碍我建议楼主不要readline,之前我做的C++和Java互通也发现这个问题,改成read就行了,这原因可能跟各个语言对于TCP/IP的实现机制略微有差别
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)