小编waa*_*ers的帖子

我知道有一种方法可以通过使用MsysObjects查询来获取Access数据库中所有表的列表:

SELECT MSysObjects.Name FROM MsysObjects
WHERE
  Left$([Name],1)<>'~' AND
  Left$([Name],4)<>'Msys' AND
  MSysObjects.Type=1

有人知道一种类似的(或其他)方法来检索MS-Access数据库中所有索引的列表吗？

从Access 2007应用程序中读取(只读取)Excel文件的"最佳"方法是什么.我只想循环遍历行并将数据放入Access表中.

我不希望手动导入(获取外部数据对话框),而是通过VBA.用户获取带有"浏览"按钮的表单,然后指向具有已定义内容/格式的Excel文件.之后,VBA代码读取数据并将其放入Access数据库.

在给定特定日期和时间格式的情况下,如何将日期/时间字符串解析为Access Date对象？

我可以像这样使用CDate()函数:

  Dim StrDateTime As String
  Dim DtTest As Date

  StrDateTime = "2011-12-31 23:59:59"

  DtTest = CDate(StrDateTime)
  MsgBox DtTest

这有效,Access识别格式,很好,但我怎么能完全确定在所有情况下都会发生这种情况(例如日期/时间设置区域设置,访问版本？).我想"告诉"CDate我的特殊日期/时间格式.

其他选项是这个(但很多代码):

  Dim StrDateTime As String
  Dim IntYear As Integer
  Dim IntMonth As Integer
  Dim IntDay As Integer
  Dim IntHour As Integer
  Dim IntMinute As Integer
  Dim IntSecond As Integer

  StrDateTime = "2011-12-31 23:59:59"

  IntYear = Val(Mid(StrDateTime, 1, 4))
  IntMonth = Val(Mid(StrDateTime, 6, 2))
  IntDay = Val(Mid(StrDateTime, 9, 2))
  IntHour = Val(Mid(StrDateTime, 12, 2))
  IntMinute = Val(Mid(StrDateTime, 15, 2))
  IntSecond …

简单的问题,但找不到答案.

代替:

Df <- sqlQuery(ch, "SELECT * FROM tblTest WHERE Id=25")

我想要一个更有活力的代码片段.就像是:

Id <- 25
Df <- sqlQuery(ch, c("SELECT * FROM tblTest WHERE Id=", Id))

但这不正确.

如何检索MS-Access数据库中所有表单的列表？

要检索所有表的列表,我使用此:

For Each TDef In CurrentDb.TableDefs
    If Left(TDef.Name, 4) <> "MSys" And Left(TDef.Name, 7) <> "~TMPCLP" Then
        Debug.Print TDef.Name
    End If
Next

另见本期.

但我不能为表格做这件事.

如何防止WordPress菜单的顶级菜单项成为链接？

请参阅此网站:http://thesoftworld.com/

所以"约"不应该是一个环节,而应该是"关于>哲学".没有子项目的项目(例如"电影")也应该是一个链接.

是否存在一个系统存储过程,它列出了SQL Server 2000数据库中所有表的名称,并且每个表中列出了该表中所有列的名称？我想将此数据导出到文件中以供记录.

关于这个R代码的问题:

library(RODBC)

ch <- tryCatch(odbcConnect("RTEST"),
  warning=function(w){print("FAIL! (warning)");return(NA)},
  error=function(e){print(paste("ERROR:",geterrmessage()));return(NA)})

df <- tryCatch(sqlQuery(ch,"SELECT Test from tblTest"),
  warning=function(w){print("FAIL! (warning)");return(NA)},
  error=function(e){print(paste("ERROR:",geterrmessage()));return(NA)})

odbcClose(ch)

在两种情况下,代码都可以正常处理错误(通过省略代码中所需的参数来强制执行)(警告和错误部分几乎完全相同):我得到一个NA值和一个错误消息.

同样对于sqlQuery的错误(给出无效的DSN):NA值和错误消息.

但不适用于使用sqlQuery的警告.没有消息输出,但df包含消息(因此没有NA).为什么？

有人可以帮我修改一些URL吗？

我有(例如)这些页面:

www.mydomain.com/test/gallery.asp?id=2
www.mydomain.com/test/gallery.asp?id=3

并希望他们被要求:

www.mydomain.com/photos/people
www.mydomain.com/photos/wildlife

我正在使用IIS,起初我的托管服务提供商正在使用带有httpd.ini文件的ISAPI_Rewrite,现在他们已经使用.htaccess文件切换到Helicon Ape.请参阅:http://www.isapirewrite.com/和http://www.helicontech.com/ape/

我尝试了ISAPI_Rewrite方式:

RewriteRule /photos/people /test/gallery.asp?id=2 [I,L]
RewriteRule /photos/wildlife /test/gallery.asp?id=3 [I,L]

但它不起作用.

建议？

如何使用plot()将XY图中的第二行绘制到不同的比例(如此示例)(紫色线)？

我的第一个(红色)行的R代码是这样的:

p <- sqlQuery(ch,"SELECT wl,param1 FROM qryPlot ORDER BY wl")
plot(p$wl,p$param1,axes=T,xlim=c(400,800),ylim=c(0,100),type="l",col="red")

关于WordPress模板文件中的一段PHP代码的问题.

该模板包含以下代码:

<h1><?php the_title(); ?></h1>

如果标题不是"Home",我希望仅打印标题.

但是这段代码不起作用:

<?php if (the_title()!='Home'); ?>
   <h1><?php the_title(); ?></h1>
<?php endif; ?>