VB ²éѯÓï¾ä³ö´í
VB code:
'sqlstr = "INSERT INTO useinfo " & "(usename ,password)" & " values (' " & usename & " ' " & ",'" & password & "');"
´úÂëÈçÉÏ
ÎÒÓõÄÊÇADOÁ¬½ÓACCESSÊý¾Ý¿â.
ÔÚµ÷ÊÔʱ ÌáʾINSERT INTO Óï¾äÓï·¨´íÎó
Çë´ó¼Ò°ïÎÒ¸ü¸ÄÏÂ,ÎÒ²»ÖªµÀÄÇÀï³ö´íÁË,ÓôÃÆ
sqlstr = "INSERT INTO useinfo (usename ,password) values ('" & usename & "', '" & password & "')"
sqlstr = "INSERT INTO useinfo " & "(usename ,password)" & " values (' " & usename & " ' " & ",'" & password & "');"
ûÓбØÒª
passwordÊÇjetÒýÇæµÄ¹Ø¼ü×Ö£¬×îºÃ²»ÒªÓÃÓÚ×Ö¶ÎÃû³Æ£¬Èç¹ûÓÃÁË£¬SQLÓï¾äÖÐÓÃ[]ºÅÀ¨ÆðÀ´
»¹ÓÐÒ»¸öÍêÕûµÄ×Ö·û´®²»ÒªÓÃ&´®½Ó£¬Ö»ÓÐÓöµ½±äÁ¿Ê±£¬²ÅÒªÓÃ&´®½Ó
SQL code:
sqlstr = "INSERT INTO useinfo (usename ,[password]) values ('" & usename & "','"& password & "');"
sqlstr = "INSERT INTO useinfo " & "(usename ,password)" & "
Ïà¹ØÎÊ´ð£º
login.aspx.vb:
Public ReadOnly Property nameT() As String
Get
Return TextBox1.Text
&nb ......
Çë½ÌһϣºÎÒÓÃvbдÁËÒ»¸öµ÷ÓÃIllustratorµÄ²âÊÔ³ÌÐò£¬´úÂëºÜ¼òµ¥£ºPrivate Sub Command1_Click()
Dim app As New Illustrator.Application
Dim doc As Illustrator.Document
Dim thislayer As Illustrator.Layer ......
vbдµÄ³ÌÐò±àÒëºó,ÔËÐÐÈô³ö´í,ÈçºÎÖªµÀµ½ÔÚÄÄÒ»ÐÐ?
°´Ctrl+F5Ô¤±àÒ룬³ö´íʱ»áÌø×ªµ½´íÎóÐÐ
²»ÊÇÄÇÑùµÄÁË,ÎÒÊÇÒªÇó±àÒë³ÉEXEºóÔËÐÐ,Ìáʾ³ö´íÄÜ·ñÌáʾ´íÔÚÄÄÒ»ÐÐ.
ÎÒ±àÒëºóÔÚÎҵĵçÄÔÉÏÔËÐÐûÎÊÌâ,µ«Ô ......
×òÌìлл chenhui530 °ïÎÒ½â¾öÁË´°¿ÚºÍÀàÃûµÄ¶¯Ì¬Ëæ»úÉú³É¡£
µ«ÏÖÔÚÓÐÒ»¸öÒÉÎÊ£¬¾ÍÊÇËùÓд°¿ÚºÍ¿Ø¼þ¸Ä³ÉµÄËæ»úÀàÃûºó£¬ÊÇ·ñÔÚ³ÌÐò¹Ø±Õʱ×Ô¶¯Ïú»ÙÁËÄØ£¿
Èç¹ûÐ¶ÔØ´°Ìåʱ¼ÓÉÏEND£¬»á×Ô¶¯½øÐÐÇåÀí¡£
×îºÃÑø³É Re ......
form2,form3¶¼·Ö±ðÓÐÒ»¸ölabel1ÊôÐÔÊÇÒ»Ñù
Private Sub Command1_Click()
Dim lbl As Label
if combo1.text="1" then
lbl = Form2.Label1
else
lbl = Form3.Label1
end if
......