[¸ß·ÖÇóÖú]°ïæתÏ´úÂë(ASP(VBSCRIPT) TO C#)лл~!
function mistake(preString)
Dim texts
Dim seed
Dim i,length
prestring = trim(preString)
length = len(preString)
seed = length
Randomize(length)
texts = ""
for i = 1 to length
seed = int(94*rnd(-asc(mid(preString,i,1))-seed*asc(right(prestring,1)))+32)
texts = texts & chr(seed) & chr(int(94*rnd(-seed)+32))
next
dim dist
dist=""
for i = 1 to len(texts)
if mid(texts,i,1) <>"'" then
dist=dist+mid(texts,i,1)
end if
next
mistake = dist
end function
ÔÚÏߵȰ¡!~!~!~!~!~!~!~!~ À´È˰¡!~!~!~!~
°¡°¡°¡°¡°¡°¡°¡°¡°¡
ÎÒµ¹!~
C# code:
public String mistake(string preString)
{
int i;
preString = preString.Trim();
int length = preString.Length;
int seed = length;
VBMath.Randomize(length);
Ïà¹ØÎÊ´ð£º
//C ½Ó¿Ú
extern "C"
{
TESSDLL_API int __cdecl GetTessText(const char *imagefile, char *text);
}
//ÎÒÔÚC#ÖÐÉùÃ÷
//µ÷ÓÃC DLL Öеĺ¯Êý
[DllImport("OCRapi.dll&quo ......
ÎÒÔ±¾ÊÇѧjspµÄ¿ÉÕÒÁËÒ»¸öASPµÄ¹«Ë¾£¡ÎÒÒªÖØÐÂѧϰ£¡ ѧϰASP£¡ Ï£Íû´ó¼ÒÍÆ¼öÒ»±¾ºÃÊ鏸ÎÒлл
<ASP3.0¸ß¼¶±à³Ì> ÍøÉÏÓеç×Ó°æµÄ
·¢ÏÖÍøÉÏaspÐÅϢʱ×î¶àµÄ ±ÈÆäËûµÄ¶¼¶àºÃ¶à
yun
ÕÒ±¾ÓÐÓ¦ÓÃÊÂÀýµÄA ......
ÎÒ×°µÄÊÇwindows7 £¬Êý¾Ý¿âÏëÓÃsql server 2008Á¬asp£¬²»¹ýÎÒ²»ÖªµÀsql server 2008µÄÓû§ÃûºÍÃÜÂëÁË£¬ÏëÓÃwinÑéÖ¤£¬ÊÔÁ˼¸±éû³É¹¦£¬Çë´ó¼Ò°ïæ¡£
˳±ãÎÊһϣ¬ÎÒÔõôÄܲé³öÀ´×Ô¼ºsql 2008µÄÓû§Ã ......
ÎʸöÎÊÌ⣬ÎÒµÄÒ»¸öÍøÕ¾ÄÜÉÏ´«Îļþ£¬ÎÒ°ÑÍøÕ¾Ä¿Â¼¿¼µ½Í¬Ò»Ì¨µçÄÔµÄÁíÒ»¸öĿ¼Ï£¬È»ºóÔÚ¸´ÖƹýÀ´µÄĿ¼ÉÏн¨ÁËÒ»¸öÍøÕ¾£¬³ÌÐòÎļþû¶¯(Ïà¹ØÂ·¾¶µÄÉèÖÃÒѾ¸ÄÁË£¬²»ÊÇ·¾¶ÎÊÌâ)£¬µ«ÊÇÐÂÍøÕ¾²»ÄÜÉÏ´«Îļþ£¬ÎÒÍøÉϲéÁË ......
ÄÜÉÏ´«µ«²»ÄܲåÈëÊý¾Ý¿âÐÅÏ¢¡£ASPÎļþ´úÂëÈçÏ£º
<%
Response.Buffer = True
Server.ScriptTimeOut=9999999
On Error Resume Next
%>
<!DOCTYPE html PUBLIC ......