求前辈们帮解决!!!下面的代码能不能改成不需要密码进入?

刚到公司之前编程序的人离职了,密码也没留下,只有源程序,怎么也不能进调试模式,下面是调试入口的代码,求帮忙看看可不可以改成不需要密码登录
Private Sub CmdCancel_Click()
mainM3.Image_ManualTest.Picture = LoadPicture(App.Path + "\test.ico")
Me.Hide
End Sub

Private Sub cmdOK_Click()
cn.Close
cn.Open

sql = "select * from 密码管理 "
rs_login.Open sql, cn, adOpenKeyset, adLockPessimistic

If Trim(rs_login.Fields(0)) = Trim(txtPassword.Text) Then
    DebugLogIn.Hide
    FormDebug.Show 1
Else
    txtPassword.Text = ""
    txtPassword.SetFocus

    WrongMessage.Caption = "密码错误"
    WrongMessage.Label1.Caption = "密码错误,请重试!"
    WrongMessage.Show 1
End If

End Sub

Private Sub Form_Load()
Image1.Picture = LoadPicture(App.Path + "\Password.ico")

txtPassword.Text = ""
End Sub

0

2个回答

简单的改的话 把 if 后面改成 1 = 1 就能跑了

不准备看那么多的话 全部去掉 DebugLogIn.Hide
FormDebug.Show 1 留下这两句就行了

0

Private Sub CmdCancel_Click()
mainM3.Image_ManualTest.Picture = LoadPicture(App.Path + "\test.ico")
Me.Hide
End Sub
Private Sub cmdOK_Click()
DebugLogIn.Hide
FormDebug.Show 1
End Sub
Private Sub Form_Load()
Image1.Picture = LoadPicture(App.Path + "\Password.ico")
txtPassword.Text = ""
End Sub

0
Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
其他相关推荐
请前辈们帮解决一下,
我有一段html数据,但是数据里有我不想要的 &nbsp标签,,rnrn我想过滤掉这个标签,但是不知道正则应该怎么写?rnrnrn我只要过滤 &nbsp标签的正则,其他的已经过滤完了..先再次谢谢各位了
求 图象处理 方面的前辈们帮助!!!
最近做个 数字图象处理课程 的 基于内容的图象处理 课题,请有这方面经验的前辈高手们给些建议:rn1、都是需要哪些方面的知识?请推荐几本书籍。rn2、能否留下联系方式,最好是qq。rn谢谢!
前辈们,帮小弟一把。。
我是刚进入这个行业没多久的小弟,现在没学多少东西,只学了循环、数组、字符串。rn 我想请教各位高手要学好这行要注意哪些东西。rn 还有要怎么样才能学好。rn 各位高手给点经验吧。。。rn 经验都可以往上写。。。。。
前辈们帮改下程序
#include"stdio.h"rn#include"stdlib.h"rnint main()rnrnint a,b,c,d,e;rnint i;rnchar j;rnchar fu[4]='+','-','*','/';rnint shu[4];rnint z[4]=;rnloop1:;rnfor(i=1;i<5;i=i+2)rnrnprintf("输入%d第个数",i);rni=i-1;rnscanf("%d",&shu[i]);rnrnshu[0]=a;rnshu[1]=b;rnshu[2]=c;rnshu[3]=d;rnprintf("%d%d%d%d\n\n\n\n\n",shu[0],b,c,d);rnrnrngcc 下通过编译。 执行时溢出 。
求大神帮改成asp.net(C#)的代码
Private Const BITS_TO_A_BYTE = 8rnPrivate Const BYTES_TO_A_WORD = 4rnPrivate Const BITS_TO_A_WORD = 32rnrnPrivate m_lOnBits(30)rnPrivate m_l2Power(30)rnrnPrivate Function LShift(lValue, iShiftBits)rn If iShiftBits = 0 Thenrn LShift = lValuern Exit Functionrn ElseIf iShiftBits = 31 Thenrn If lValue And 1 Thenrn LShift = &H80000000rn Elsern LShift = 0rn End Ifrn Exit Functionrn ElseIf iShiftBits < 0 Or iShiftBits > 31 Thenrn Err.Raise 6rn End Ifrnrn If (lValue And m_l2Power(31 - iShiftBits)) Thenrn LShift = ((lValue And m_lOnBits(31 - (iShiftBits + 1))) * m_l2Power(iShiftBits)) Or &H80000000rn Elsern LShift = ((lValue And m_lOnBits(31 - iShiftBits)) * m_l2Power(iShiftBits))rn End IfrnEnd FunctionrnrnPrivate Function str2bin(varstr) rn Dim varascrn Dim irn Dim varcharrn Dim varlowrn Dim varhighrn rn str2bin="" rn For i=1 To Len(varstr) rn varchar=mid(varstr,i,1) rn varasc = Asc(varchar) rn rn If varasc<0 Then rn varasc = varasc + 65535 rn End If rn rn If varasc>255 Then rn varlow = Left(Hex(Asc(varchar)),2) rn varhigh = right(Hex(Asc(varchar)),2) rn str2bin = str2bin & chrB("&H" & varlow) & chrB("&H" & varhigh) rn Else rn str2bin = str2bin & chrB(AscB(varchar)) rn End If rn Next rnEnd Function rnrnPrivate Function str2bin_utf(varstr)rn Dim varchar, code, codearr, j, irn str2bin_utf = ""rn For i=1 To Len(varstr)rn varchar = Mid(varstr,i,1)rn code = Server.UrlEncode(varchar)rn If(code="+") Then code="%20"rn If Len(code) = 1 Thenrn str2bin_utf = str2bin_utf & chrB(AscB(code))rn Elsern codearr = Split(code,"%")rn For j = 1 to UBound(codearr)rn str2bin_utf = str2bin_utf & ChrB("&H" & codearr(j))rn Nextrn End Ifrn NextrnEnd FunctionrnrnPrivate Function RShift(lValue, iShiftBits)rn If iShiftBits = 0 Thenrn RShift = lValuern Exit Functionrn ElseIf iShiftBits = 31 Thenrn If lValue And &H80000000 Thenrn RShift = 1rn Elsern RShift = 0rn End Ifrn Exit Functionrn ElseIf iShiftBits < 0 Or iShiftBits > 31 Thenrn Err.Raise 6rn End Ifrnrn RShift = (lValue And &H7FFFFFFE) \ m_l2Power(iShiftBits)rnrn If (lValue And &H80000000) Thenrn RShift = (RShift Or (&H40000000 \ m_l2Power(iShiftBits - 1)))rn End IfrnEnd FunctionrnrnPrivate Function RotateLeft(lValue, iShiftBits)rn RotateLeft = LShift(lValue, iShiftBits) Or RShift(lValue, (32 - iShiftBits))rnEnd FunctionrnrnPrivate Function AddUnsigned(lX, lY)rn Dim lX4rn Dim lY4rn Dim lX8rn Dim lY8rn Dim lResultrnrn lX8 = lX And &H80000000rn lY8 = lY And &H80000000rn lX4 = lX And &H40000000rn lY4 = lY And &H40000000rn rn lResult = (lX And &H3FFFFFFF) + (lY And &H3FFFFFFF)rnrn If lX4 And lY4 Thenrn lResult = lResult Xor &H80000000 Xor lX8 Xor lY8rn ElseIf lX4 Or lY4 Thenrn If lResult And &H40000000 Thenrn lResult = lResult Xor &HC0000000 Xor lX8 Xor lY8rn Elsern lResult = lResult Xor &H40000000 Xor lX8 Xor lY8rn End Ifrn Elsern lResult = lResult Xor lX8 Xor lY8rn End Ifrnrn AddUnsigned = lResultrnEnd FunctionrnrnPrivate Function md5_F(x, y, z)rn md5_F = (x And y) Or ((Not x) And z)rnEnd FunctionrnrnPrivate Function md5_G(x, y, z)rn md5_G = (x And z) Or (y And (Not z))rnEnd FunctionrnrnPrivate Function md5_H(x, y, z)rn md5_H = (x Xor y Xor z)rnEnd FunctionrnrnPrivate Function md5_I(x, y, z)rn md5_I = (y Xor (x Or (Not z)))rnEnd FunctionrnrnPrivate Sub md5_FF(a, b, c, d, x, s, ac)rn a = AddUnsigned(a, AddUnsigned(AddUnsigned(md5_F(b, c, d), x), ac))rn a = RotateLeft(a, s)rn a = AddUnsigned(a, b)rnEnd SubrnrnPrivate Sub md5_GG(a, b, c, d, x, s, ac)rn a = AddUnsigned(a, AddUnsigned(AddUnsigned(md5_G(b, c, d), x), ac))rn a = RotateLeft(a, s)rn a = AddUnsigned(a, b)rnEnd SubrnrnPrivate Sub md5_HH(a, b, c, d, x, s, ac)rn a = AddUnsigned(a, AddUnsigned(AddUnsigned(md5_H(b, c, d), x), ac))rn a = RotateLeft(a, s)rn a = AddUnsigned(a, b)rnEnd SubrnrnPrivate Sub md5_II(a, b, c, d, x, s, ac)rn a = AddUnsigned(a, AddUnsigned(AddUnsigned(md5_I(b, c, d), x), ac))rn a = RotateLeft(a, s)rn a = AddUnsigned(a, b)rnEnd SubrnrnPrivate Function ConvertToWordArray(sMessage)rn Dim lMessageLengthrn Dim lNumberOfWordsrn Dim lWordArray()rn Dim lBytePositionrn Dim lByteCountrn Dim lWordCountrn rn Const MODULUS_BITS = 512rn Const CONGRUENT_BITS = 448rn rn lMessageLength = LenB(sMessage)rn rn lNumberOfWords = (((lMessageLength + ((MODULUS_BITS - CONGRUENT_BITS) \ BITS_TO_A_BYTE)) \ (MODULUS_BITS \ BITS_TO_A_BYTE)) + 1) * (MODULUS_BITS \ BITS_TO_A_WORD)rn ReDim lWordArray(lNumberOfWords - 1)rn rn lBytePosition = 0rn lByteCount = 0rn Do Until lByteCount >= lMessageLengthrn lWordCount = lByteCount \ BYTES_TO_A_WORDrn lBytePosition = (lByteCount Mod BYTES_TO_A_WORD) * BITS_TO_A_BYTErn lWordArray(lWordCount) = lWordArray(lWordCount) Or LShift(AscB(MidB(sMessage, lByteCount + 1, 1)), lBytePosition)rn lByteCount = lByteCount + 1rn Looprnrn lWordCount = lByteCount \ BYTES_TO_A_WORDrn lBytePosition = (lByteCount Mod BYTES_TO_A_WORD) * BITS_TO_A_BYTErn rn lWordArray(lWordCount) = lWordArray(lWordCount) Or LShift(&H80, lBytePosition)rn rn lWordArray(lNumberOfWords - 2) = LShift(lMessageLength, 3)rn lWordArray(lNumberOfWords - 1) = RShift(lMessageLength, 29)rnrn ConvertToWordArray = lWordArrayrnEnd FunctionrnrnPrivate Function WordToHex(lValue)rn Dim lBytern Dim lCountrn rn For lCount = 0 To 3rn lByte = RShift(lValue, lCount * BITS_TO_A_BYTE) And m_lOnBits(BITS_TO_A_BYTE - 1)rn WordToHex = WordToHex & Right("0" & Hex(lByte), 2)rn NextrnEnd FunctionrnrnPublic Function MD5(sMessage,input_charset)rn m_lOnBits(0) = CLng(1)rn m_lOnBits(1) = CLng(3)rn m_lOnBits(2) = CLng(7)rn m_lOnBits(3) = CLng(15)rn m_lOnBits(4) = CLng(31)rn m_lOnBits(5) = CLng(63)rn m_lOnBits(6) = CLng(127)rn m_lOnBits(7) = CLng(255)rn m_lOnBits(8) = CLng(511)rn m_lOnBits(9) = CLng(1023)rn m_lOnBits(10) = CLng(2047)rn m_lOnBits(11) = CLng(4095)rn m_lOnBits(12) = CLng(8191)rn m_lOnBits(13) = CLng(16383)rn m_lOnBits(14) = CLng(32767)rn m_lOnBits(15) = CLng(65535)rn m_lOnBits(16) = CLng(131071)rn m_lOnBits(17) = CLng(262143)rn m_lOnBits(18) = CLng(524287)rn m_lOnBits(19) = CLng(1048575)rn m_lOnBits(20) = CLng(2097151)rn m_lOnBits(21) = CLng(4194303)rn m_lOnBits(22) = CLng(8388607)rn m_lOnBits(23) = CLng(16777215)rn m_lOnBits(24) = CLng(33554431)rn m_lOnBits(25) = CLng(67108863)rn m_lOnBits(26) = CLng(134217727)rn m_lOnBits(27) = CLng(268435455)rn m_lOnBits(28) = CLng(536870911)rn m_lOnBits(29) = CLng(1073741823)rn m_lOnBits(30) = CLng(2147483647)rn rn m_l2Power(0) = CLng(1)rn m_l2Power(1) = CLng(2)rn m_l2Power(2) = CLng(4)rn m_l2Power(3) = CLng(8)rn m_l2Power(4) = CLng(16)rn m_l2Power(5) = CLng(32)rn m_l2Power(6) = CLng(64)rn m_l2Power(7) = CLng(128)rn m_l2Power(8) = CLng(256)rn m_l2Power(9) = CLng(512)rn m_l2Power(10) = CLng(1024)rn m_l2Power(11) = CLng(2048)rn m_l2Power(12) = CLng(4096)rn m_l2Power(13) = CLng(8192)rn m_l2Power(14) = CLng(16384)rn m_l2Power(15) = CLng(32768)rn m_l2Power(16) = CLng(65536)rn m_l2Power(17) = CLng(131072)rn m_l2Power(18) = CLng(262144)rn m_l2Power(19) = CLng(524288)rn m_l2Power(20) = CLng(1048576)rn m_l2Power(21) = CLng(2097152)rn m_l2Power(22) = CLng(4194304)rn m_l2Power(23) = CLng(8388608)rn m_l2Power(24) = CLng(16777216)rn m_l2Power(25) = CLng(33554432)rn m_l2Power(26) = CLng(67108864)rn m_l2Power(27) = CLng(134217728)rn m_l2Power(28) = CLng(268435456)rn m_l2Power(29) = CLng(536870912)rn m_l2Power(30) = CLng(1073741824)rn rn rn Dim xrn Dim krn Dim AArn Dim BBrn Dim CCrn Dim DDrn Dim arn Dim brn Dim crn Dim drn rn Const S11 = 7rn Const S12 = 12rn Const S13 = 17rn Const S14 = 22rn Const S21 = 5rn Const S22 = 9rn Const S23 = 14rn Const S24 = 20rn Const S31 = 4rn Const S32 = 11rn Const S33 = 16rn Const S34 = 23rn Const S41 = 6rn Const S42 = 10rn Const S43 = 15rn Const S44 = 21rn rn If LCase(input_charset) = "utf-8" Then rn x = ConvertToWordArray(str2bin_utf(sMessage))rn Elsern x = ConvertToWordArray(str2bin(sMessage))rn End Ifrn rn a = &H67452301rn b = &HEFCDAB89rn c = &H98BADCFErn d = &H10325476rn rn For k = 0 To UBound(x) Step 16rn AA = arn BB = brn CC = crn DD = drn rn md5_FF a, b, c, d, x(k + 0), S11, &HD76AA478rn md5_FF d, a, b, c, x(k + 1), S12, &HE8C7B756rn md5_FF c, d, a, b, x(k + 2), S13, &H242070DBrn md5_FF b, c, d, a, x(k + 3), S14, &HC1BDCEEErn md5_FF a, b, c, d, x(k + 4), S11, &HF57C0FAFrn md5_FF d, a, b, c, x(k + 5), S12, &H4787C62Arn md5_FF c, d, a, b, x(k + 6), S13, &HA8304613rn md5_FF b, c, d, a, x(k + 7), S14, &HFD469501rn md5_FF a, b, c, d, x(k + 8), S11, &H698098D8rn md5_FF d, a, b, c, x(k + 9), S12, &H8B44F7AFrn md5_FF c, d, a, b, x(k + 10), S13, &HFFFF5BB1rn md5_FF b, c, d, a, x(k + 11), S14, &H895CD7BErn md5_FF a, b, c, d, x(k + 12), S11, &H6B901122rn md5_FF d, a, b, c, x(k + 13), S12, &HFD987193rn md5_FF c, d, a, b, x(k + 14), S13, &HA679438Ern md5_FF b, c, d, a, x(k + 15), S14, &H49B40821rn rn md5_GG a, b, c, d, x(k + 1), S21, &HF61E2562rn md5_GG d, a, b, c, x(k + 6), S22, &HC040B340rn md5_GG c, d, a, b, x(k + 11), S23, &H265E5A51rn md5_GG b, c, d, a, x(k + 0), S24, &HE9B6C7AArn md5_GG a, b, c, d, x(k + 5), S21, &HD62F105Drn md5_GG d, a, b, c, x(k + 10), S22, &H2441453rn md5_GG c, d, a, b, x(k + 15), S23, &HD8A1E681rn md5_GG b, c, d, a, x(k + 4), S24, &HE7D3FBC8rn md5_GG a, b, c, d, x(k + 9), S21, &H21E1CDE6rn md5_GG d, a, b, c, x(k + 14), S22, &HC33707D6rn md5_GG c, d, a, b, x(k + 3), S23, &HF4D50D87rn md5_GG b, c, d, a, x(k + 8), S24, &H455A14EDrnrn
求前辈们帮我解决一下问题
1.系统是用PHP开的的一个公共微信号。在安卓和IOS 系统可以同时使用。rn1.我用jQuery 模拟了一个键盘根据需求在按键上增加了声音,也就是说每个按键都会发出声音。rn2.我现在的问题就是在安卓系统中键盘在按下发出声音是,有那么一点点延迟。可是换到IOS 上延伸就很明显而且,听一个按键联系点击之后只会想一出声音。rnrnfunction myFunction(obj) rn //按键声音rn var player = document.getElementById('play');rn player.play();rn //输入框赋值rn var oDic = document.getElementById("dic");rn var oDiv = document.getElementById("div");rn if (oDic.getAttribute("write") == "true") rn oDic.value += obj.innerText;rn rn if (oDiv.getAttribute("write") == "true") rn oDiv.value += obj.innerText;rn rnrn
求前辈们指点
本人是一菜鸟,最近要做一个项目,是别人用。net做好了的,用的是sql数据库,要求我把这个项目移植到php和oracle上,我以前没有用过php,所以我想求教各位前辈指点迷津,究竟这样做才能算是个合理的方案呢?我想直接把在。net中生成的。dll文件直接拿过来用,也就是把cs文件直接拿过来用,然后把aspx部分用php做,不知道这样做怎么样,求各位前辈指点,小弟不胜感激。
求前辈们帮帮忙
我在updatapanel 用listveiw控件 出了问题 不知道该怎么修改
能不能前辈们给一个asp.net搜索页面的实例
能不能前辈们给一个asp.net搜索页面的实例
求大神们帮解决一个小问题
import java.util.*;rnclass CollectionsDemornrn public static void main(String[] args) rn rn System.out.println("Hello World!");rn sortDemo();rn rn public static void sortDemo()rn rn List list = new ArrayList();rn list.add("dsa");rn list.add("dss");rn list.add("dssas");rn list.add("dsada");rn list.add("dssa");rn list.add("dsdas");rn list.add("dswa");rn sop(list);rn LengthComparator it= new LengthComparator();rn Collections.sort(list, it);rn sop(list);rnrn rn public static void sop(List list)rn rn System.out.println(list);rn rnclass LengthComparator implements Comparatorrn rn public int compare(String s1,String s2)rn rn if(s1.length()>s2.length())rn return 1;rn if(s1.length()
为什么在本机上进入mysql不需要密码?
我给root设置了密码了,但是我这样登陆的时候,直接可以登陆:rnmysql -u root-p;rn然后就进去了不知道是怎么回事??rnmysql -u root -p;rn这样就要我输入密码。rn为什么?
为什么在域中进入WIN98不需要用户名和密码
各位大侠:rn  我把一台WIN98加入域,但登录的时候却不提示输入用户名和密码,进入不了域,只有再注销一下,才有用户名和密码,我查了一下网络配置,没有任何问题,选择的WINDOWS网络用户登录.请各位多多指教,多谢.
前辈,帮解决下这个问题
我做了一个登录用户的页面,做好之后,在纯页面的情况下,我给它了一个登录用户验证。然后在上面生成了这些代码rnrnrn= 5.1) session_regenerate_id(true); else session_regenerate_id();rn //declare two session variables and assign themrn $_SESSION['MM_Username'] = $loginUsername;rn $_SESSION['MM_UserGroup'] = $loginStrGroup; rnrn if (isset($_SESSION['PrevUrl']) && true) rn $MM_redirectLoginSuccess = $_SESSION['PrevUrl']; rn rn header("Location: " . $MM_redirectLoginSuccess );rn rn else rn header("Location: ". $MM_redirectLoginFailed );rn rnrn?>rn但是我一浏览rn页面就出现这样的错误:rnWarning: session_start() [function.session-start]: Cannot send session cache limiter - headers already sent (output started at E:\AppServ\www\webBoard2\login.php:2) in E:\AppServ\www\webBoard2\login.php on line 5rnrn以前也预见这样问题,那会把
各位JAVA前辈能不能帮小弟我解释下这段代码
class Testrnrn static StringBuffer sb1=new StringBuffer("A");rn static StringBuffer sb2=new StringBuffer("B");rnrn public static void main(String args[])rn rn Test h=new Test();rn h.methodA(sb1,sb2);rn System.out.println(sb1+","+sb2);rn rnrn public void methodA(StringBuffer x,StringBuffer y)rn rn y.append(x);rn x=y;rn rnrnrn小弟刚接触JAVA两天,以前没接触过程序,可能是个很菜的问题,但是希望各位前辈高人不吝赐教,不胜感激
求设计,不需要代码-----------------
需求:一个类似于权限管理的功能,现在要为角色分配权限,这个权限,指的是某模块的某功能,及该功能涉及的范围(组织rnrn单位)。例:rnrn“人员管理”模块,有“添加人员功能”、“删除人员功能”、“修改人员功能”、“查询人员功能”等。现在要为Admin这个rnrn角色分配“添加人员功能”、“删除人员功能”。rnrn我现在的做法是:从数据库中,把所有的模块取出来(如:人员管理模块、项目模块、日志模块等),再根据模块,把该模块rnrn有哪此功能取出来(如上面人员的功能),每个功能前都有一复选框,选中的,算是赋予该角色的功能,选中某功能后,再在rnrn该功能后的按钮点击后弹出组织机构树,从树中选取该功能的范围。再添加其它功能范围类似上。rnrn问题:如果一个功能有100个范围,一个模块算4个功能,这就要往数据库中功能范围对照表添加400条数据,如果有10个模块的rnrn话,需要一次添加往数据库中插入4000条数据,有点夸张了,而且这样做当为每个功能选取范围后,关闭组织机构树,就很难rnrn再查看该功能的范围,当前这好解决,只需在相应复选框后加隐藏hidden标签即可,但不够宏观,还得让客户去点击。rnrn请问:有什么好的方法嘛,模块、功能、都是从库里调,功能必须对应上范围,到底怎么做,又人性化,又好呢?主要是界面rnrn应该做成什么样子?主要是给出界面,谢谢 !,说也可以,截图最好了。rnrn
帮小第解决个问题 前辈们近来看看!!
我用vc6.0编译下面的代码 出现了4个问题不知道如何解决,rn#include rn#include rn#include rn#include rn#include rn rnrnusing namespace std;rnint main()rnrn int ia[] = 1, 1, 2, 3, 5, 8 ;rn string a ;rn rn list ilist(ia, ia+6);rn list ilist_result(ilist.size());rn rnrn adjacent_difference(ilist.begin(), ilist.end(), rn ilist_result.begin() );rn rn // generates output: 1 0 1 1 2 3 rn copy( ilist_result.begin(), ilist_result.end(),rn ostream_iterator(cout," "));rn rn rn cout <() );rn rn // generates output: 1 1 2 6 15 40rn copy( ilist_result.begin(), ilist_result.end(),rn ostream_iterator(cout," "));rn rn return 0;rnrn rnrn错误提示:rnD:\帒椏\C++ Primer\fa-xing-suan-fa\adjacent_difference\adjacent_difference.cpp(23) : error C2665: 'ostream_iterator >::ostream_iterator >' : none of the 2 overloads can cornnvert parameter 1 from type 'class ostream_withassign'rnD:\帒椏\C++ Primer\fa-xing-suan-fa\adjacent_difference\adjacent_difference.cpp(29) : error C2065: 'times' : undeclared identifierrnD:\帒椏\C++ Primer\fa-xing-suan-fa\adjacent_difference\adjacent_difference.cpp(29) : error C2062: type 'int' unexpectedrnD:\帒椏\C++ Primer\fa-xing-suan-fa\adjacent_difference\adjacent_difference.cpp(33) : error C2665: 'ostream_iterator >::ostream_iterator >' : none of the 2 overloads can cornnvert parameter 1 from type 'class ostream_withassign'rnError executing cl.exe.rnCreating browse info file...rn rnadjacent_difference.exe - 4 error(s), 0 warning(s)rnrn
求前辈帮做个网页
[img=https://img-bbs.csdn.net/upload/201308/02/1375454338_618349.jpg][/img]rn轮牌的,当1#双击变红跳到后面的时候,其它列的1#全部变暗下来!再双击变黑后其它的列也自动变黑!每个号码代表一个员工。
______请前辈们帮解释一段代码,谢谢
我用以下代码是将当前*.aspx页面转换为index.htm页面,可是是借鉴的,不太看的懂,还请前辈们,帮忙解释一下。rn还有如果我要在本页中转换其他的页面,比如vod.aspx的页面为htm,那这个vod.aspx的信息要怎么放在程序中?rn谢谢前辈们指点rnrnResponse.Charset = ""rn Me.EnableViewState = Falsern Dim tw As System.IO.StringWriter = New System.IO.StringWriterrn Dim wt As HtmlTextWriter = New HtmlTextWriter(tw)rn Dim path As String = "C:\Inetpub\wwwroot\iec\index.htm"rn Dim wter As System.IO.StreamWriter = System.IO.File.CreateText(path)rn Me.RenderControl(wt)rn wter.Write(tw.ToString)rn wter.Close()rn wt.Close()rn tw.Close()rn Response.End()rn Response.Redirect(path)
研究计算机网络、擅长英语的前辈们、求帮翻译一句话
The algorithm requires that all sensor nodes have the same value of contention window in a cluster, which is revealed by formulating resource allocation as a network utility maximization problem.rnrn关于无线传感器网络MAC层协议设计的一段话、cluster译成簇就好了、其它的专业名字我就不懂了、、、rnrn顺便能不能告诉我什么是竞争窗口?
求组各位IT的前辈们....
小弟最近遇到了一个问题..rn那就是在IE8下打印页面的局部部分...rn要打印的内容是在iframe中的...我曾使用了PrintArea的打印,在IE6下是没问题的但是在iE8下Iframe打印空白页面,还有window.print()要不就全部打印,局部打印不好控制...rn有没有 哪位知道一个很好的解决方案告诉小弟,急求....
急求前辈们帮忙!!!
我现在有一个程序,是读取wave文件,然后以16进制形式显示文本上。若要以二进制显示在文本上应该怎么修改???请前辈们帮帮忙!!急急急急急!!!rn程序如下:rn#include"stdio.h"rnvoid main()rn rnFILE *in,*out;rnchar infile[100],outfile[100];rnint i = 1;rnrnprintf(" infile name:\n");rnscanf(" %s",infile);rnprintf("outfile name:\n");rnscanf(" %s",outfile);rnif ((in=fopen (infile,"rb"))==NULL)rnrnprintf("cant open infile\n");rnexit(0);rnrnif ((out=fopen(outfile,"w"))==NULL)rnrnprintf("cant open outfile\n");rnexit(0);rnrnwhile(!feof(in)) rnrnfprintf(out, "0x%02x ", fgetc(in));rnif ((i++) % 15 == 0)rnfprintf(out, "\n");rnrnfclose(in);rnfclose(out);rnrnrn rn rn
问题 求助 前辈们帮下忙
问下 用调用点击后显示页面(在同一页面里) rnrn那在点击事件应该怎么写 rn怎么判断 判断显示哪个rnrnrn我在另外个主页面 点击不同的 调用rn不同的rn和母版页一样rn
请前辈们帮个忙
我是个大一计算机科学和技术系的学生, 我们现在学的是些基础课,(里面没有很专业的东东) 并且我觉得我们现在太松了,还有许多课余时间可以消遣.所以我特想学习一些关于计算机的较专业的知识,并且是比较基本的.请前辈们指点一下, 我该怎么办?
前辈们近来帮看下,谢谢 !
这个是第一个文件. index.asprn为什么我点添加就是保存,那个联系人的内容也获取不到.等,大虾们帮看下,谢谢了!rn<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>rnrnrnrnrn rn 留言版rnrnrnrn rn rn rn rn rn rn rnrn rn rn rn 留言版rn rn rn rn rn 标题rn rn rn rn rn rn 联系人rn rn rn rn rn rn 内容rn rn rn rn rn rn rn rn rn rn rn rn rn rn <% rn sql="select * from mail order by ID desc"rn set rs=server.createobject("adodb.recordset")rn rs.open sql,conn,1,1rn %>rn <% if rs.eof then rn Response.Write"没有留言!" rn elsern %>rn <% do while not rs.eof %>rn rn <%=rs.title%>rn rn rn <%=rs.name%>rn rn rn <%=rs.body%>rn rn <%=rs.data%>rn rn <% rs.movenext rn looprn %>rn <% end if %>rn <% rs.close rn set rs=nothingrn %>rn rn rn rn rn rnrnrnrnrnrnrnrnrn添加文件是 add.asprnrn<%rndim conn,sql,conrnset conn=server.CreateObject("adodb.connection")rncon="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & server.MapPath("db.mdb")rn conn.Open con rn dim text,body,lianxi,data_uprntext=request.Form("text")rnbody=request.Form("body")rnlianxi=request.Form("lianxi")rndata_up=now()rnsql="insert into mail(text,body,[lianxi],data_up) values('"&text&"','"&body&"','"&lianxi&"','"&data&"')"rnresponse.write (sql)rnconn.execute(sql)rnResponse.Write" "rn'response.redirect "index.asp"rnrn%>rnrn
求高手,前辈们指点迷津。
学校要求制作学生管理系统。n1.然后二分查询怎么写?二分查询学生成绩。n2.怎么增加学生的成绩?就是我想增加一名学生的学号,姓名,三课程成绩。n3.怎么删除某学生的全部成绩。例如:我一开始输入了学生的学号,姓名,三课程成绩。我想把这个学生相关的全部删了。要结构体,结构数组完成的。感觉好难好难[img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/003/monkey/11.gif][/img][img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/003/monkey/11.gif][/img][img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/003/monkey/11.gif][/img][img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/003/monkey/11.gif][/img][img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/003/monkey/11.gif][/img][img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/003/monkey/11.gif][/img][img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/003/monkey/11.gif][/img][img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/003/monkey/11.gif][/img][img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/003/monkey/11.gif][/img][img=https://forum.csdn.net/PointForum/ui/scripts/csdn/Plugin/003/monkey/11.gif][/img]n
急,求助,前辈们帮下忙啊!!!
rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rn rnrn各位前辈,怎么写那个“继续添加”啊,我想要实现继续添加就可以一直添加价格那个模块。帮下忙 谢谢
前辈们帮看段指针问题
#include rnusing namespace std;rn#include rnstruct booksrn int num;rn string name;rn int value;rn int money;rn books *next;rn;rnclass bookrnrn books *p;rnpublic:rn void initbook()//初始化rn rn p=NULL;rn rn void cbook(string n,int v,int m)//创建新书rn rn books *pb=new books;rn pb->name=n;rn pb->value=v;rn pb->money=m;rn pb->num=0;rn pb->next=p;这里面的p和pb在这里指向有什么实际意义rn p=pb;rn
谁帮把下面的asp代码改成asp.net+C#
<%rnFrom_url = Cstr(Request.ServerVariables("HTTP_REFERER"))rnServ_url = Cstr(Request.ServerVariables("SERVER_NAME"))rnif mid(From_url,8,len(Serv_url)) <> Serv_url thenrnresponse.write "非法链接!" '防止盗链rnresponse.endrnend ifrnrnif Request.Cookies("Logined")="" thenrnresponse.redirect "/login.asp" '需要登陆!rnend ifrnFunction GetFileName(longname)'/folder1/folder2/file.asp=>file.asprnwhile instr(longname,"/")rnlongname = right(longname,len(longname)-1)rnwendrnGetFileName = longnamernEnd FunctionrnDim StreamrnDim ContentsrnDim FileNamernDim TrueFileNamernDim FileExtrnConst adTypeBinary = 1rnFileName = Request.QueryString("FileName")rnif FileName = "" ThenrnResponse.Write "无效文件名!"rnResponse.EndrnEnd ifrnFileExt = Mid(FileName, InStrRev(FileName, ".") + 1)rnSelect Case UCase(FileExt)rnCase "ASP", "ASA", "ASPX", "ASAX", "MDB"rnResponse.Write "非法操作!"rnResponse.EndrnEnd SelectrnResponse.Clearrnif lcase(right(FileName,3))="gif" or lcase(right(FileName,3))="jpg" or lcase(right(FileName,3))="png" thenrnResponse.ContentType = "image/*" '对图像文件不出现下载对话框rnelsernResponse.ContentType = "application/ms-download"rnend ifrnResponse.AddHeader "content-disposition", "attachment; filename=" & GetFileName(Request.QueryString("FileName"))rnSet Stream = server.CreateObject("ADODB.Stream")rnStream.Type = adTypeBinaryrnStream.Openrnif lcase(right(FileName,3))="pdf" then '设置pdf类型文件目录rnTrueFileName = "/the_pdf_file_s/"&FileNamernend if rnif lcase(right(FileName,3))="doc" then '设置DOC类型文件目录rnTrueFileName = "/my_D_O_C_file/"&FileNamernend ifrnif lcase(right(FileName,3))="gif" or lcase(right(FileName,3))="jpg" or lcase(right(FileName,3))="png" thenrnTrueFileName = "/all_images_/"&FileName '设置图像文件目录rnend ifrnStream.LoadFromFile Server.MapPath(TrueFileName)rnWhile Not Stream.EOSrnResponse.BinaryWrite Stream.Read(1024 * 64)rnWendrnStream.ClosernSet Stream = NothingrnResponse.FlushrnResponse.Endrn%> rn
请前辈们帮忙解决下下面的问题哦!
请问如何用treeview和datagridview控件实现:点击treeview控件中的节点时,使对应的数据库名称能在datagridview中显示节点对应的数据库资料?例如有两个数据库zd1.mdb,zd2.mdb,这两个数据库中又分别有3个表,名分别为b1、b2、b3(zd1.mdb中的表)和c1、c2、c3(zd2.mdb中的表),如何在treeview控件中分别设置好节点,单击各个节点能在datagridview中显示b1、b2、b3、c1、c2、c3表中的数据内容?rn 如果前辈们有这种一样的实例程序代码,也可发个给我学习学习哦,本人万分感激了!渴望进步!我的邮箱:danchun2020@126.com.
请前辈们帮忙解决下面的VB.NET问题?
在窗体中设置了两个textbox文本框和一个按钮button,下面请前辈们看看以下这些窗体form中的代码:rn Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChangedrn If TextBox1.Text <> "0" Thenrn TextBox2.Enabled = Falsern TextBox2.Text = "0"rn End Ifrn End Subrnrn Private Sub TextBox2_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox2.TextChangedrn If TextBox2.Text <> "0" Thenrn TextBox1.Enabled = Falsern TextBox1.Text = "0"rn End Ifrn End Subrnrn Private Sub Button_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button.Clickrn TextBox1.Enabled = Truern TextBox2.Enabled = Truern TextBox1.Text = ""rn TextBox2.Text = ""rnrn End Subrnrn我本想实现单击按钮button能清除和恢复textbox1和textbox2文本框的内容和可用性,可是运行后在任意一个文本框中输入数字后单击button按钮却没有使两个textbox都恢复原样!就如我在textbox1中输入520,textbox2不能用了,点击按钮可textbox2还是不能用哈!请前辈们帮忙解决下哦,非常感谢了!
前辈们快进!!!!!!!前辈们快进!!!!
.....在eclipse上写 的小软件为什么只能打开eclipse才能用啊..rn这样也不行啊..哪有要用软件的人会打开来用啊.........]rn 装什么插件能让在eclipse写的软件可以打开直接用啊??就是要有窗口那种的..rn ..... ....??rn 我是新手...刚学不久..希望各位前辈多多指教..喔!!!
前辈们帮我看一下下面的代码错在哪里
当我没有输入用户名或者密码时,为什么不能提示用户名或者密码不能为空???rnrnrnrn 用户名或者密码不能为空rn rnrnrn rn用户名: rn密码: rn rnrnrnrnrnalert('用户名或者密码不能为空');";rn rnrn?>rn
各位做界面的前辈们,求教个问题
我现在会在MFC的基于对话框的程序上面静态或者动态添加菜单和工具栏了rn但是如何制作自己的工具栏BMP呀?用什么工具?工具栏上的图标是不是都是ICO的?然后用软件把ICO集合成BMP吗?rn那图标大家谁有好的吗?还是找点资源随便贴啊?
求大神们帮看看
代码:rn[code=C/C++]rnint arr[5];rn int max,i,n = 0;rn for(i = 0;i<5;i++)rn rn scanf("%d",&arr[i]);rn rn printf("max\n");rn for(n = 0;n<=4;n++)rn rn if(arr[n]>max)rn rn max = arr[n];rn rn rn printf("%d",max);rn getch();rn[/code]rn求5个数中最大的一个 这段代码有什么问题?
小吉的代码能不能改成FTP的?
这是代码地址:rnhttp://community.csdn.net/Expert/topic/3916/3916595.xml?temp=.1876795rn
小吉的代码能不能改成下载FTP的?
以下是地址rnhttp://community.csdn.net/Expert/topic/3916/3916595.xml?temp=.1876795
求大神帮解决下
#include rn#include rnusing namespace std;rntypedef int Status;rntypedef int ElemType;rntypedef struct Cnodernrn ElemType data;rn struct Cnode *next;rnCNode;rn#define OVERFLOW 0rn#define ERROR 0rn#define ok 1rnint n=0,m=0,k=0,i=0;rnCNode *p,*q,*clist,*joseph;rnStatus Create_clist(int n)rnrn CNode *p,*q,*clist,*joseph;rn clist=(Linklist)malloc(sizeof(CNode));rn for(i=n;i>1;i--)rn rn if(!(p=((CNode*)malloc(sizeof(CNode)))))rn return OVERFLOW;rn p->data=i;rn p->next=clist->next;rn clist->next=p;rn if(i==n) q=p;rn rn q->next=clist;rn joseph=clist;rn return ok;rnrnStatus Joseph(int m,int n,int k)rnrn if(m>n) return ERROR;rn p=joseph;rn for(i=1;inext;rn return q->data;rn printf("%d",q->data);rn rnrnrn if(p->next==p) p=NULL;rn else rn p->next=q->next;rn p=p->next;rn return q->data;rn printf("%d",q->data);rn free(q);rn rn rnrnvoid main( )rn rn printf("请输入n值:");rn scanf("%d",&n);rn printf("请输入m值:");rn scanf("%d",&m);rn printf("请输入k值:");rn scanf("%d",&k);rn Create_clist(n);rn Joseph(m,n,k);rnrn
求高手帮解决下 !!!
我想用excel显示在VB中做的那种窗口图形 麻烦帮解答下
求高手帮解决
本人初学JSP 现在在做一个搜索功能, 多关键字查询,比如 输入 军事 武器 (两个词中间有空格 空开) 怎么样实现查询结果中包括 军事武器 军事 以及武器的 项?rnrnrn我是新来的 没什么分! 麻烦大家了!rnrn
求大神帮解决
[img=https://img-bbs.csdn.net/upload/201308/27/1377593614_728593.png][/img]rn如图 IE,8,9 都能弹rnIE7 无法弹出来 是不是不支持判断啊