vb程序
老是报错，谁帮我整出来
<%@LANGUAGE="VBSCRIPT" CODEPAGE="65001"%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
"http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="textml; charset=utf-8" />
<title>字符串操作</title>
</head>
<body>
<%
Response.Write "图片的title:" & GetPicName("/uploadfiles/Man Puma shoes-101.jpg")
Function GetPicName(picURL)
Dim reName, baNum,picName
reName=picURL.toString().Left(13)
'Response.Write reName'
baNum=Len(reName)
'Response.Write baNum'
picName=picURL.toString().Left(0,baNum-4)
GetPicName=picName
End Function
%>
</body>
</html>
/uploadfiles/Man Puma shoes-101.jpg 这的路径不对吧.是不是../啊!报什么错也不说
对着了吧！这是asp呀！报
缺少对象: 'picURL'
呵呵真错了！！
<body>
<%
Function GetPicName(picURL)
Dim reName, baNum,picName
baNum=Len(p
相关问答：
为什么工具栏按扭的宽度改变不了,在属性里改了又变成原来的数值了
大胡子真厉害，回答基本都是爆料级的
大胡子升级真快啊，这才几天就5条短裤外加月排名第一了
想想我这5个短裤混了差不多8年才得到的。
回复 ......
Private Sub Command1_Click()
Dim MyString() As String
Open "a.xml" For Binary As #1 ' 打开刚创建的文件。
ReDim MyString(LOF(1) - 1)
Put #1, , MyRecord ' 读入所有字符到变量中 ......
form1中有text1-8， 和command1
text8中为程序代码（生成窗体为form2（已做好））
单击command1后将text2中的代码生成EXE到d:\ 并且text1-7分别对应
产品名 公司名 合法版权 合法商标 文件描述 注释 标题
......
vb WebBrowser 小问题，请教：
WebBrowser里的网址跳转后，怎么取得跳转后的页面的URL地址
顶下顶下
引用
BeforeNavigate2
好像没有这个吧 vb6.0
BeforeNavigate2
这个可以有，呵呵。
......
