asp连接SQL和Access数据代码(asp里的随机函数)_ASP教程
缂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾惧綊鏌熼梻瀵割槮缁炬儳缍婇弻鐔兼⒒鐎靛壊妲紒鐐劤缂嶅﹪寮婚悢鍏尖拻閻庨潧澹婂Σ顔剧磼閹冣挃闁硅櫕鎹囬垾鏃堝礃椤忎礁浜鹃柨婵嗙凹缁ㄥジ鏌熼惂鍝ョМ闁哄矉缍侀、姗€鎮欓幖顓燁棧闂傚倸娲らˇ鐢稿蓟閵娿儮鏀介柛鈩冪懃閳峰牓姊洪幖鐐测偓鏇⑺囬幍顔藉床婵炴垶锕╅崯鍛亜閺冨洤鍚归柛鎴濈秺濮婃椽宕崟顒€娅ょ紓浣筋嚙閻楁挸顕g拠娴嬫婵﹩鍋呴崟鍐⒑缂佹ê濮﹂柛鎾寸☉閳绘捇濡舵径瀣ф嫼闂佸憡绋戦敃銉╁煕閹烘鐓涘ù锝呮啞閹插憡淇婇崣澶婂妤犵偞岣块埀顒佺⊕閿氭い搴㈡崌濮婃椽宕烽鐘茬闁汇埄鍨伴敃銉х博閻旂厧鍗抽柕蹇婃閹风粯绻涙潏鍓у閻犫偓閿曞倸缁╅柡澶嬶紩閻熸壋鍫幖绮光偓鏂ユ嫬婵$偑鍊戦崹娲€冩繝鍛唴闂備胶绮粙鎾宦ㄩ埀鐞掗梻鍌氬€搁崐鎼佸磹閹间礁纾归柟闂寸绾惧湱鈧懓瀚崳纾嬨亹閹烘垹鍊為悷婊冪箻瀵娊鏁冮崒娑氬幗闂侀潧绻嗛幊姘跺捶椤撶姷骞撳┑掳鍊曢幊蹇涙偂濞嗘挻鐓欐繛鍫濈仢閺嬫稒銇勯敐鍛仮闁哄本绋撻埀顒婄到婢у海寮ч埀顒勬⒑閸濆嫭婀版繛鍙壝銉╁礋椤栨岸鍞跺┑鐘绘涧濡藟濞嗘劗绡€闁汇垽娼ф禒锕傛煕閵婏箑鍔剁憸鐗堢矒濮婅櫣鎮伴垾鍏呭濠电偛顕慨鎾敄閸℃稑纾归柣銏犳啞閻撱儲绻濋棃娑欘棞闁哄棙鐟ラ埞鎴︽晬閸曨偄骞嬮梺鍝勬湰缁嬫捇鍩€椤掑﹦绉甸柛瀣噹閻e嘲鐣濋埀顒勫焵椤掑喚娼愭繛鍙夅缚閺侇噣鏁撻悩鑼暫濠电偛妫欓幐鎼佹嫅閻斿吋鐓忓璺虹墕閸旀粓鏌¢崱鈺€閭慨濠傤煼瀹曟帒鈻庨幋顓熜滈梻浣告贡閳峰牓宕戦崟顓炲疾闂備線娼ц墝闁哄懏绋撴竟鏇熺節濮橆厾鍘介梺褰掑亰閸犳牠宕濈€n喗鐓曞┑鐘插€绘禒娑㈡煏閸パ冾伃妤犵偞甯″畷鍗烆渻閹屾闂傚倸鍊风粈渚€鎮块崶顒婄稏濠㈣埖鍔曢崹鍌炴煕瑜庨〃鍛不閺嶃劎绠鹃柛鈩兩戠亸顓㈡煟椤撶噥娈旀い顓炴健閹虫粓鎯夐鍛伌闁轰礁绉电粭鐔煎焵椤掆偓椤繒绱掑Ο璇差€撻柣鐔哥懃鐎氼剚绂掗埡鍛拺闁告稑锕ラ悡銉╂⒑鐢喚鍒伴柣锝夋敱鐎靛ジ寮堕幋婵嗘暏闁荤喐绮嶇划鎾崇暦閻㈢ǹ鍗抽柣鎰ㄦ櫆閺傗偓闂備胶绮敋缁剧虎鍙冮妴鍌炲蓟閵夛妇鍘搁梺鍛婁緱閸犳宕愰幇鐗堢厸閻忕偠顕ф慨鍌炴煙椤斿搫鈧繂鐣烽幒鎴旀婵妫旂槐锟�婵犵數濮烽弫鍛婃叏閻戣棄鏋侀柛娑橈攻閸欏繘鏌i幋锝嗩棄闁哄绶氶弻鐔兼⒒鐎靛壊妲紒鐐劤椤兘寮婚敐澶婄疀妞ゆ帊鐒﹂崕鎾绘⒑閹肩偛濡奸柛濠傛健楠炲啰鎲撮崟顒€顫¢梺鐟板槻閻牓宕濋崨顓涙斀闁绘劖褰冮幃鎴︽煟濡ゅ啫鈻堟鐐插暙閻o繝骞嶉搹顐も偓濠氭椤愩垺澶勯柟灏栨櫆鐎靛ジ鍩€椤掑嫭鈷掑ù锝堟鐢稓绱掔拠鎻掆偓鍧楀箖閵夛妇闄勭紒瀣劵閹芥洖鈹戦悙鏉戠仧闁搞劌缍婇幃鐐裁洪鍛幈闂佽婢橀崥鈧紒銊ョ摠娣囧﹪骞撻幒鏂库叺濠殿喖锕ㄥ▍锝囨閹烘嚦鐔烘嫚閺屻儳鈧椽姊绘担鐟邦嚋婵炴彃绻樺畷褰掓寠婢舵ê娈ㄦ繝鐢靛У閼归箖鎮橀幎鑺ョ厵濡鑳堕ˇ锕傛煙椤旇棄鐏撮柡宀€鍠栭幊鏍煛閸曞﹤顦甸弻宥堫檨闁告挻鐟ф竟鏇㈩敇閵忊晜鏅╅梺纭呮彧闂勫嫰鍩涢幒鎳ㄥ綊鏁愰崶銊ユ畬闂佸磭绮ú鐔煎蓟閿熺姴鐒垫い鎺嶇劍缂嶅洭鏌嶉崫鍕偓鐟扳枔娴煎瓨鈷戦悹鎭掑妼閺嬫柨鈹戦鑺ュ唉闁归攱鍨块幃銏ゅ礂閼测晛甯惧┑鐘垫暩閸嬬喖宕戦幘鏂ユ瀺闁糕剝绋掗悡鏇㈡倵閿濆簼绨兼い銉e灲閺岋紕浠﹂崜褋鈧帒霉閻欏懐鐣电€规洘绮忛ˇ顔戒繆閹绘帞澧曟い顏勫暣婵″爼宕ㄧ€电ǹ妞介梻浣烘嚀閸ゆ牠骞忛敓锟� 缂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾惧綊鏌熼梻瀵割槮缁炬儳缍婇弻鐔兼⒒鐎靛壊妲紒鎯у⒔閹虫捇鈥旈崘顏佸亾閿濆簼绨奸柟鐧哥秮閺岋綁顢橀悙鎼闂侀潧妫欑敮鎺楋綖濠靛鏅查柛娑卞墮椤ユ岸姊绘担钘壭撻拑杈╃磼鐠囪尙澧曟い顐㈢箰鐓ゆい蹇撶У閺呫垽姊洪柅鐐茶嫰婢ф壆绱掗鑺モ拻闁逞屽墴濞佳囧箺濠婂牊鍋濈紓浣姑肩换鍡涙煏閸繃鍣洪柛锝嗘そ閺岋綁骞樼€靛憡鍣板┑顔硷攻濡炰粙銆佸鈧俊姝岊槾闁哄棛濮电换婵嬪煕閳ь剟宕堕埡鍐╂瘒闂備礁鎼悮顐﹀磹濠靛棭鍤曢柛顐f礀缁犱即骞栫划鍏夊亾閸欏鈻曢梻鍌氬€风粈渚€骞栭锕€瀚夋い鎺戝閸庡孩銇勯弽銊р棩缂佽妫濋弻锝夊箣閻樺灚鎲橀梺杞扮閿曨亪寮婚敐澶婄闁告劘灏欏Σ鏉库攽閻愯泛顥嶇€规洜鏁稿Σ鎰板箻鐠囪尙锛滃┑鐐叉鐢晠宕ぐ鎺撯拺缂佸顑欓崕鎰版煙閸涘﹥鍊愰柍銉畵瀹曠ǹ螖娴e憡鐤傞梻鍌氬€搁悧濠勭矙閹达讣缍栫€广儱顦伴埛鎴犵磽娴h偂鎴犱焊椤撱垺鐓曢柣鏂挎啞鐏忥妇鈧鍠栭…宄邦嚕閹绢喗鍋勫瀣捣閻涱噣姊绘担绋款棌闁稿鎳愰幑銏ゅ磼閻愨斁鍋撻弽銊ョ窞闁归偊鍘搁幏铏圭磽閸屾瑧鍔嶅畝锝堟硶缁濡烽妷鍐嚀楗増鎯斿┑瀣粣闁诲孩顔栭崰鏍€﹂悜钘夋瀬闁圭増婢樺婵囥亜韫囨挻鍣洪柡澶嬫倐濮婄粯鎷呴崨濠呯闂佺ǹ顑嗛幐绋跨幓閸喒鏋庨柟鍨暞閺呮粓姊虹捄銊ユ珢闁瑰嚖鎷� 闂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾惧綊鏌熼梻瀵割槮缁炬儳缍婇弻鐔兼⒒鐎靛壊妲紒鎯у⒔閹虫捇鈥旈崘顏佸亾閿濆簼绨绘い鎺嬪灪閵囧嫰骞囬鍡欑厯闂佸搫琚崝鎴﹀箖閵忋倕浼犻柛鏇熷灟閸ㄥ鎯€椤忓牆绠氱憸婊堟偂婵傚憡鐓涢悘鐐插⒔濞插鈧鍠楅幐铏繆閹间礁唯鐟滃宕戦幘娲绘晢闁告洦鍓涢崢閬嶆⒑闂堟侗妾х紒鑼跺Г娣囧﹪鎮惧畝鈧壕鐣屸偓骞垮劚閹冲繘宕板鈧弻锛勪沪閻e睗褏鈧娲﹂崑濠傜暦閻旂⒈鏁冮柨婵嗘-閸熲偓婵犵绱曢崑鎴﹀磹瑜忛埀顒勬涧閻倸鐣风憴鍕秶闁冲搫鍊告惔濠傗攽閻樼粯娑фい鎴濇嚇閿濈偤宕ㄧ€涙ḿ鍙嗗┑鐘绘涧濡瑩藟閻樼粯鐓忛柛鈩兠慨宥嗘叏婵犲啯銇濈€规洦鍋婂畷鐔碱敇閻愨晜瀚涢梻鍌欑閹诧繝骞愭ィ鍐ㄧ獥閹兼番鍔嶉崑鈺冣偓鐟板鐎氬牓寮崼婵堝姦濡炪倖甯掔€氥劑宕戦幋婢濆綊宕楅崗鑲╃▏闂備礁宕ú顓㈠蓟閿濆妫橀柟绋垮閸庢挸螖閻橀潧浠﹂柛鏃€鐟ラ~蹇曠磼濡顎撻柣鐔哥懃鐎氼剚绂掗埡鍛拺缂佸鐏濋惁銊╂煕閵娿劍纭鹃柣锝呭槻閳规垿宕遍埡浣瑰€┑鐘灱濞夋盯顢栭崨鏉戠妞ゆ挶鍨洪埛鎴犵棯椤撶偞鍣虹憸鎶婂洦鈷掗柛鏇ㄥ亜椤忣參鏌涢埡鍌滄创妤犵偞甯¢獮瀣敇閻樺弶鏆╅梻浣藉吹婵儳鈻嶉敐鍥︾剨闁靛ň鏅涚粈澶愭煟閺冨倸甯堕柡瀣╃窔閺屾盯顢曢悩鎻掑闂佹娊鏀遍崹鍧楀蓟濞戞ǚ鏀介柛鈩冾殢娴煎倸顪冮妶搴′壕缂佺姵鎹囧璇测槈濞嗘垹鐦堥梺鍛婂姦娴滄粓鍩呴崷顓涘亾閸忓浜鹃梺鎸庣箓閻楀棝宕濋悽鐢电<闁绘ê纾埥澶愭煃閽樺妲搁摶锝嗙節瑜忛崑鎾斥枍婵犲洦鐓涢悘鐐额嚙婵倻鈧鍣崳锝呯暦閹烘垟鍫柛鎰典憾閸嬔冣攽閿涘嫬浜奸柛濠冨灴瀹曟洟鎳犻鍌滅厯闂佽宕橀崺鏍綖閺囥垺鐓欓柟瑙勫姦閸ゆ瑧鐥幆褍鎮戠紒缁樼洴瀹曞崬螣閾忛€涙樊濠电姷顣介埀顒冨皺閻瑦鎱ㄦ繝鍐┿仢鐎规洦鍋婃俊鐑藉Ψ閵堝洦宕熷┑锛勫亼閸娿倝宕㈡ィ鍐ㄧ婵せ鍋撻柟顔诲嵆椤㈡瑧鎹勯妸褎婢戞繝鐢靛仦閸ㄥ爼鎮烽敃鈧埢宥夊閵堝棌鎷洪柣鐘充航閸斿苯鈻嶉幇鐗堢厵闁告垯鍊栫€氾拷 闂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾惧綊鏌熼梻瀵割槮缁惧墽鎳撻—鍐偓锝庝簼閹癸綁鏌i鐐搭棞闁靛棙甯掗~婵嬫晲閸涱剙顥氬┑掳鍊楁慨鐑藉磻閻愮儤鍋嬮柣妯荤湽閳ь兛绶氬鎾閳╁啯鐝栭梻渚€鈧偛鑻晶鎾煙椤斿吋鍋ユい銏″哺閸┾偓妞ゆ帒瀚拑鐔兼煥濠靛棙鍟掗柡鍐ㄧ墕閻掑灚銇勯幒鎴濐仾闁稿顑呴埞鎴︽偐閸欏鎮欓梺娲诲幗椤ㄥ﹪鎮¢锕€鐐婇柕濞р偓婵洭姊虹紒妯诲鞍闁荤啙鍛潟闁规儳鐡ㄦ刊鎾⒒閸喓銆掑ù鐘层偢濮婃椽宕崟闈涘壉缂備礁顑嗙敮妤冪矚鏉堛劎绡€闁搞儯鍔岄埀顒傚厴閺岀喎鈻撻崹顔界亾闂佺粯鎸婚幑鍥ь潖濞差亜浼犻柛鏇ㄥ亽濡茬敻姊洪柅鐐茶嫰婢ь垶鏌涢幘鏉戝摵鐎规洏鍎抽埀顒婄秵閸犳牜绮婚崷顓犵<妞ゆ梻鍘х敮銊╂煕鐎n偅宕岄柟宕囧█椤㈡鎷呯憴鍕典化闂傚倸鍊搁崐鎼佸磹妞嬪海鐭嗗〒姘e亾妤犵偛顦甸弫鎾绘偐椤旂懓浜鹃柛鎰靛枛楠炪垺绻涢崱妤冪闁诲孩濞婇幃妤呯嵁閸喖濮庡┑鐐额嚋缁犳垿鎮鹃悜钘夌煑濠㈣泛鐬奸鏇㈡⒑閻熸壆鎽犻柣鐔村劦閹﹢鍩¢崒銈嗩啍闂佺粯鍔︽禍婊堟倶椤忓媱搴ㄥ炊瑜濋煬顒併亜閵忥紕鈽夐柍瑙勫灴楠炲洭顢楁笟鍥ф暢闂傚倸鍊搁崐鎼佸磹閹间絸鍥敍濠婂懐鐓嬮梺鍦檸閸犳牠鎮″鈧弻鐔告綇閹呮В闂佽桨绀侀澶愬蓟濞戙垹鐒洪柛鎰典簼閸n噣鏌﹂崘顔绘喚婵﹦绮幏鍛村川婵犲倹娈樻繝娈垮枛閿曘倗绱炴繝鍥ラ柛鎰ㄦ櫇缁♀偓闂佹悶鍎滈崟顑岸姊绘笟鈧埀顒傚仜閼活垱鏅堕鐐寸厪闁搞儜鍐句純濡ょ姷鍋炵敮锟犵嵁鐎n亖鏀介柛銉㈡櫃婢规洖鈹戦悩鍨毄闁稿鐩畷銉р偓锝庡枛缁€澶嬬箾閸℃ɑ灏柦鍐枛閺岋綁寮崒妤佸珱闂佽桨绀侀敃顏堝蓟閵堝悿鍦偓锝庡亝閻濇棃姊虹紒妯诲暗闁哥姵鐗犻獮鍐ㄎ旈崘鈺佹瀭闂佸憡娲﹂崜娑⑺囬妸銉㈡斀闁绘劘娉涢惃娲煕閻樺磭澧い鏇稻缁绘繂顫濋鈧懓鍨攽鎺抽崐鏇㈡晝閵堝绠栭柟杈鹃檮閳锋垿鏌涘☉姗堟缂佸爼浜堕弻娑㈠Ω閿曗偓閳绘洜鈧娲忛崹浠嬨€佸Δ鍛妞ゆ垼濮ょ€氳棄鈹戦悙鑸靛涧缂傚秮鍋撴繝娈垮枔閸婃鈽夐悽绋块唶闁哄洨鍠撻崢閬嶆⒑閹稿海绠撶紒缁樺浮閹箖宕归顐n啍闂佺粯鍔樼亸娆戠不婵犳碍鐓涘ù锝堫潐瀹曞矂鏌℃担瑙勫磳闁轰焦鎹囬弫鎾绘晸閿燂拷,闂傚倸鍊搁崐鎼佸磹閹间礁纾归柟闂寸绾惧綊鏌熼梻瀵割槮缁炬儳婀遍埀顒傛嚀鐎氼參宕崇壕瀣ㄤ汗闁圭儤鍨归崐鐐差渻閵堝棗绗傜紒鈧笟鈧畷婊堫敇閻戝棙瀵岄梺闈涚墕濡鎱ㄨ缁辨帡鎮╅崘鑼患缂備緡鍠栭悧蹇涘焵椤掑﹦绉甸柛瀣╃劍缁傚秴饪伴崼鐔哄幍闂侀€涚祷濞呮洖鈻嶉崨瀛樼厽闊洤锕ュ▍鍥煙椤曞懎鏋涙い顐g矒閸┾偓妞ゆ巻鍋撴い顐㈢箳缁辨帒螣鐠囧樊鈧挾绱撴担鍦槈妞ゆ垵鎳庨埢鎾活敇閻愨晜鏂€濡炪倖姊归弸濠氬礂椤掑倻纾奸柣妯挎珪瀹曞矂鏌℃担鐟板闁诡喗鐟╁鍫曞箣閻樼數宓侀梻浣筋嚙閸戠晫绱為崱娑樼婵炴垯鍩勯弫濠囨煛閸モ晛鏋旂紒鈾€鍋撻梻浣圭湽閸ㄨ棄岣胯閻☆參姊绘担鍛靛綊顢栭崨顓囨稑鈹戦崱娆愭闂佹眹鍨绘灙闁告濞婇弻鏇$疀閵壯咃紵闂佸憡锚瀹曨剟鈥旈崘顔嘉ч柛鈩冾殔琛肩紓鍌欑劍瑜板啯鏅堕悾灞藉灊闁割偁鍎遍悞鍨亜閹烘垵鈧崵澹曢挊澹濆綊鏁愰崱妤冪シ婵炲瓨绮撶粻鏍ь潖濞差亜宸濆┑鐘插€搁~鍛存⒑閸濆嫬鈧悂宕愰崷顓犵焿鐎广儱鎳夐崼顏堟煕椤愩倕鏋旈柛妯绘倐濮婅櫣绮欓幐搴㈡嫳濠殿喗菧閸斿秶绮嬮幒妤€顫呴柕鍫濇閸橀潧顪冮妶鍡橆梿婵☆偄瀚伴幃姗€鏁冮崒娑氬帾闂佹悶鍎滈崘鍙ョ磽缂傚倷鑳舵慨鐢告儎椤栨凹鍤曢柟缁㈠枟閸婄兘鎮楅悽鐢点€婇柛瀣崌瀹曟粏顦寸痪鎹愭闇夐柨婵嗙墛椤忕娀鎮介娑氭创闁哄矉缍侀崺鈩冪節閸屾粈妗撻梻浣虹帛娓氭宕板璺虹劦妞ゆ帒锕︾粔鐢告煕閻樻剚娈滅€规洘鍔欓幃婊堟嚍閵壯冨箰濠电姰鍨煎▔娑㈩敄閸涘瓨鍊堕柍鍝勫€荤粻楣冩煕椤愶絿鈽夐柍褜鍓氱换鍌烇綖韫囨洜纾兼俊顖濐嚙椤庢捇姊洪崨濠勬创婵炰匠鍛濠电姴娲㈤埀顑跨窔瀵粙顢橀悙鑼垛偓鍨攽閻愭潙鐏﹀畝锝呮健椤㈡瑦寰勯幇顓涙嫼闂佺鍋愰崑娑㈠礉閳ь剟鏌h箛鏇炰粶濠⒀呮櫕缁瑦绗熼埀顒€顫忕紒妯诲闁告稑锕ら弳鍫㈢磽娴g瓔鍤欓柛濠傤煼閸┾偓妞ゆ帊鑳跺▓浼存煕閵夋垵鍟▓銈夋⒑閻熸澘鎮戦柣锝庝邯瀹曟繂顓兼径瀣簵濠电偛妫欓崝鎴炵濠婂牊鐓涚€规搩鍠栫€氬嘲螞閻愮儤鐓熼幖娣灩閸ゎ剟鏌涢悩鎰佹畼缂侇喖顑呴鍏煎緞濡粯娅嗛梻浣稿閸嬪棝宕崸妤€绠紓浣贯缚缁犻箖寮堕崼婵嗏挃闁告帊鍗抽弻鐔烘嫚瑜忕弧鈧悗瑙勬处閸ㄥ爼骞冨▎鎾村€绘俊顖滃帶楠炴姊绘担铏瑰笡婵﹦鎳撳玻鍨枎閹惧磭顦梺闈涚墕椤︿即鎮″▎鎰垫闁绘劘灏欐禒銏ゆ煟韫囧﹥娅婇柟钘夌埣閺佹劙宕ㄩ鐔蜂壕闁圭儤鍩堝ḿ鈺呮煟閹捐櫕鎹eù鐘櫅閳规垿鎮欓懠顒€顣堕梺鍛婃煥缁夊爼骞戦姀鐘斀閻庯綆鍋勬禒娲⒒閸屾氨澧涢柛鎺嗗亾闂佹寧绻傚ú銊ノ涢鐐寸厸濠㈣泛瀛╃涵鍫曞极閸儲鍊垫繛鍫濈仢閺嬬喖鏌i幙鍕瘈闁绘侗鍣e浠嬪Ω閿曗偓椤庢捇姊洪棃鈺佺槣闁告ḿ鍘ч锝夊箮閼恒儮鎷绘繛杈剧秬濞咃絿鏁☉娆戠闁告瑥顦辨晶鐢碘偓瑙勬礃閸旀瑥鐣烽悜绛嬫晣婵炴垶眉婢规洖鈹戦缁撶細闁稿鎸鹃埀顒佺啲閹凤拷!
推荐:asp中设置session过期时间方法总结
asp中默认session过期时间为20分钟,很多情况下不够,今天有客户要求很多就要重新登录了,所以准备了这篇文章,方便需要的朋友
第一种写法:
复制代码 代码如下:www.mb5u.com
MM_conn_STRING = "Driver={SQL Server};server=(local);uid=sa;pwd=;database=infs;"
Set conn = Server.Createobject("ADODB.Connection")
conn.open MM_conn_STRING
SET RS=SERVER.CreateObject("ADOBD.recordset")
SQL="SELECT * FROM TABLE ORDER BY ID DESC"
RS.open SQL,CONN,3,3
常用的函数代码:
复制代码 代码如下:www.mb5u.com
DataServer = "jb51" '数据库服务器IP
DataUser = "jb51" '访问数据库用户名
DataBaseName = "jb51" '数据库名称
DataBasePsw = "www.mb5u.com" '访问数据库密码
Set conn = Server.CreateObject("ADODB.Connection")
ConnStr="driver={SQL Server};server="&dataserver&";UID="&datauser&";PWD="&databasepsw&";Database="&databasename
conn.open ConnStr
If Err Then Err.Clear:Set conn = Nothing:Response.Write "数据库连接出错,请检查Conn.asp文件中的数据库参数设置。":Response.End
使用ASP连接MS SQL数据库,标准的连接,常用的多的是下面这种连接字符串:
复制代码 代码如下:www.mb5u.com
CONN.OPEN "Provider=SQLOLEDB.1;"&_
"Password='"&pass_word&"';"&_
"Persist Security Info=true;"&_
"User ID='"&User_ID&"';"&_
"Initial Catalog='"&db&"';"&_
"Data Source='"&Data_Source&"';"&_
"CONNect Timeout="&cntimeout&""
描述:
Provider=SQLOLEDB.1;数据库提供者,后面的 1 是表示版本信息,如果没有就会完全使用当前最新版功能
User ID=SQL帐号,数据库的帐号
Password=SQL帐号密码,数据库的帐号密码
Initial Catalog=数据库名字(只有名字,而ACCESS的是具体带路径的数据文件)
Data Source=数据源,SQL服务器名或其IP,通常用IP
上五个参数缺一不可
关于Data Source:
如果 IIS 和 SQL 同一台服务器,则 使用安装 IIS的 IP 或 主机名HostName 或 (local)
例如:
//Data Source=(Local) '' IIS 与 SQL 一起则第一选择它!
//Data Source=212.100.1.12
//Data Source=LSS
如果 SQLserver 是在另外的机器上,比如你连接到我机器上的的 SQLserver ,就用我机器的 IP
//Data Source=208.190.21.112 '我的SQL server IP
CONNect Timeout=连接超时,是整数,缺省是30秒,可以不用
Persist Security Info= true or false 可以不用
理解SQL和ACCESS的区别:
ACCESS是文件型的数据库,一个数据库就是一个具体的 MDB文件,所以ACCESS的连接需要给出具体的数据库路径 Data Source='c:\www\mdb\aaa.mdb'
而Server.mappath(aaa.mdb)即是将aaa.mdb 映射为 c:\www\mdb\aaa.mdb
SQLserver是S/C 客户端/服务器方式,与ACCESS完全不一样,所以访问SQL 2000的数据库需要建立客户端和服务器端的连接,注意这个客户端是针对 SQL数据库服务器来说的
服务器端的脚本 对 SQLserver 来说也是“客户端应用程序”。
SQL的数据库物理上也是一个.MDF数据文件,但这与MDB是天壤之别的,SQL的MDF 可以说是一个数据库的集合,里面包括了很多个数据库(里面的每个数据库有一个名字,每个数据库有相应的拥有者SchMa),而ACCESS的MDB是一个文件就是一个数据库。
故访问SQL 数据库要指定其服务器IP 数据库帐号密码 数据库名(当然无路径可言)
而访问 ACCESS 只要访问 ACCESS的文件就行了。
现在要做的是,进入企业管理器,建立一个数据库(比如为AAA),在数据库中,建立添加数据库用户和密码,然后就可以用上面的连接字符串来连接了!
//第二种写法:(DSN连接)
MM_conn_STRING="DSN=BBS;UID=SA;PWD=12345"
Set conn = Server.Createobject("ADODB.Connection")
conn.open MM_conn_STRING
SET RS=SERVER.CreateObject("ADOBD.recordset")
SQL="SELECT * FROM TABLE ORDER BY ID DESC"
RS.open SQL,CONN,3,3 // 3,3是修改、删除、增加开关!
//第三种写法:
MM_conn_STRING_own = "Driver={SQL Server};server=(local);uid=sa;pwd=11111;database=infs;"
Set conn = Server.Createobject("ADODB.Connection")
conn.open MM_conn_STRING_own
//第四种 - 这种方法用在ACCESS中
strconn = "DRIVER=Microsoft Access Driver (*.mdb);DBQ=" _
& Server.MapPath("asp.mdb")
set conn = server.createobject("adodb.connection")
conn.open strconn
我们常用的sqlserver与access都可以用的函数
复制代码 代码如下:www.mb5u.com
<%
Const DataBaseType=1
If DataBaseType=0 then
DBPath="/data/news.mdb" //mdb数据库路径
Else
'如果是SQL数据库,请认真修改好以下数据库选项
DataServer = "jb51" '数据库服务器IP
DataUser = "jb51" '访问数据库用户名
DataBaseName = "jb51" '数据库名称
DataBasePsw = "www.mb5u.com" '访问数据库密码
End if
On Error Resume Next
If DataBaseType = 1 Then
ConnStr="driver={SQL Server};server="&dataserver&";UID="&datauser&";PWD="&databasepsw&";Database="&databasename
Else
ConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath(DBPath)
End If
Set conn = Server.CreateObject("ADODB.Connection")
conn.open ConnStr
If Err Then Err.Clear:Set conn = Nothing:Response.Write "数据库连接出错,请检查Conn.asp文件中的数据库参数设置。":Response.End
%>
连接MSSQL代码(附加判断代码):
复制代码 代码如下:www.mb5u.com
<%
dim cn
set cn=server.createobject("adodb.connection")
cn.connectionstring="driver={SQL server};server=taihang;datebase=taihang;uid=sa;pwd=hacker"
cn.open
If cn.state=1 Then
response.write"数据库连接对象已打开"
Else
response.write"数据库连接对象未打开"
end If
cn.close
Set cn=nothing
%>
连接Access常用方法:
复制代码 代码如下:www.mb5u.com
Dim conn,strDataPath,connStr
set conn=server.createobject("ADODB.connection") '//定义数据库连接对象
strDataPath=server.MapPath("example.mdb") '//数据库路径字符串
connStr="Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & strDataPath '//数据库连接
conn.open connStr
也可以用:
复制代码 代码如下:www.mb5u.com
Dim conn,strDataPath,connStr
set conn=server.createobject("ADODB.connection") '//定义数据库连接对象
strDataPath=server.MapPath("example.mdb") '//数据库路径字符串
connStr="driver={Microsoft Access Driver (*.mdb)};dbq=" & strDataPath '//数据库连接
conn.Open connStr
注解:
因为我们想打开的是Access(.mdb)数据库,所以我们要透过Access的ODBC驱动程序{Microsoft Access Driver (*.mdb)}来存取数据库,dbp参数则是用来指定想打开的数据库文件,因为它必须是完整路径名称,所以我们上一语句用了Server.MapPath 函数 。
上面常用方法中一般为简洁起见也可一用下面一句
conn.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath ("/") & "xxx.mdb"
水寒意见>>
一般直接使用 Microsoft.Jet.OLEDB.4.0 一层接口:
adoConnection.open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath ("/") & "xxx.mdb"
避免使用 Microsoft OLEDB Provider for ODBC Drivers + Microsoft Access Driver (*.mdb)(Access 的 ODBC Driver)两层接口:
adoConnection.open "PROVIDER=MSDASQL.1;Driver=Microsoft Access Driver(*.mdb);DBQ=" & Server.MapPath ("/") & xxx.mdb"
ACCESS数据库连接代码(一)
复制代码 代码如下:www.mb5u.com
<%
Set con = Server.CreateObject("ADODB.Connection")
con.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("数据库文件路径")
%>
ACCESS数据库连接代码(二)
复制代码 代码如下:www.mb5u.com
<%
dim conn,cqie
conn="provider=microsoft.jet.oledb.4.0;data source=" & server.MapPath("数据库文件路径")
set cqie=server.createobject("adodb.connection")
cqie.open conn
%>
asp里的简单随机函数
复制代码 代码如下:www.mb5u.com
<%
dim a,b,c
a=1310:b=9215
randomize
c=int((b-a+1)*rnd+a)
%>
取出上次登陆时间记录本次登陆时间
复制代码 代码如下:www.mb5u.com
<%
session("onetime")=rs("上次登陆时间")
session.timeout=30
rs("上次登陆时间")=now()
%>
分享:asp入门:asp如何保存数据
下面我们就来看看实例教程吧. 先来看看提交的页面: FORM ACTION=saveinfo.asp METHOD=post !-- Your fields here -- INPUT TYPE=submit value=Submit /FORM 下面看看接收数据并保存的页面. % Set fs = CreateObject(Scripting.FileSystemObject) Folderpath=server.map
相关ASP教程:
- 相关链接:
- 教程说明:
ASP教程-asp连接SQL和Access数据代码(asp里的随机函数)
。