設(shè)置網(wǎng)頁編碼,可以通過Web.Config 配置
創(chuàng)新互聯(lián)專注為客戶提供全方位的互聯(lián)網(wǎng)綜合服務(wù),包含不限于成都網(wǎng)站制作、網(wǎng)站設(shè)計、襄州網(wǎng)絡(luò)推廣、重慶小程序開發(fā)、襄州網(wǎng)絡(luò)營銷、襄州企業(yè)策劃、襄州品牌公關(guān)、搜索引擎seo、人物專訪、企業(yè)宣傳片、企業(yè)代運營等,從售前售中售后,我們都將竭誠為您服務(wù),您的肯定,是我們最大的嘉獎;創(chuàng)新互聯(lián)為所有大學(xué)生創(chuàng)業(yè)者提供襄州建站搭建服務(wù),24小時服務(wù)熱線:18982081108,官方網(wǎng)址:jinyejixie.com
具體看你原來的編碼設(shè)置了
也可以單獨給form設(shè)置編碼
'access 數(shù)據(jù)表表名:chexing
'結(jié)構(gòu)id、chexing、chang、kuan、gao
Dim id() As Long
Dim chang() As Long
Dim kuan() As Long
Dim gao() As Long
Private Sub Combo1_Click()
Text1.Text = chang(Combo1.ListIndex)
Text2.Text = kuan(Combo1.ListIndex)
Text3.Text = gao(Combo1.ListIndex)
End Sub
Private Sub Form_Load()
ReDim id(0)
ReDim chang(0)
ReDim kuan(0)
ReDim gao(0)
Combo1.Clear
db = "d:\chexing.mdb"
connstr = "DBQ=" + db + ";DefaultDir=;DRIVER="
Set conn = CreateObject("ADODB.Connection")
conn.Open connstr
websql = "select * from chexing order by id"
Set rs = CreateObject("adodb.recordset")
rs.Open websql, conn, 1, 1
If rs.EOF And rs.BOF Then
Else
Do While Not rs.EOF
Combo1.AddItem rs("chexing")
id(UBound(id)) = rs("id")
ReDim Preserve id(UBound(id) + 1)
chang(UBound(chang)) = rs("chang")
ReDim Preserve chang(UBound(chang) + 1)
kuan(UBound(kuan)) = rs("kuan")
ReDim Preserve kuan(UBound(kuan) + 1)
gao(UBound(gao)) = rs("gao")
ReDim Preserve gao(UBound(gao) + 1)
rs.MoveNext
Loop
End If
rs.Close
Set rs = Nothing
Set conn = Nothing
Combo1.ListIndex = 0
End Sub
一般出現(xiàn)亂碼都是在js裏面跳轉(zhuǎn)到哪個類然後得到這個參數(shù)的時候中文亂碼,有一個非常實用的法,在js你可以這樣寫:varurl=..;url=encodeURI(url);url=encodeURI(url);//最重要的部分,兩次調(diào)用encodeURI,就是編碼兩次然後在跳轉(zhuǎn)到url所在的類,獲取這個參數(shù)的方法如下:Stringname=request.getParameter("name");name=URLDecoder.decode(name,"utf8");這樣就能解決亂碼問題了,這種方法還沒遇到過不能解決的亂碼,
把Default改成UTF-8或unicode等,看你網(wǎng)頁是什么格式的。刪掉default會彈出屬性或方法列表,里面有格式選擇,就幾種格式,多試幾次就對了。
My.Computer.FileSystem.ReadAllText(strfilename,System.Text.Encoding.Default)
需要加參數(shù),指定文件名編碼System.Text.Encoding.Default這里指的是系統(tǒng)默認(rèn)編碼
在使用streamReader和streamWriter的時候使用編碼參數(shù)。
比如:dim sw As New StreamRriter("H:\編程資料\1.txt",System.Text.Encoding.Default)
dim sr As New StreamWeader("H:\編程資料\2.txt",true,System.Text.Encoding.Default)
文章標(biāo)題:vb.net接受亂碼,vbs 亂碼
當(dāng)前地址:http://jinyejixie.com/article14/hsisge.html
成都網(wǎng)站建設(shè)公司_創(chuàng)新互聯(lián),為您提供網(wǎng)站設(shè)計、網(wǎng)站設(shè)計公司、微信公眾號、外貿(mào)建站、ChatGPT、關(guān)鍵詞優(yōu)化
聲明:本網(wǎng)站發(fā)布的內(nèi)容(圖片、視頻和文字)以用戶投稿、用戶轉(zhuǎn)載內(nèi)容為主,如果涉及侵權(quán)請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網(wǎng)站立場,如需處理請聯(lián)系客服。電話:028-86922220;郵箱:631063699@qq.com。內(nèi)容未經(jīng)允許不得轉(zhuǎn)載,或轉(zhuǎn)載時需注明來源: 創(chuàng)新互聯(lián)